VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2003/11/30(Sun) 22:03
投稿者てん
Eメール
URL
タイトルRe^2: チェックボックスを使った計算

お返事ありがとうございます。

> チェックでラベルに加算しているのならば、
> チェックを外したら減算しているんですよね?
はい。そうです。

> 加算と減算を正しく行っていれば良いと思いますが・・・
正しく行ってない気がします。
VB初心者なので、全くと言っていいほど理解出来てないんです…。
お恥ずかしながらどこをどう直せばよいかすら解っていません。

コードを載せてみます。
実行は出来るのですが、間違いだらけです(×_×;
よろしくお願いします。


Private Sub Check1_Click()

    If Check1.Value = 1 Then
        Label1 = Label1 + 2
    Else
        Label1 = Label1 + 0
    End If
        
End Sub

Private Sub Check2_Click()

    If Check2.Value = 1 Then
        Label1 = Label1 + 1
    Else
        Label1 = Label1 + 0
    End If
        
End Sub


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -