level 1
zhaoshibai
楼主
点击按钮Command1.Enabled = False鼠标指针移出按钮外Command1.Enabled = True如何编写？
2005年08月28日 03点08分
1
三楼的利害
2005年08月28日 06点08分
level 1
zhaoshibai
楼主
4
level 1
zhaoshibai
楼主
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Caption = "X:" & X & " Y:" & Y '这句可以不要If X < Command1.Left Or X > Command1.Left + Command1.Width Or Y < Command1.Top Or Y > Command1.Top + Command1.Height Then Command1.Enabled = TrueEnd Sub
2005年08月28日 06点08分
6
level 1
zhaoshibai
楼主
改成这样更少一点代码：If X < Command1.Left Or X > Command1.Left + Command1.Width Or Y < Command1.Top Or Y > Command1.Top + Command1.Height Then Command1.Enabled = True
2005年08月28日 06点08分
7
level 1
level 1
zhaoshibai
楼主
Command1.Enabled = 1 + 2 + 3 + 4 - 10哈,这还不是 Command1.Enabled=0 等值 Command1.Enabled=Flash其实也不用讨论这个问题。要解决问题的办法也不是一个。只要解决就可以了。三楼的代码就足够。
2005年08月31日 06点08分
16
level 1