VB6实现字幕滚动效果 设置Timer1的Interval值,每隔Interval会执行一次Timer()过程 Private Sub Form_Load() '设置前进时间,单位是毫秒 Timer1.Interval = 5 End Sub 如果想产生滚动效果,只需要每隔固定时间向左移动一些值就可以。 Private Sub Timer1_Timer() Label1.Left = Label1.Left -