d=a:
a=c:
c=d
EndIf
If_____Then
d=b:
b=c:
c=d
EndIf
Printa,b,c
8在Selectcase结构中应至少包含一个______子句。
9窗体的属性可在属性窗口中设置，也可在程序中用______语句动态设置。
10有如下Sub过程:
Subind（aAsInteger）
StaticxAsInteger
x=x+a
Printx;
EndSub
以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为______。
PrivateSubCommand1_Click（）
Ind
（2）
EndSub
11逻辑常量值为TRUE或_______。
12货币类型的数据小数点的位置是固定的，精确到小数点后_____位。
13表达式（2+8*3）/2的值是______。
14以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。
IfX___2=____ThenPrintX
15当对窗体中的对象进行_____操作时，VisualBasic就会显示该对象的代码窗口。
16下列程序的执行结果是____。
T=O:
m=1:
Sum=0
Do
t=t+m:
Sum=Sum+t:
m=m+2
LoopWhilem<=9
PrintSum
17一组具有相同名称，不同下标的下标变量称为______。
18给定年份，下列程序用来判断该年是否闰年，请补充完该程序。
提示：
闰年的条件是年号可以被4整除但不能被100整除，或者能被400整除。
PrivateSubCommand6_Click（）
DimyAsInteger
y=InputBox（"请输入年号"）
If（yMod4=0______yMod100<>0）or（yMod400=0）Then
Print"是闰年"
ElsePrint"是普通年份"
EndIf
EndSub
19设a=2,b=3,c=4,d=5下列a>bandc<>dorc=a表达式的值是_____。
20表达式：
"1"&"2"="12"的值是_______。
21为了能自动放大或缩小图象框中的图形以与图象框的大小相适应,必须把该图象框的Stretch属性设置为______。
22根据变量的定义位置和所使用的变量定义语句的不同，VB中的变量可以分为3类，即_____、模块变量和全局变量。
23表达式3>4and7=5的值是______。
24以下的程序用来输出100到2000间不能被3整除的数字，请补充完该程序。
PrivateSubCommmand1_Click（）
DimxAsInteger
x=100
DoUntilx>_____
IfxMod3<>0Then
Printx
EndIf
x=x+1
Loop
EndSub
25下列程序段的执行时，共循环____次。
Fora=0To1
Forb=1To2
Forc=1To3
I=I+1
Nextc
Nextb
nexta
26以下程序计算2到50间所有偶数的和，请补充完该程序
Submult（）
DimSumAsInteger
Sum=0
DimIasinteger
For___to50
IfIMOD2=___Then___
NextI
Printsum
EndSub
27A=7,B=3,C=4,则表达式AMOD3+B^3/C\5的值为____。
28下列循环语句，要求和数达到10既停止累加，退出循环，请补充完程序。
Forj=1to10
s=s+j
Ifs>=10thenExit____。
Nextj
29下列程序段的运行结果是：
SubForm1_Click（）
DimnasInteger
I=21:
n=3
DoWhileI>n
I=I-n
Loop
PrintI
EndSub
打印结果_____。
30VisualBasic中的常量分为两种，一种是直接常量，一种是____常量。
31VisualBasic提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个______。
32一个程序最多可以有________窗体。
33将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为_______。
34要选择多个不相邻的控件，按住_______或SHIFT键不放，再单击要选择的控件。
35表达式：
"1"+"2"="3"的值是_______。
36______属性用来设置窗体的标题。
它确定和改变显示在窗体的标题栏中的文本。
37假定有一个文本框，其名称为Textl，为了使该文本框具有焦点，应执行的语句是______。
38执行下面的程序段后，s的值为____。
S=5
ForI=2.6To4.9Step2
s=s+1
NextI
39表达式“12345”<>“12345”&“ABC”的值是_____。
40下列程序用来计算1+2+3……+10的值，请补充完程序。
Dimt,kassingle
K=0
DOWhilek<10
K=k+1:
______
loop
printt
41下列程序段的执行后输出的结果为_______。
K=1
ForI=1To3
A=I^I^K
NextI
PrintA
42下列程序是用来计算1＋2＋3……＋10的程序段，请补充完该程序。
DimI,s,kAsInteger
s=0:
k=0
For____To-1
k=k+1:
s=s+k
NextI
Prints
43执行inputbox函数后，会产生一个对话框，对话框上通常有两个按纽，它们是_____按纽和取消按钮。
44下列程序的执行结果是_____。
M1=1:
m2=1
DoWhilem2<>6
m1=m1*m2:
m2=m2+1
Loop
Printm1
45下列程序的执行结果是_____。
PrivateFunctionP（NAsInteger）
ForI=1ToN
SUM=SUM+1
NextI
P=SUM
EndFunction
PrivateSubCommand1_Click（）
S=P
（1）+P
（2）+P（3）+P（4）
PrintS;
EndSub
46货币型数据的类型标识符为______。
47以下程序用来输出1到100所有奇数的和，请补充完该程序。
PrivateSubCommand3_Click（）
DimsAsLong
DimxAsInteger
s=0
Forx=1to100step____
s=s+x
Nextx
Prints
EndSub
48
假设有一复选框控件，名为Check1，在程序中，我们用“check1.value=1”语句设置Value属性的值，则该程序执行后，复选框处于____状态。
49激活属性窗口的快捷键是______。
50下列程序的执行结果是_______。
A=75
Ifa>60Then
I=1
ElseIfa>70Then
I=2
ElseIfa>80Then
I=3
ElseIfa>90Then
I=4
EndIf
PrintI
51下列程序段的运行后t的值为______。
Dimt,kassingle
k=5:
t=1
doWhilek>=-1
t=t*k:
K=K-1
loop
52执行语句“a=6=5”后，变量a的值为______。
53下面程序段的输出结果是_____。
P=0:
s=0
Do
p=p+2
s=s+p
LoopWhilep<11
Print"s="&s
54下面程序段的输出结果是______。
ForX=1.5To5Step5
PrintX;
NextX
55执行下面的程序段后，s的值为______。
S=5
ForI=2.6To4.9Step0.6
s=s+1
NextI
56表达式Fix（-32.68）+Int（-23.02）的值为______。
57在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
a=InputBox（"请输入一个整数"）
b=InputBox（"请输入一个整数"）
Printa+b
EndSub
程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出结果为____。
58执行下面的程序段后，b的值为_____。
A=300:
b=20
a=a+b:
b=a-b:
a=a-b
59VisualBasic的对象是________和_______的总称。
60图片框的默认属性为_______（提示：
该题只填写英文，如Name事件，只写Name即可）。
61滚动条响应的重要事件有_______和_______（提示：
该题只填写英文，如Click事件，只写Click即可）。
62下列程序段执行后x的值是______。
X=100:
y=50
ifx>ythenx=x-yelsex=x+y
63表达式32/2^3-3*2^2+4^2的值是_______。
64下列程序用来将变量X，Y的值互换，请补充完程序（提示：
该题答案中不要出现空格）。
T=Y:
______:
X=T
65有如下程序，该程序的运行结果是______。
A=20:
b=10
printa>b
66表达式15+3*3/9*5\5mod10的值是______。
67有如下程序，该程序的运行后输出的结果是______。
PrivatesubCommand1_Click（）
I="AAAAAA"
S=Mid（I,4,3）&"BBB"
PrintS
EndSub
68有一数组定义语句：
dimM（-2to1）asstring，该语句定义的数组M中包含____个元素。
69设有数组声明语句：
Optionbase1dimA（3,-2to1），则数组A中有_____个元素。
70有数组定义语句：
dimI（99,99）asInteger，则数组I中共包含有______个元素。
71下面程序段执行后的结果是_____。
X=10
ForI=6.3to4.9Step-0.3
x=x-1
Next
Printx
72表达式：
5\2*3的值是______。
73表达式：
Mid（"SHANGHAI",6,3）的值是______。
74表达式Int（Rnd（0）+1）+Int（Rnd
（1）-1）的值是_____。
75VB程序设计中三种基本结构分是：
_______结构、选择结构和_______结构。
76______是构成文件的最基本的单位。
77顺序文件与随机文件相比较，占用内存资源较小的文件是______文件。
78随机文件是以_______为单位读写，二进制文件以_______为单位读写。
79随机函数Rnd（X），当X=_____时返回最近一次调用Rnd函数生成的随机数。
80语句x=inputbox（"请输入数据"）,输入12345,则x的值为______类型的数据（提示：
例如整型，Int；字符型，String）。
81x,y中至少有一个变量小于变量z的VB表达式为x82以下程序段的输出结果是____。
Num=0
Whilenum<=2
num=num+1
Wend
Printnum
83如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为______。
84在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件、随机文件和______。
85如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中______个选项按钮（提示：
该题答案只填写数字，如：
1，2，3，4）。
86以下语句的执行结果是____。
I=Format（5459.4,"##,##0.00"）
PrintI
87在VB中，关系运算符号一共有____种。
（提示：
该题答案只填写数字，如：
1，2，3，4）。
88过程的作用域分为________、________。
89在windows环境下，菜单分为_______菜单和_______菜单
90VB中算术表达式5+2^2的值为
91VB中表达式Int（5.8）的值为______。
92启动VB6.0时，VB6.0默认的工程类型是_______工程。
93在窗体上添加一个命令按钮，然后编写如下事件过程
PrivateSubCommand1_Click（）
DimaAsInteger
DimbAsInteger
a=5
b=6
Printa*b
EndSub
程序运行后，单击命令按钮，输出的结果为。
94逻辑运算时，参与运算的两个量都是True，结果才会是True的逻辑运算是_____运算（提示：
该题答案不能出现汉字）。
95VB工程文件的扩展名是______
96有如下程序段，该程序段的执行结果是____。
ForI=1To3
Forj=1To3
n=n+1
Nextj
m=m+n
NextI
Printm
97VB赋值语句中的“=”称为
98设有以下的循环：
x=1
Do
x=x+2:
Printx
LoopUntil____。
程序运行后，要求执行3次循环体，请补全以上程序。
99VB中算术表达式23\10的值为
100对于Commandbutton控件，Picture属性用于给按钮加一个图形，只有当_______属性的属性值设置为1时，该属性才有效。
101在VB中根据不同的情况做出不同的选择，执行不同的操作，这种程序设计结构称为
结构
102若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置_______属性。
103设置计时器事件之间的间隔要通过计时器的_____属性
104下列程序段的执行结果是_____。
K=0
Forj=1to2
ForI=1to3
k=I+1
NextI
ForI=1To7
k=k+1
NextI
Nextj
Printk
105PrivateSubCommand1_Click（）
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
Loop
Printa
EndSub
输入5,4,8,5,8,-1，在窗体上显示
106程序运行时，单击水平滚动条右边的箭头，滚动条的Value属性值增加一个_______量。
107如果希望使用变量x来存放数据687543．123456，应将该变量x声明为_____类型的变量。
108有如下程序段，该程序段执行完毕后，共循环了_____次。
ForI=1to2
ForJ=1toI
Fork=1toJ
Print"a"
NextK
NextJ
NextI
109表达式2^3＞3And5＜10的值是
110在窗体上添加一个命令按钮，名为Command1,事件过程如下：
PrivateSubCommand1_Click（）
a=InputBox（"请输入a的值"）
a=Val（a）
b=InputBox（"请输入b的值"）
b=Val（b）
a=a+b
Printa
EndSub
程序运行后，单击命令按钮，依次在输入对话框中输入1,1后，输出的结果是______。
111表达式5*2+3/4\2^2的值是_____
112如果命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frml，请对以下事件过程填空。
PrivateSubCmdopen
__________
EndSub
113要改变窗体的标题，应当在属性窗口中改变的属性是
114______属性为列表框中的每个列表项设置一个对应的数值，它是一个整数数组，数组大小与列表项的个数一致。
115在窗体上画一个命令按钮（其Name属性为CommAnd1），然后编写如下代码：
PrivateSubCommAnd1_Click（）
DimM（10）AsInteger
Fork=1To10
M（k）=12-k
Nextk
x=6
PrintM（2+M（x））
EndSub
程序运行后，单击命令按钮，输出结果是______。
116当程序开始运行，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的属性窗口中，把此文本框的____属性设置为空。
117将数据从内存写入随机文件，写入语句的格式是______[#]文件号，[记录号]，自定义变量名。
118编写如下代码：
PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）
IfButton=1AndShift=2Then
Print"MultipleChoice"
EndIf
EndSub
程序运行后，要在窗体上输出“MultipleChoice”，则应在按下____的同时单击鼠标左键。
119在VB中执行程序语句时，需要对其中的某些语句重复执行多次，程序设计中应使用
120若要使标签控件显示时，不覆盖其背景内容，应设置标签的______属性。
升级会员 