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

---

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

編集 削除

---

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

編集 削除

---

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

編集 削除

---

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

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

編集 削除

---

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

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。