チェックボックスへのボタン割り当てについて

wiz 2005-02-24 02:30:38 No: 119865

チェックボックスにキーボードのキーを割り当てるにはどうしたら良いのでしょう？
チェックボックス１がキーボードのＡに対応していて、Ａが押されたらそれに連動してチェックされる様な動作をさせたいと思っています。

村人B 2005-02-24 02:49:22 No: 119866

keypress
keydown
keyup
などのイベントでキー情報を取得して
valueを変更させてください。

Private Sub Check1_KeyPress(Index As Integer, KeyAscii As Integer)
Select Case KeyAscii
    Case 97
        If Check1(0).Value = 0 Then
            Check1(0).Value = 1
        Else
            Check1(0).Value = 0
        End If
    Case 98
        If Check1(1).Value = 0 Then
            Check1(1).Value = 1
        Else
            Check1(1).Value = 0
        End If
    End Select

GOD 2005-02-24 03:01:45 No: 119867

ALT+Aで良いならキャプションに(&A)とか追加すればOKです。
Aのみで尚且つフォーカスが無い時にもやりたいならFormのKeyPressで処理する
必要があります。(KeyPreview=Trueが必要。)

wiz 2005-02-24 04:15:49 No: 119868

早速のアドバイス有り難うございます。
え〜と、キーとチェックボックスをエアリア照る事は出来たのですが、チェックされた物の動作がいまいち出来ていません。

村人Ｂさんの例で、Ａを押したら、１＋１を計算してｔｅｘｔｂｏｘへ出力すると言うような動作をさせるのにはどのようにしたらいいのでしょう？
また、Ｂを押したら１−１を計算して出力すると言う様な感じです。

。。。 2005-02-24 04:19:57 No: 119869

テキストボックスのTextプロパティに値を入れましょう。
というかテキストボックスというキーワードが分かっているなら
１回ぐらいヘルプを調べたらどうですか？