C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 154 を表示中)
■89332 / )  Re[2]: ホイールクリックした時にアクションする方法
□投稿者/ tora (3回)-(2018/11/20(Tue) 15:02:03)
ありがとうございます。

あと、TablelayoutpanelやGroupboxを押した時
二度押ししたみたいに二回実行されてしまうのですが、
これを避けるにはどうしたら良いですか?


    Private MouseBool As Boolean = False

    Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)

        If MouseBool = True Then Exit Sub

        MouseBool = True

        Select Case e.Button
            Case Windows.Forms.MouseButtons.Left
                MsgBox("左ボタンがクリックされました。")

            Case Windows.Forms.MouseButtons.Right
                MsgBox("右ボタンがクリックされました。")

            Case Windows.Forms.MouseButtons.Middle
                MsgBox("マウスホイールがクリックされました。")

            Case Windows.Forms.MouseButtons.XButton1
                MsgBox("X1ボタンがクリックされました。")

            Case Windows.Forms.MouseButtons.XButton2
                MsgBox("X2ボタンがクリックされました。")

        End Select

        MouseBool = False


    End Sub



とやってみても、うまくいかないのですが
時間的にもほぼ同時に入力されているのでしょうか・・・。

返信 編集キー/


管理者用

- Child Tree -