A-A+

编写如下事件过程: Private Sub Form. Click() Dim Char A

2022-08-05 20:43:29 问答库 阅读 172 次

问题详情

编写如下事件过程: Private Sub Form. Click() Dim Char As String,i As Integer Const 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 If Next i Print i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话框,按所给参数给出提示,等待用户输入,并返回输入的内容。程序运行后,单击窗体,如果在输入对话框内输入字符串“12ab$%*/#fg”,则窗体上输出
A.2
B.2
C.5
D.8请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:D
解析:该程序代码的功能是:在输入字符串中,对字符“#”前的字符个数进行统计:无“#”时,即统计该字符串的长度(或字符个数);有“#”时,则计算“#”符号左边的字符个数。在“12ab$%*/#fg”中,“#”前有8个字符,窗体上输出8。

考点:过程,事件