在之前验百例的时候，师傅问我，一个暂停的，一个开始的如果做成一个按钮，是不是就方便而且美观很多，我觉得很有道理，而且还非常高大上，但是，这几天因为很多事情把这件事放下了，今天终于有时间，静下心来，好好琢磨琢磨这个问题。
原文链接：https://www.f2er.com/vb/256572.htmlPrivate Sub Form_Load()
Label1.Left = 0 'Label离左边的距离为0
Timer1.Enabled = False '时间控件在这个过程很重要
End Sub
Private Sub Timer1_Timer()
Label1.ForeColor = RGB(Rnd * 255,Rnd * 255,Rnd * 255)'随机产生颜色，也可以用QBcolor（Rnd*15）
If Label1.Left < Me.Width Then
Label1.Left = Label1.Left + 60 'Label向左移动Else
Label1.Left = 0
End If
End Sub
Private Sub Command1_click() '这就是可以用一个按钮解决问题的过程啦
If Command1.Caption = "开始" Then
Timer1.Enabled = True
Command1.Caption = "暂停"
Else
Timer1.Enabled = False
Command1.Caption = "开始"
End If
End Sub
哈哈哈！做出exe好像不能在这里发表，太遗憾了，看一下成品，说不定，大家对它更感兴趣了呢！