建一个timer1，再建一个label1控件数组，一行排开。label1控件数组的创建方法如下：新建一个Label1，复制它，在窗体内粘贴时，同意创建控件数组，粘贴4次，这样一共就5个Label1啦Private Sub Form_Activate()For i = 0 To 4Label1(i).Caption = Mid("北京欢迎你", i + 1, 1)Label1(i).Visible = FalseNextTimer1.Enabled = TrueTimer1.Interval = 500End SubPrivate Sub Timer1_Timer()Static k As Intege...
