在text1中输入一串字符,单击命令按钮command1,统计字符串中字母、数字、下划线的个数,并在标签label2上输出。
(1)结合界面与代码,可知当前窗体(不包含窗体本身)中共有
①__类,
②__个对象,若要让文本框text1显示为空,应该修改文本框text1的
③___属性。
(2)对代码进行填空。

Private Sub Command1_Click(___)
Dim s,ch as string
Dim a,b,c as integer
a=0:b=0:c=0
_____________________
④For i=1 to_______
⑤_________________
⑥ ‘取第i个字符ch
If ______________________________
⑦then ‘如果ch是字母则a计数器加1
a=a+1
Elseif ch>=”0” and ch<=”9 ” then ‘若是数字则数字计数器b加1
b=b+1
Else
c=c+1
End if
_______________
⑧ Text2.text=str(a)
Text3.text=str(b)
Text4.text=str(c)
End sub