VB：下面是我利用定时器控件实现模拟打字效果，逐一显示字符；为什么运行不了，哪位大神能给我找下原因。

Dim n%, wz$, T As Boolean
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Form_Load()
wz = "感谢您使用本程序！"
n = 0
End Sub
Private Sub Timer1_Timer()
n = n + 1
Label1.Caption = Mid(wz, l, n)
If n = Len(wz) Then
Timer1.Enabled = False
Timer2.Enabled = True
Label1.Caption = wz
End If
End Sub

Private Sub Timer2_Timer()
If T Then
Label1.BackStyle = 1
Label1.BackColor = QBColor(0)
Else
Label1.BackStyle = 0
End If
T = Not T
End Sub

Label1.Caption = Mid(wz, l, n) 参数中间那个是1 还是小写L

Private Sub Command1_Click()
Timer1.Enabled = True
n=0 '这里n初始一下
End Sub

期待看到有用的回答！

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息