vb的图片运动
我放的一张图片在form上，设置的是一个开始按钮来操作图片的运动，但是程序运行的时候发现这个图片自己先运动了，我的开始按钮并没有触发，并且后续的让图片回到起始位置也没有触发，怎么回事Option Explicit
Dim a, w, h, t
Private Sub Command1_Click()
a = Picture1.Left
w = Picture1.Width
h = Picture1.Height
t = Picture1.Top
Timer1.Interval = 200
Timer1.Enabled = True
Command1.Enabled = False
End Sub
Private Sub Form_Load()
End Sub
Private Sub Timer1_Timer()'???й?????
Picture1.Left = Picture1.Left + 30
Picture1.Width = Picture1.Width - 40
Picture1.Height = Picture1.Height - 40
Picture1.Top = Picture1.Top - 100
If Picture1.Height + Picture1.Top < 0 Then
Picture1.Left = a
Picture1.Width = w
Picture1.Height = h
Picture1.Top = t
Timer1.Enabled = False
Command1.Enabled = True
End If
End Sub
大佬们，被这个搞晕了 Timer1的属性是不是默认开启的
运行了一下，并没有发现你的说错误。
看动态截图
Takitooru 发表于 2020-3-12 21:16
运行了一下，并没有发现你的说错误。
看动态截图
不对啊，我的是它自己动，超了边界就结束了 lin326326 发表于 2020-3-12 21:15
Timer1的属性是不是默认开启的
是开启的 18362374790 发表于 2020-3-12 21:19
不对啊，我的是它自己动，超了边界就结束了
你看看你的时间控件是不是0，如果不是0就改回0
Takitooru 发表于 2020-3-12 21:21
你看看你的时间控件是不是0，如果不是0就改回0
确实是这个，这个0是来控制load界面的吗 18362374790 发表于 2020-3-12 21:24
确实是这个，这个0是来控制load界面的吗
不是，是如果设置了的数值，它就会自动执行，不论你是否按钮触发还是什么条件触发，而且时间控件这里默认就是0的 原来还有不少VB的爱好者。。。。。。
页:
[1]
2