Question

vb 图片水平滚动

我想用timer写个图片水平滚动的代码
但是遇到了一些困难
麻烦大家帮个忙
水平滚动的速度可以调节的
谢谢了啊

Answer 1

Private Sub Form_Load()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
If Picture1.Left <= 0 Then
Picture1.Left = Form1.Width
Else
Picture1.Left = Picture1.Left - 100
End If
End Sub

timer1的interval 设置为100
希望能帮助你 感谢你的采纳

Answer 2

速度可通过设置Timer的Interval属性来控制，滚动只要改变图片控件的Left属性就可以。即Picture1.Left = Picture1.Left - 5，此处的减5是每次移动的距离。