![[单项选择题] 编写如下事件过程： Private Sub Form Click()Dim Char As String，i As IntegerConst ch$="#"msg](http://www.mshxw.com/aiimages/31/257468.png "[单项选择题] 编写如下事件过程： Private Sub Form Click()Dim Char As String，i As IntegerConst ch$=\"#\"msg")
[单项选择题] 编写如下事件过程： Private Sub Form Click()Dim Char As String，i As IntegerConst ch$="#"msg$= "Enter a String："char=InputBox$(msg$)n=Len(Char)For i=1 To n If Mid$(char，i，1)=ch$ Then Exit For End IfNext iPrint i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话框，按所给参数给出提示，等待用户输入，并返回输入的内容。程序运行后，单击窗体，如果在输入对话框内输入字符串“12ab$%*/#fg”，则窗体上输出
A．2
B．2
C．5
D．8
参考答案：
D解析：[分析]： 该程序代码的功能是：在输入字符串中，对字符“#”前的字符个数进行统计：无“#”时，即统计该字符串的长度(或字符个数)；有“#”时，则计算“#”符号左边的字符个数。在“12ab$%*/#fg”中，“#”前有8个字符，窗体上输出8。问题解析:
解析无
