|
分類:[VB.NET/VB2005 以降]
(使用言語のバージョン VB2008 EXPRESS)
”マウス右押し ” の取得方法を教えてください。 右を押したらメインフォームのテキストが
" お! 右を押しているね。ブワッハッハ " 右を離したら "" になるようなプログラムにしたいのですが。
ここまでうまくいったのですが、…。
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
Me.Text = "左を押してるね。ハハハ"
End Sub
Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
Me.Text = ""
End Sub
End Class
|