VB按钮如何左右来回移动？
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 有帮助到你的话希望点个有用，谢谢哈。
比如有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。
类似问题换一批
热点推荐
热度TOP
-
-
泉州哪家男科好？
100人阅读
-
成都无痛人流哪家好棕南
47人阅读
-
兰州比较好的男科医院在哪里？（兰州利民医院）男科
31人阅读
-
大岭山男科哪里看的好
0人阅读
-
什么方法增高会对身体有伤害？
100人阅读