vb循环结构选择题共24页Word文档下载推荐.docx
《vb循环结构选择题共24页Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《vb循环结构选择题共24页Word文档下载推荐.docx（35页珍藏版）》请在冰豆网上搜索。
A、退出整个程序
B、退出当层循环
C、退出最外层循环
D、退出所在子程序
11、Do…loop中使用while关键字时，条件为（B）执行循环体
A、False
B、True
C、0
D、假或真
12、Do…loop中使用until关键字时，条件为（A）执行循环体
13、Do…loop中使用while关键字时，条件为（A）终止循环
14、Do…loop中使用until关键字时，条件为（B）终止循环
15、For…Next循环结构中（C）用来控制循环变量
A、for
B、step
C、next
D、to
16、For…Next循环结构中step用来控制（D）
A、循环变量
B、循环变量初值
C、循环变量终值
D、循环变量增量
17、For…Next循环结构中循环变量初值大于终值时,步长为（A）
A、负数
B、非负数
C、正整数
D、正数
18、For…Next循环结构中循环变量初值小于终值时,步长为（A）
B、负整数
19、For…Next循环结构中next后的循环变量（A）
A、可以省略
B、不可以省略
C、与for后的变量名可以不同
D、与for后的变量不是同一变量
20、For…Next中循环变量初值与终值间使用的关键字是（A）
A、To
B、In
C、goto
D、private
21、For…Next中循环变量初值与终值间使用的关键字是（A）
22、执行下面的程序段后，s的值为（C）
PrivateSubForm_Click（）
StaticsAsInteger
s=5
Fori=1.4To2.1Step0.6
s=s+1
Nexti
Prints
EndSub
A、5
B、6
C、7
D、1
23、下面程序的作用是利用随机函数产生10个100~200之间（包含100、200）的随机数，打印其中为5的倍数的数将程序补充完整（Ａ）
PrivateSubCommand1_Click（）
Form=1To10
x=Int（Rnd*101+100）
If（）Then
Printx;
EndIf
Nextm
A、xmod5=0
B、xmod5==0
C、x/5=0
D、x\5=0
24、设有如下程序：
OptionBase1
Dima（10）,P（3）AsInteger
k=5
Fori=1To10
a（i）=i
Fori=1To3
P（i）=a（i*i）
k=k+P（i）*2
Printk
程序运行后，单击窗体，则在窗体上显示的是（A）
A、33
B、35
C、37
D、38
25、在窗体上画一个命令按纽Command1，然后编写如下事件过程：
PrivateSubCommand1__Click（）
X=0
N=val（inputbox（“n=?
”））
Fori=1ton
Forj=1toi
X=x+1
Nextj
Printx
Endsub
程序运行后、单击命令按钮,输入3,在窗体上显示的内容是（D）
A、9B、44C、5D、6
26、以下能够正确计算n！
的程序是（C）
A、privatesubcommand1__click（）
N=5:
x=1
Do
X=x*1
I=i+1
Loopwhilei<
n
Printx
Endsub
B、privatesubcommand1__click（）
x=1:
i=1
X=x*i
C、privatesubcommand1__click（）
=n
D、privatesubcommand1__click（）
Loopwhilei>
n
27、在窗体上画一个命令按纽Command1，标签Label1然后编写如下事件过程：
Privatesubcommand1_click（）
Fori=1to15
X=2*i-1
Ifxmod3=0thens=s+1
Nexti
Label1、caption=s
Endsub
程序运行后,单击命令按钮,标签中显示的内容是（B）
A、1B、5C、27D、45
28、在窗体上画一个命令按纽Command1，然后编写如下事件过程：
Fori=1to4
Forj=0toi
Printchr$（65+i）
Print
程序运行后,单击命令按钮,窗体中显示的内容是（A）
A、BB
CCC
DDDD
EEEEE
B、A
BB
C、B
CC
DDD
EEEE
D、AA
BBB
CCCC
DDDDD
28、在窗体上画两个名称分别为text1，text2的文本框和一个名称为command1的命令按钮，然后编写如下事件过程：
Dimxasinteger，nasinteger
X=1：
n=0
Dowhilex<
20
X=x*3
N=n+1
Loop
Text1、text=str（x）
Text2、text=str（n）
程序运行后,单击命令按钮,在两个文本框中显示的值分别是（B）
A、15和1
B、27和3
C、195和3
D、600和4
29、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：
Dima（5）,b（5）
Forj=1to4
A（j）=3*j
B（j）=a（j）*3
Nextj
Text1、text=b（j\2）
程序运行后，单击命令按钮，在文本框中显示（B）
A、25
B、18
C、36
D、35
30、下面程序运行时，内层循环的循环总次数是（A）
Form=1To3
Forn=0Tom-1
Nextn
A、6
B、3
C、0
D、9
31、定义语句DimA（-3to3）asInteger，定义数组的元素个数是（D）
D、7
32、执行下面的程序段后，X的值为（C）
X=5
ForI=1to10Step2
X=X+I\5
NextI
A、7
B、10
C、8
D、5
33、如果整型变量a、b的值分别为3和1，则下列语句中循环体的执行次数是（D）
ForI=atob
PrintI
NextI
A、0
B、1
C、2
34、下列关于dowhile…loop和do…loopuntil循环执行循环体次数的描述正确的是（D）
A、dowhile…loop循环和do…loopuntil循环至少都执行一次
B、dowhile…loop循环和do…loopuntil循环可能都不执行
C、dowhile…loop循环至少执行一次，do…loopuntil循环可能不执行
D、dowhile…loop循环可能不执行，do…loopuntil循环至少执行一次
35、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Fori=1To4
a=1
Forj=1To3
a=2
Fork=1To2
a=a+6
Nextk
Printa
程序运行后，单击命令按钮，则在窗体上显示的内容是（A）
A、14
B、15
C、16
D、17
36、设有如下程序：
SelectCasei
Case1,3
a=a+1
Case2,4
a=a+2
EndSelect
程序运行后，单击窗体，则在窗体上显示的内容是（B）
A、6
B、5
C、4
37、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
subss（b（）asInteger）
b（i）=2*i
Dima（1To4）AsInteger
a
（1）=5:
a
（2）=6
a（3）=7:
a（4）=8
ssa（）
Printa（i）
运行上面的程序，单击命令按钮，则在窗体上显示的内容是（B）
A、5678
B、2468
C、1234
D、5768
38、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Functionfun（xAsInteger）
Staticz
y=y+1:
z=z+1
fun=x+y+z
EndFunction
DimxAsInteger
x=1
Fori=1To2
Printfun（x）
程序运行后，如果单击命令按钮，窗体中显示的内容是（B）
A、33
B、34
C、35
D、36
39、若I、n均为整型变量，下列程序段的输出结果为（C）
n=0
IfiMod2=1Thenn=n+1
Printn
B、4
C、5
D、3
40、在窗体中添加一个文本框（其中Name属性为Text1）,然后编写如下代码：
PrivateSubForm_click（）
Text1、Text="
"
Text1、SetFocus
Sum=Sum+i
Text1、Text=Sum
上述程序运行后，单击窗体，则运行的结果（A）
A、在文本框Text1中输出55
B、在文本框Text1中输出0
C、出错
D、在文本框Text1中输出不定值
41、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：
x=0
DoUntilx=-1
a=InputBox（"
请输入A的值"
）
a=Val（a）
b=InputBox（"
请输入B的值"
b=Val（b）
x=InputBox（"
请输入X的值"
x=Val（x）
a=a+b+x
程序运行后，单击命令按钮，依次在输入对话框中输入
1<
CR>
2<
3<
4<
5<
-1<
，则输出结果为（A）
A、8
B、9
C、14
D、15
42、设有如下程序：
程序运行后，单击窗体，则在窗体上显示的是（A）
A、33
43、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：
FunctionF（aAsInteger）
b=0
Staticc
b=b+1
c=c+1
F=a+b+c
DimaAsInteger
DimbAsInteger
b=F（a）
Printb
程序运行后，如果单击命令按钮，则窗体上显示的内容是（A）
A、456
B、123
C、0123
D、234
44、在窗体上画一个命令按钮，名称为Command1。
然后编写如下程序：
PrivateSubCommand1_Click（）
Fora=1To4
Forb=0Toa
PrintChr（65+a）
Nextb
Print
Nexta
EndSub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（B）
A、A
DDDD
B、BB
EEEEE
EEEE
D、B
C
D
E
45、循环是一组重复执行的指令，重复次数由（B）决定
A、int（终值-初值）+1
B、int（（终值-初值）/步长）+1
C、int（（终值-初值）/步长）
D、（终值-初值）/步长
46、假定有以下程序段：
Forj=5To1Step-1
Printi*j
Nextj,i
则语句Printi*j的执行次数是（A）
A、15
B、16
C、17
D、18
47、以下程序段的输出结果是（C）
num=0
Whilenum<
=2
num=num+1
Printnum
Wend
A、135
B、234
C、123
D、012
48、、在窗体中添加一个命令按钮（其Name属性为Command1），然后编写如下代码：
Dimn（）AsInteger
Dima,bAsInteger
Enterthefirstnumber"
Enterthesecondnumber"
ReDimn（aTob）
Fork=LBound（n,1）ToUBound（n,1）
n（k）=k
Printn（k）
程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为（D）
A、01
B、13
C、12
D、23
49、在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：
DoWhilex<
10
x=（x-2）*（x+3）
n=n+1
Text1、Text=Str（n）
Text2、Text=Str（x）
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（B）
A、1和0
B、2和24
C、3和50
D、4和68
50、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
StaticxAsInteger
Cls
Fori=1To2
y=y+x
x=x+2
Next
Printx,y
EndSub
程序运行后，连续三次单击Command1按钮后，窗体上显示的是（B）
A、42
B、1218
C、1230
D、46
51、设有如下程序段：
x=2
Fori=1To10Step2
x=x+i
运行以上程序后，x的值是（B）
A、26
B、27
C、38
D、57
52、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
OptionBase1
Dima
a=Array（1,2,3,4,5）
Fori=1ToUBound（a）
a（i）=a（i）+i-1
Printa（3）
程序运行后，单击命令按钮，则在窗体上显示的内容是（B）
A、4
B、5
C、6
D、7
53、阅读程序
PrivateSubForm_Click（）
Dimarr,Sum
Sum=0
arr=Array（1,3,5,7,9,11,13,15,17,19）
Fori=1To10
Ifarr（i）/3=arr（i）\3Then
Sum=Sum+arr（i）
EndIf
Nexti
PrintSum
程序运行后，单击窗体，输入结果为（C）
A、13
B、14
C、27
D、15
54、执行以下程序段
a$="
abbacddcba"
Fori=6To2Step-2
X=Mid（a,i,i）
Y=Left（a,i）
z=Right（a,i）
z=UCase（X&
Y&
z）
Printz
输出结果为（B）
A、ABA
B、BBABBA
C、ABBABA
D、AABAAB
55、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
DimaAsVariant
a=Array（1,2,3,4,5）
Sum=0
Fori=1To5
Sum=sum+a（i）
x=Sum/5
Fori=1To5
Ifa（i）>
xThenPrinta（i）;
程序运行后，单击命令按钮，在窗体上显示的内容是（D）
A、12
B、12
升级会员 