感谢大家一直以来对本博客的支持，你们积极的留言，让我受益良多。
为了感谢大家，我已安排国庆10.1-10.8期间全国高速路免费通行，祝大家玩得开心，阖家欢乐
10月1日20点整，我会在中央电视台为大家准备了中秋晚会，不要问我花了多少钱，那不重要，大家开心就好，请大家各自安排好时间进行观看
祝大家国庆、中秋双节快乐！
本作品采用 知识共享署名-相同方式共享 4.0 国际许可协议 进行许可
-
iM说道：
Private Sub Command1_Click() Command1.Caption = "继续" Timer1.Enabled = True Command1.Enabled = False Command2.Enabled = True End Sub Private Sub Command2_Click() Timer1.Enabled = False Command2.Enabled = False Command1.Enabled = True End Sub Private Sub Form_Load() Command1.Caption = "开始" Command2.Caption = "停止" Timer1.Interval = 50 Timer1.Enabled = False Label1.Caption = "热烈欢迎" Label1.AutoSize = True Label1.FontSize = 16 Label1.FontBold = True End Sub Private Sub Timer1_Timer() If Label1.Left < Width Then Label1.Left = Label1.Left + 20 Else Label1.Left = 0 End If End Sub
Google Chrome 
Windows 7 -
hdjjd说道：
同乐
QQbrowser 
Android 10