1、点击桌面上的“Visual Basic6.0”
2、选择“标准EXE”，单击“打开”。
3、分别在窗体中创建一个label控件、两个command控件、一个timer控件。
4、把label的caption改成“欢迎来到VB！”，command1的caption改成“手动”，command2的caption改成“自动”。
5、最后呈现出的效果如图所示。
6、双击点开编辑代码窗口。Timer1.Enabled = FalseLabel1.Top = Label1.Top + 50If Label1.Top >= Me.Height ThenLabel1.Top = 0End IfEnd SubPrivate Sub Command2_Click()Timer1.Interval = 100Timer1.Enabled = TrueEnd SubPrivate Sub Form_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Label1_Click()End SubPrivate Sub Timer1_Timer()Label1.Top = Label1.Top + 50If Label1.Top >= Me.Height ThenLabel1.Top = 0End IfEnd Sub
7、点击F5查看运行效果，点击“自动”label就会自动从上到下移动，点击“手动”便会切换成手动，在任意地方单击，label就会停止。
