Visual Basic 顺序结构程序选择题Word格式.docx
《Visual Basic 顺序结构程序选择题Word格式.docx》由会员分享，可在线阅读，更多相关《Visual Basic 顺序结构程序选择题Word格式.docx（19页珍藏版）》请在冰豆网上搜索。
y=InputBox（“请输入一个整数”）
y=Val（y）
IfyMod5=0Then
a=a+y
x=y
Else
a=a+x
EndIf
Nexti
Printa
EndSub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为
（A）100
（B）50
（C）120
（D）70
A
（4）表达式Left（"
howareyou"
3）的值是（）
A）how
B）are
C）you
D）howareyou
参考答案：
（5）下列正确的VisualBasic注释语句是（）
A）Dima（10）AsIntegerRem这是一个VB程序
B）这是一个VB程序
PrivateSubCommand1_Click（）…
C）a=1:
b=2:
_Rem这是一个VB程序：
c=3
D）IfShift=6AndButton=2Then
Print"
BBBB"
Rem这是一个VB程序
EndIf
（6）在窗体上画一个命令按钮，然后编写如下代码：
PrivateSubCommand1_Click（）
a&
=InputBox（"
请输入第一个数"
）
b&
请输入第二个数"
Printb&
+a&
EndSub
程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是（）
A）66666
B）5432112345
C）1234554321
D）出错
（7）下列叙述不正确的是（）
A）注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译
B）注释语句可以放在代码中的任何位置
C）注释语句不能放在续行符的后面
D）代码中加入注释语句的目的是提高程序的可读性
参考答案:
（8）设a=2,b=3,c=4,d=5，则表达式Nota<
=cOr4*c=b^2Andb<
>
a+c的值是（）
A）-1
B）1
C）True
D）False
D
（9）假定程序中有如下语句：
answer=MsgBox（"
第一个字符串"
，vbAbortRetryIgnore_OrvbCritical_OrvbDefaultButton3,_"
第二个字符串"
）执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为（）
A）“第二个字符串”
B）5
C）3
D）7
（10）结构化程序设计三种基本逻辑结构是（）
A.选择结构、循环结构和嵌套结构
B.顺序结构、选择结构和循环结构
C.选择结构、循环结构和模块结构
D.顺序结构、递归结构和循环结构
参考答案：
（11）有如下过程代码：
Subvar_dim（）
StaticnumaAsInteger
DimnumbAsInteger
numa=numa+2
numb=numb+1
printnuma;
numb
连续3次调用var_dim过程，第3次调用时的输出是
A）21
B）23
C）61
D）63
（12）设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：
Functionfun（aAsInteger,bAsInteger）
Whilea>
b
a=a-b
Wend
fun=a
EndFunction
在调试时发现函数是错误的。
为使函数能产生正确的返回值，应做的修改是
A）把a=a-b改为a=b-a
B）把a=a-b改为a=a\b
C）把Whilea>
b改为Whilea<
D）把Whilea>
b改为Whilea>
=b
（13）为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程：
Dima%,s%,k%
s=1
a=2
Fork=2To10
a=a*2
s=s+a
Nextk
Text1.Text=s
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是
A）把s=1改为s=0
B）把Fork=2To10改为Fork=1To10
C）交换语句s=s+a和a=a*2的顺序
D）同时进行B）、C）两种修改
（14）设x是整型变量，与函数Ⅱf（x>
0,-x,x）有相同结果的代数式是
A）|x|
B）-|x|
C）x
D）-x
（15）下面不能在信息框中输出“VB”的是
A）MsgBox"
VB"
B）x=MsgBox（"
C）MsgBox（"
D）CallMsgBox"
（16）下面是求最大公约数的函数的首部
Functiongcd（ByValxAsInteger,ByValyAsInteger）AsInteger
若要输出8、12、16这3个数的最大公约数，下面正确的语句是
A）Printgcd（8,12），gcd（12,16），gcd（16,8）
B）Printgcd（8,12,16）
C）Printgcd（8），gcd（12），gcd（16）
D）Printgcd（8,gcd（12,16））
（17）下面程序计算并输出的是
PrivateSubComand1_Click（）
a=10
s=0
Do
s=s+a*a*a
a=a-1
LoopUntila<
=0
Prints
A）13+23+33+…+103的值
B）10!
+…+3!
+2!
+1!
的值
C）（1+2+3+…+10）3的值
D）10个103的和
（18）下面程序运行时，若输入395，则输出结果是
Dimx%
x=InputBox（"
请输入一个3位整数"
PrintxMod10,x\100,（xMod100）\10
A）395
B）539
C）593
D）359
（19）某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中
Open"
out.txt"
ForOutputAs#2
Print"
Text1"
Close#2
调试时发现没有达到目的，为实现上述目的，应做的修改是
A）把Print"
改为Print#2,Text1
B）把Print"
改为PrintText1
C）把Print"
改为Write"
D）把所有#2改为#1
（20）下面程序运行时，若输入“VisualBasicProgramming”，则在窗体上输出的是
Dimcount（25）AsInteger,chAsString
ch=Ucase（InputBox（"
请输入字母字符串"
））
Fork=1ToLen（ch）
n=Asc（Mid（ch,k,1））-Asc（"
A"
Ifn>
=0Then
Count（n）=Count（n）+1
m=count（0）
Fork=1To25
Ifm<
count（k）Then
m=count（k）
Printm
A）0
C）2
D）3
（21）设a=2,b=3,c=4,d=5，则表达式Nota<
a+c的值是（）
（22）假定程序中有如下语句：
）执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为（）
D）7
（23）与传统的程序设计语言相比，VisualBasic最突出的特点是（）
A）结构化程序设计
B）程序开发环境
C）事件驱动编程机制
D）程序调试技术
（24）表达式Left（"
（25）以下说法不正确的是（）
A）VisualBasic是一种可视化编程工具
B）VisualBasic是面向过程的编程语言
C）VisualBasic是结构化程序设计语言
D）VisualBasic采用事件驱动编程机制
（26）可以实现从键盘输入一个作为双精度变量a的值的语句是
A）a=InputBox（）
B）a=InputBox（"
请输入一个值"
）
C）a=Val（Inp
升级会员 