DOBON.NETお気楽掲示板

■1551 / 親階層)  チェックボックスのKeyDownについて
□投稿者/ 鹿児島のHIRO -(2014/08/25(Mon) 16:03:17)
  • アイコンVB2010で開発をしています鹿児島のHIROと言います。

    キーボード操作だけでカーソルの移動を行いたいのですが
    チェックボックスコントロールの時にKeys.Down、Keys.Upが押されても
    KeyDownイベントを発生させたいのですが、手法が判りません。

    ちなみに、Keys.Enterの時にはイベントが発生するのですが。

    以下にサンプルを

    Private Sub TextBox1_Enter(sender As Object, e As System.EventArgs) Handles TextBox1.Enter
    CheckBox1.BackColor = Color.Blue
    End Sub

    Private Sub TextBox1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
    Select Case e.KeyCode
    Case Keys.Enter, Keys.Down
    Call CheckBox1.Select()
    Case Keys.Up
    Call TextBox1.Select()
    End Select
    End Sub

    Private Sub CheckBox1_Enter(sender As Object, e As System.EventArgs) Handles CheckBox1.Enter
    CheckBox1.BackColor = Color.Red
    End Sub

    Private Sub CheckBox1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles CheckBox1.KeyDown
    '---- Keys.Enter時はイベント発生。Keys.Down、Keys.Up時にイベントが発生しない。
    Select Case e.KeyCode
    Case Keys.Enter, Keys.Down
    Call TextBox2.Select()
    Case Keys.Up
    Call TextBox1.Select()
    End Select

    End Sub

    Private Sub TextBox2_Enter(sender As Object, e As System.EventArgs) Handles TextBox2.Enter
    CheckBox1.BackColor = Color.Blue
    End Sub

    Private Sub TextBox2_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyDown
    Select Case e.KeyCode
    Case Keys.Enter, Keys.Down
    Call TextBox1.Select()
    Case Keys.Up
    Call CheckBox1.Select()
    End Select
    End Sub


    ちなみに、掲示板のルールに触れるような投稿でしたら教えてください
削除キー/

前の記事(元になった記事) 次の記事(この記事の返信)
親記事 →Re[1]: チェックボックスのKeyDownについて /管理人
 
上記関連ツリー

Nomalアイコン チェックボックスのKeyDownについて / 鹿児島のHIRO (14/08/25(Mon) 16:03) #1551 ←Now
Nomalアイコン Re[1]: チェックボックスのKeyDownについて / 管理人 (14/08/28(Thu) 00:57) #1552
  └Nomalアイコン Re[2]: チェックボックスのKeyDownについて / 鹿児島のHIRO (14/08/28(Thu) 09:23) #1553 解決み!

All 上記ツリーを一括表示 / 上記ツリーをトピック表示
 
上記の記事へ返信

Pass/


- Child Tree -