VB怎样实现鼠标一碰就执行命令

来源:百度知道 编辑:UC知道 时间:2024/06/01 12:32:12
我制作的程序在屏幕中央怎么才能在鼠标移动到我软件的位置时执行命令呢?

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox "执行命令"
End Sub

简单呀,用窗体的“MouseMove”命令就行了,比如这段
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Form1.Caption = "你好 "
End Sub
就可以实现鼠标移到窗体时窗体的名字就变成“你好”