关于VB按钮如何左右来回移动啊的问题
比如有3个按钮,1,2,3,3在1,2之间。
取得1按钮的右边位置,left属性+width属性,2按钮的左位置,就是left属性。
再定位3的left就可以了。
Dim a
Private Sub Command2_Click()
Timer1。
Enabled = True
End Sub
Private Sub Form_Click()
Timer1。Enabled = False
End Sub
Private Sub Form_Load()
Timer1。Interval = 100
a = 20
End Sub
Private Sub Timer1_Timer()
If Command3。
Left Command2。Left Then a = -20
Command3。Left = Command3。Left + a
End Sub 有帮助到你的话希望点个有用,谢谢哈。