南京工业大学vb期末复习3Word文档下载推荐.docx
《南京工业大学vb期末复习3Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《南京工业大学vb期末复习3Word文档下载推荐.docx（32页珍藏版）》请在冰豆网上搜索。
A、A
B、B
C、C
D、D
5、下列程序：
PrivateSubForm_Click（）
Forj=1To15
a=a+jMod3
Nextj
Printa
运行后输出的结果是__________。
A、1
B、15
C、90
D、120
6、下列程序
a=InputBox（"
请输入"
）
b=InputBox（"
Printa+b
运行时输入3和4输出的结果是________。
A、7
B、34
C、3+4
D、出错
7、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
StaticAAsInteger
StaticBAsInteger
Cls
B=2
B=B+3
A=3+A
printA,B
程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为___________。
A、35
B、66
C、95
D、33
8、在窗体上添加一个命令按钮，名为Command1，一文本框，名为Text1,则执行如下事件过程后，文本框中的输出为______。
Fori=1To4
x=3
Forj=1To3
Fork=1To3
x=x+3
Nextk
Nexti
Text1.Text=Str（x）
A、6
B、12
C、18
D、30
9、在窗体中添加一个命令按钮，并编写如下程序代码：
DimyAsInteger
y=0
DoWhiley<
7
y=y+2
MsgBoxy
程序运行后，消息对话框中显示__________。
A、0
B、7
C、8
D、2
10、设有如下语句：
strl=InputBox（"
输入"
"
"
练习"
）从键盘上输入字符串"
示例"
后，strl的值是________。
A、“输入”
B、“”
C、“练习”
D、“示例”
11、在单击窗体中的按钮Command1第3次后，如下程序打印结果是____。
StaticaASInteger
a=a+1
SelectCasea
Case1:
Print"
欢迎大家"
Case2:
Print"
努力就能成功
Case3:
希望你能通过考试"
Case4:
再见"
A、“欢迎大家”
B、“努力就能成功”
C、"
D、“再见”
12、下面是计算1~100奇数的和的程序，请补充完整，填空应为_______。
<
br/>
PrivateSubCommand1_Click（）<
DimsAsLong,xAsInteger<
s=0<
Forx=____________Step-2<
s=s+x<
Nextx<
Prints<
A、100To1
B、1To100
C、99To1
D、1To99
13、在窗体上建立3个文本框：
Text1、Text2、Text3，如果在Text1中输入200，在Text2中输入150，则执行下列程序段后，Text3的值为______。
DimmAsInteger,nAsInteger<
m=Val（Text1）<
n=Val（Text2）<
Ifn*m=0ThenExitSub<
Ifm&
lt;
nThen<
t=m:
m=n:
n=t<
EndIf<
Do<
r=mModn<
m=n<
n=r<
LoopWhiler&
&
gt;
0<
Text3=m（）
A、200
B、150
C、100
D、50
14、<
p>
下列程序段的执行结果为____________。
/p>
x=Int（（69-60）*Rnd+60）<
SelectCasex<
CaseIs&
=90<
Print&
quot;
优秀&
Case80To89<
良好&
Case60To79<
合格&
CaseElse<
不合格&
EndSelect<
A、优秀
B、良好
C、合格
D、不合格
15、假设X的值是5，则执行以下语句时，可得到的输出结果是ABCDEF的SelectCase语句是________。
A、SelectCaseX
Case10TO1
Print“ABCDEF”
B、SelectCaseX
CaseIs>
15,Is<
5
Print“ABCDEF”
C、SelectCaseX
5,1,3,TO10
D、SelectCaseX
Case1,3,Is>
16、下面程序的运行结果是________。
PrivateSubCommand1Click（）
x=1:
y=1
Fori=1TO3
x=x+y:
y=y+x
Printx;
y
A、66
B、58
C、1321
D、3435
17、下面程序的内层循环次数是________。
Forj=1TOi
Fork=jTO3
...
Nexti（）
A、3
B、14
C、9
D、21
18、下列程序运行后的输出结果是________。
PrivateSubCommand1_Click（）
Forj=0TOi-1
k=k+1
nextj
nexti
printk
B、5
C、4
D、3
19、结构化程序设计方法的核心是规定了三种基本结构：
________结构、分支结构、循环结构。
A、条件
B、顺序
C、当型
D、逻辑
20、计算机算法可以分为两大类：
一类是________________算法，另一类是________________算法。
A、计算机辅助设计、财务
B、数值计算、非数值计算
C、步骤管理、通信
D、排序、查找
21、下列循环能正常结束循环的是____________。
A、i=5
Do
i=i+1
LoopUntili<
B、i=1
i=i+2
LoopUntili=10
C、i=10
LoopUntili>
D、i=6
i=i-2
LoopUntili=1
22、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是____________。
A、Ifsex="
男"
Andage<
40AndInStr（duty，"
教授"
）>
0Thenn=n+1
B、Ifsex="
Andage<
40and（duty="
orduty="
副教授"
）Thenn=n+1
C、Ifsex="
40AndRight（duty,2）="
Thenn=n+1
D、Ifsex="
Andage=40Andduty="
Andduty="
23、在窗体Form1上，有一个列表框控件List1，在窗体的Click事件中有如下代码:
DimkAsInteger
DimentryAsString,itemAsString
entry="
EDCBA"
Fork=Len（entry）To1Step-1
item=LCase（Mid（entry,k,1））&
k
List1.AddItemitem
运行此程序，单击窗体后在窗体的列表框中显示的第四个列表项内容是_________。
A、b4
B、b2
C、d3
D、d2
24、在过程中有语句ForI=N1ToN2StepN3，在该循环体内有下列四条语句，其中________会影响循环执行的次数。
①N1=N1+I②N2=N2+N3③I=I+N3④N3=2*N3（）
A、①②
B、①②③
C、③
D、①②③④
25、下列循环能正常结束循环的是____________。
BR/>
Do<
i=i+1<
LoopUntili&
i=i+2<
LoopUntili=10
i=i-2<
LoopUntili=1
26、执行以下语句后，a的值为____________。
DimaAsInteger<
a=1<
DoUntila=100<
a=a+2<
Loop（）
A、99
B、100
C、溢出
D、101
27、表达式（-1）*sgn（-100+int（rnd*100））的值是__________.（）
B、1
C、-1
D、随机数
28、在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符________________，表示下一行是当前行的继续。
A、一个空格加一个下划字符（_）
B、一个下划字符（_）
C、直接回车
D、一个空格加一个连字符（—）
29、在一个语句行内写多条语句时，语句之间应该用___________分隔。
A、逗号
B、分号
C、顿号
D、冒号
30、下列叙述中不正确的是___________.（）
A、变量名的第一个字符必须是字母
B、变量名的长度不超过255个字符
C、变量名可以包含小数点或者内嵌的类型声明字符
D、变量名不能使用关键字
31、VisualBasic认为下面___________组变量是同一个变量。
A、A1和a1
B、Sum和Summary
C、Aver和Average
D、A1和A_1
32、下列有关数组的说法中，不正确的是________。
A、在窗体模块中不可以定义全局数据组
B、可以使用Erase语句释放所有数组所占据的存储储空间
C、语句DimX（3.6+2）AsInteger定义了一个维上界是6的一维的整型数组
D、形参数组的类型可以是定长符串类型
33、在窗体模块的通用声明处用下面的语句声明变量、数组，正确语句有________个。
①PublicA（5）AsInteger
②PublicNAsInteger
③PublicStAsString
④Privateb（）AsInteger（）
A、2
B、3
D、1
34、对窗体编写如下代码：
OptionBase1
a=Array（237,126,87,48,498）
m1=a
（1）
m2=1
Fori=2To5
Ifa（i）>
m1Then
m1=a（i）
m2=i
EndIf
Printm1;
m2
程序运行后，按回车键，输出结果为_________。
A、484
B、2371
C、4985
D、4984
35、在窗体上添加一个命令按钮，名为Command1，事件过程如下。
执行结果是________。
Subpb（b（）AsInteger）
Fori=1To4
B（i）=2*i
Dima（1To4）AsInteger
a
（1）=5:
a
（2）=6:
a（3）=7:
a（4）=8
pba
Printa（i）;
A、2468
B、1357
C、36612
D、481216
36、在窗体上画一个命令按钮，然后编写如下事件过程：
DimaAsVariant
a=Array（1,2,3,4）
j=1
Fori=4To1Step-1
s=s+a（i）*j
j=j*10
Prints
运行上面的程序，单击命令按钮，其输出结果是_____________。
A、4321
C、34
D、1234
37、程序代码如下，当单击窗体上Command1控件时，窗体上显示的结果是_________。
DimiAsInteger
Dimx（3,3）AsInteger
Fori=1To3
x（i,j）=（i-1）*3+j
Printx（i,4-i）
A、159
B、147
C、357
D、369
38、以下程序的输出结果是_________。
Dima（10）AsInteger,p（3）AsInteger
k=5
Fori=1To10
a（i）=i
Fori=1To3
p（i）=a（i*i）
k=k+p（i）*2
Printk
A、33
B、28
C、35
D、37
39、当发生Command1_Click事件后，程序输出结果是________。
OptionBase1<
Dima（4,4）AsInteger,iAsInteger,sAsInteger<
s=0<
Fori=1To4<
Forj=1To4<
a（i,j）=（i-1）*4+j*2<
Nextj<
Nexti<
Fori=1To4<
s=s+a（i,i）<
Prints<
A、28
B、32
C、30
D、44
40、下列程序段的输出结果是____________。
DimiAsInteger<
Dima（8）AsInteger<
y=18:
i=0<
a（i）=yMod2<
i=i+1<
y=y\2<
LoopUntily&
1<
Forj=i-1To0Step-1<
Printa（j）;
Nextj（）
A、1000
B、10010
C、00110
D、10100
41、下列程序的输出结果是____________。
DimiAsInteger,kAsInteger<
Dima（10）AsInteger,p（3）AsInteger<
k=5<
Fori=0To9<
a（i）=i<
Fori=0To2<
p（i）=a（i*（i+1））<
k=k+p（i）*2<
Printk（）
A、17
B、21
C、22
D、23
42、下列程序段的执行结果是________。
DimA（3,3）
ForM=1TO3
ForN=1TO3
IfN=MOrN=3-M+1Then
A（M,N）=1
Else
A（M,N）=0
NextN
NextM
PrintA（M,N）;
Print
NextM（）
A、100
010
001
B、111
111
C、000
000
D、101
101
43、下列程序段的输出结果是________。
DimA（5）
ForI=0TO4
A（I）=I+1
M=I+1
IfM=3Then
A（M-1）=A（I-1）
A（M）=A（I）
IfI=3ThenA（I+1）=A（M-4）
PrintA（I）;
NextI（）
A、11122
B、21144
C、12245
D、22141
44、以下程序输出的结果是____________。
Dima
a=Array（1,2,3,4,5,6,7）
Fori=Lbound（a）ToUbound（a）
a（i）=a（i）*a（i）
Printa（i）（）
A、49
B、0
C、不确定
D、程序出错
45、如下数组声明语句，则数组a包含元素的个数有____________。
Dima（3,-2to2,5）（）
A、120
B、75
C、60
D、13
46、如下二维数组声明语句，____________正确。
A、Dima[3，4]AsInteger
B、Dima（3，4）AsInteger
C、Dima（n，n）AsInteger
D、Dima（34）AsInteger
47、以下有关数组的说明中，错误的是________。
A、根据数组说明的方式，可将数组分为动态数组和静态数组。
B、在过程中，不能用Private语句定义数组。
C、利用ReDim语句重新定维时，不得改变已经说明过的数组的数据类型。
D、数组重新定维后，原有的数组元素内容将不予保留。
48、OptionBase1
Dima%（3,3）
Ifj>
1Andi>
1Then
a（i,j）=a（a（i-1,j-1）,a（i,j-1））+1
a（i,j）=i*j
Printa（i,j）;
"
;
A、123
231
323
B、123
123
C、123
246
36
升级会员 