对不起，我是新手。能不能帮帮我
Private Sub Timer2_Timer()Dim s1, s2 As String
Dim i As Integer
s1 = Label2.Caption
i = 1
让字一个一个出来，写：
If i <= Len(s1) Then
s2 = s2 & Mid(s1, i, 1)
i = i + 1
Else
Timer2.Enabled = False
Timer2.Enabled = True
Label2.Visible = False
End If
Label2.Caption = s2
End Sub
这样为什么不对？
