下列说法正确的是( )
Private Sub Btn_Click ()
Dim s As String, ch As String, n As Integer, i As Integer
Dim n1 As Integer, n2 As Integer, n3 As Integer
n1 =0:n2=0:n3=0
s=Text1. Text
①
ch=Mid (s, 1, 1)
If n<6 Or n>18 Then Text2. Text=“不合法”:Exit Sub′退出当前子程序
If Not (ch>=“a”And ch<=“z”Or ch>=“A”And ch<=“Z”)Then
Text2. Text=“不合法”:Exit Sub
End If
For i=2 To n
ch= Mid (s, I, 1)
If ch>=“a”And ch<=“z”Or ch>=“A”And ch<=“Z”Then
n1=n1+ 1
Elself ch>=“0”And ch=“9”Then
n2=n2+1
ElseIf ch=“_”Then
n3=n3+1
End If
Next i
If ② Then Text2. Text=“不合法”Else text2. Text=“合法”
End Sub
① ②
为使动画一开始便能听到音乐,正确的操作是。