マウスのダブルクリックで左右のボタンを判断 (ID:81059)

名前

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

本文 単純に1つのイベントでは実現できないかも… それっぽい事をするサンプルです。 スマートではないですけど。 Dim flg Private Sub Form_DblClick() MsgBox flg End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) flg = Button End Sub