VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/12/01(Mon) 23:40 |
| 投稿者 | ： てん |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^7: チェックボックスを使った計算 |
お返事ありがとうございます。
そして見ていただいてありがとうございます(T◇T)
> ラベルクリックで何をしたいのか分かりませんΣ(;￣□￣Ａ
> Captionに0を設定していますが、これではフォームタイトルが0になるだけですよね？
あれ!?
自分の中では、ラベルコントロールでプロパティで書いたつもりだったんですが…。
違うようですね(汗)
いつもプロパティウインドウの方で設定してしまっているので、本を参考に書いたのです。
…といっても、所々抜粋してるだけですが(×_×；
> これで加算減算は正しく行われるようになっていると思います。
よかったです(;＾−＾Ａ
> > If Check1.Value = 1 Then
> VBにはあらかじめ定数があって、
> それを使った方がコードが見やすくなります。
> 1では何か分からないですよね？
そうですね。
パッと見ただけでは分かりにくいですね。
本で１と書いてあったので、チェックされたら１とプログラム上で伝わるのかと思いました。
> で、こんな感じに書く事が出来ます。
> Private Sub Check1_Click()
> If Check1.Value = vbChecked Then
> Label1.Caption = CStr(Val(Label1.Caption) + 2)
> Else
> Label1.Caption = CStr(Val(Label1.Caption) - 2)
> End If
> End Sub
おぉ!!そうなるんですか！
必要な部分しか本を読んでないので、定数等はよく知りませんでした。
勉強になりますm(_ _)m
> 次のステップは関数やコントロール配列を使った方法です。
> また分からなかったら質問して下さい。
よろしくお願いします。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）