计算机二级
执行下面的程序，单击命令按钮后，窗体中的输出结果是 ______。 Private Sub Cotomand1_Click() Ch$="Welcome Home!" a=Len(ch$) For i= 1 To a b$ = Mid(ch$， i 1) If b$ = "m" Then m = m + 1 Next 1 Print m End SubA．2B．3C．1D．0
题目
执行下面的程序，单击命令按钮后，窗体中的输出结果是 ______。 Private Sub Cotomand1_Click() Ch$="Welcome Home!" a=Len(ch$) For i= 1 To a b$ = Mid(ch$， i 1) If b$ = "m" Then m = m + 1 Next 1 Print m End Sub
A．2
B．3
C．1
D．0
参考答案和解析
解析：题中程序的功能是统计字母m在字符串“WelcomeHome!”中出现的次数。程序中有两个字符串函数，Len()和Mid()。Len()函数的作用为计算字符串中字符的个数，而Mid()函数的作用为取子串。题中依次选取字符串中的字母，与字符“m”进行比较，所以答案选A。
相似问题和答案
第1题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。
第2题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。
第3题：
在窗体上有一个命令按钮，然后编如下事件过程：
程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 。
-1的平方根是一个虚数
【解析】在Sub过程中，定义了一个Double型变量N，并调用InputBox函数，给N赋值，即将从对话框中输入的-1赋给N；通过运算符”&”，将N与字符串”的平方根”连接起来并赋给Msg；在条件块语句中将N作为参数，调用SR事件过程，将Function过程的返回值作为测试表达式；在SR函数中，调用Sgn函数测试x的值为正数还是负数，如果是正数，那么就执行条件块语句中的SR=Sqr(x)，即将X的平方根作为返回值，如果x值为零，Sgn函数返回值为零，那么就将0作为返回值；如果为负数。Sgn函数返回值为-1，SR=-1，即将-1作为返回值；在Sub程序的条件块语句中，根据SR返回值的不同，执行不同操作，当返回值为0，将Msg字符串加”是0”，赋给Ms9，如果是-1，将Msg加”是一个虚数”赋给Msg，当为其他时，即在平方根时，将字符串Msg加”是”，再加上这个数的平方根赋给Msg，并用MsgBox函数输出。
第4题：
执行下面这段程序后，单击命令按钮，窗体中输出结果是 ______。 Private Sub Command1_Click() a=1 : b=4 : c = 9 : d = 5 If a ＜ b Then If c＜d Then x=True Else If a＜c Then x=False Else x=True End If End If End If Print Val(x) End Sub
A．True
B．False
C．0
D．1
解析：当ab为真时，程序继续进行；当cd为假时，执行else分支；当ac为真时，执行x=False，跳出三层If语句，执行输出语句。Val函数返回字符对应的数值，Val(x)为0，在窗体中输出结果。
第5题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果是（ ）。
A. 输出0
B. 输出25
C. 输出45
D. 无任何输出
D) 【解析】本题考查VB程序的执行特点。程序执行时，布尔型变量SW默认为False，单击命令按钮后弹出对话
框，在该对话框中输入25之后，始终没有在窗体上单击鼠标，因而没有改变SW的值，所以没有进行fun函数过程的调用，也就无
任何输出。
第6题：
窗体上命令按钮Command1的事件过程如下：
End Sub 该程序执行后，输出结果是（ ）。
A) 【解析】本题考查二维数组元素的赋值。二维数组中a中第i行j列元素为(i-1)*3+j，i、J分别从3变化到4，因此，输出a(3，3)、a(3，4)、a(4，3)、a(4，4)的元素为：9 10 12 13。
第7题：
在窗体上画一个名为Commandl的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是（ ）。
A. 4
B. 5
C. 6
D. 8
A) 【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k，因此M(6)数据为6，M(8)为4。
第8题：
在窗体下添加一个命令按钮(名为CommandI)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为（ ）。
A. 10
B. 20
C. T
D. F
本题考查IIf函数的知识。对于Ilf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。
第9题：
在窗体上画一个命令按钮，然后编写如下程序(假定变量x是—个窗体级变量)
Dim x As Integer
Sub inc(a AS Integer)
X=K+a
End Sub
Private Sub Command1_Click()
inc2
inc3
inc4
Prmt x；
Ead Sub
程序执行后，单击Command1命令按钮，输出的结果是【 】。
9 解析：inc函数每执行一次就向x上累加一次传入的参数，所以最后x的值为：2+3+4=9。