计算机二级
相似问题和答案
第1题：
以下程序段运行后，消息框的输出结果是（ ）。 a=10b=20c=a<；bMsgBox c+l
A.一1
B.0
C.1
D.2
B．【解析】本题考查VBA中表达式运算的知识。在VBA中允许逻辑量进行算术运算，True处理成一l，False处理成0。
第2题：
下列程序段运行后，消息框的输出结果是（ ）。 a=sqr（3）b=sqr（2）c=a>；bMsgbox c十2
A.一1
B.1
C.2
D.出错
暂无解析，请参考用户分享笔记
第3题：
执行下面的程序，消息框的输出结果是( )。
Dim a(1 To 10),b(1 To 5)As Integer
sum=0
For i=1 To 10
Next i
For i=1 To 5
Next i
For i=1 To 5
Next i
MsgBox sum
220 解析： 本题考查数组和循环的知识。在本题中出现了两个数组，要注意两个数组的值和下标的对应关系。第一个循环为数组a赋值，每个数组元素值等于其下标值；第二个循环为数组b赋值，分别使b(1)=a(2)=2，b(2)=a(4)=4，b(3)=a(6)=6，b(4)=a(8)=8，b(5)=a(10)=10；第三个循环把b数组的每一个元素平方以后累加起来，最后结果为220。
第4题：
下面程序段执行后消息框的输出结果是（ ）。
A. 1
B. 12
C. 123
D. 1234
本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环：在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题是一个后判断条件的While循环，在循环中首先利用整除10去掉a的最后一位，然后判断当前的a的个位数上的值是否满足循环条件，直至a=12时由于个位数为2不满足继续循环的条件从而退出循环。
第5题：
执行下面的程序，消息框里显示的结果是（ ）。
A. abe
B. abccba
C. cbacba
D. abcabc
本题考查的是字符串函数和循环语句 For…Next的使用。循环语句For…Next能够重复执行程序代码区域特定次数．使用格式加下．
结束条件语句序列
Next【循环变量】
在VBA中有三种取子串函数：Left函数用于在字符串左端开始 取n个字符；Right函数用于在字符串右端开始取n个字符(注意子 串中字符的顺序与母串中相同)；Mid函数可以实现在任何位置取 任何长度的子串。字符串长度检测函数Len(<字符串表达式>或<变 量名>)的作用是返回字符串所含字符数。本题中相当于每次循环从 后向前取得Str中的一个字符连接到S的后面，即最后s的值为 abceba。
第6题：
下列程序段执行后消息框的输出结果是______。
a＝12345
Do
a＝a\10
b＝a Mod 10
Loop While b>＝3
MsgBox a
9 解析： 本题考查VBA中程序设计的知识。对于这个问题，首先注意到循环的次数为6次：然后注意到循环内的两个If语句为顺序关系而不是嵌套关系，第一个If语句只有第一次循环时才会满足；第一次循环时首先执行第一个If语句把x赋值为1，然后执行第二个If语句；以后各次循环均照此分析，前4次循环x自加1，后两次循环x自加2，最后输出结果为9。
第7题：
下面程序段执行后消息框的输出结果是______。
a＝12345
Do
a＝a\10
b＝a Mod 10
Loop While b＞＝3
MsgBox a
12 解析：本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为 False时退出循环，这一点要注意区分清楚。本题是一个后判断条件的While循环，在循环中首先利用整除10去掉a的最后一位，然后判断当前的a的个位数上的值是否满足循环条件，直至a＝12时由于个位数为2不满足继续循环的条件从而退出循环。
第8题：
下面程序段执行后消息框的输出结果是______。
a=12345
Do
a=a\10
b=a Mod 10
Loon While b＞=3
MsgBox a
12 解析：本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题是一个后判断条件的While循环，在循环中首先利用整除10去掉a的最后一位，然后判断当前的a的个位数上的值是否满足循环条件，直至a=12时由于个位数为2不满足继续循环的条件从而退出循环。
第9题：
下面程序段执行后消息框的输出结果是( )。
a=12345
Do
b=a Mod 10
Loop While b＞=3
MsgBox a
12 解析： 本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题是一个后判断条件的While循环，在循环中首先利用整除10去掉a的最后一位，然后判断当前的a的个位数上的值是否满足循环条件，直至a=12时由于个位数为2不满足继续循环的条件从而退出循环。