VB基础练习题Word格式.docx
《VB基础练习题Word格式.docx》由会员分享，可在线阅读，更多相关《VB基础练习题Word格式.docx（20页珍藏版）》请在冰豆网上搜索。
a=8 <
CR>
（<
是回车键，下同）
b=9 <
printa>
b <
则输出结果是（）。
A）-1
B）0
C）False
D）True
7．以下语句的输出结果是（）。
PrintFormat$（32548.5,“000,000.00”）
A）32548.5
B）32,548.5
C）032,548.50
D）32,548.50
8．执行以下程序段后，变量c$的值为（）。
a$="
VisualBasicPrograming"
b$="
Quick”
c$=b$&
UCase（Mid$（a$,7,6））&
Right$（a$,11）
A）VisualBASICPrograming
B）QuickBasicPrograming
C）QUICKBasicPrograming
D）QuickBASICPrograming
9．为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。
A）Value
B）Default
C）Cancel
D）Enabled
10．为了把焦点移到某个指定的控件，所使用的方法是（）。
A）SetFocus
B）Visible
C）Refresh
D）GetFocus
11．设a=6，则执行x=IIf（a>
5,-1,0）后，x的值为（）。
A）5
B）6
C）0
D）-1
12．执行下面的程序段后，x的值为（）。
x=5
Fori=1To20Step2
x=x+i5
Nexti
A）21
B）22
C）23
D）24
13．在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
Fori=1To4
x=4
Forj=1To3&
nbsp;
x=3
Fork=1To2
x=x+6
Nextk
Nextj
Printx
EndSub
程序运行后，单击命令按钮，输出结果是（）。
A）7
B）15
C）157
D）538
14．在窗体上画一个命令按钮，然后编写如下事件过程：
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
程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为（）。
A）2
B）3
C）14
D）15
15．在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：
a=Text1.Text+Text2.Text
PrivateSubForm_Load（）
Text1.Text="
"
Text2.Text="
Endsub
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（）。
A）444
B）321123
C）123321
D）132231
16．阅读下面的程序段：
Fori=1To3
Forj=1Toi
Fork=jTo3
a=a+1
Nextk
Nextj
执行上面的三重循环后，a的值为（）。
A）3
B）9
C）14
D）21
17．在窗体上画一个文本框（其中Name属性为Text1），然后编写如下事件过程：
Text1.SetFocus
Fori=1To10
Sum=Sum+i
Text1.Text=Sum
上述程序的运行结果是（）。
A）在文本框Text1中输出55
B）在文本框Text1中输出0
C）出错
D）在文本框Text1中输出不定值
18．在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：
PrivateSubCommand1_Click（）
DoWhilex<
50
x=（x+2）*（x+3）
n=n+1
Text1.Text=Str（n）
Text2.Text=Str（x）
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。
A）1和0
B）2和72
C）3和50
D）4和168
19．用下面语句定义的数组的元素个数是（）。
DimA（-3To5）AsInteger
A）6
B）7
C）8
D）9
20．以下程序的输出结果是（）。
OptionBase1
Dima（10）,p（3）AsInteger
k=5
a（i）=i
p（i）=a（i*i）
k=k+p（i）*2
Printk
A）33
B）28
C）35
D）37
21．在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommandl_Click（）
Dima
a=Array（1,2,3,4）
j=1
Fori=4ToStep-1
s=s+a（i）*j
j=j*10
Prints
运行上面的程序，单击命令按钮，其输出结果是（）。
A）4321
B）12
C）34
D）1234
22．在窗体上画一个命令按钮（其Name属性为Commandl），然后编写如下代码：
PrivateSubCommandl_Click（）
Dima（4,4）
Fori=1To4
Forj=1To4
a（i,j）=（i-1）*3+j
Fori=3To4
Forj=3To4
Printa（j,i）;
Print
程序运行后，单击命令按钮，其输出结果为（）。
A）69 B）710
7&
n
bsp;
10 811
C）811 D）912
912 1013
23．假定有如下的Sub过程：
SubS（xAsSingle,yAsSingle）
t=x
x=t/y
y=tMody
在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommandl_Click（）
DimaAsSingle
DimbAsSingle
a=5
b=4
Sa,b
Printa,b
程序运行后，单击命令按钮，输出结果为（）。
A）54
B）11
C）1.254
D）1.251
24．阅读程序：
FunctionF（aAsInteger）
b=0
Staticc
b=b+1
c=c+1
F=a+b+c
EndFunction
PrivateSubCommandl_Click（）
DimaAsInteger
a=2
Fori=1To3
PrintF（a）
运行上面的程序，单击命令按钮，输出结果为（）。
A）4 B）4 C）4 D）4
4 5 67
4 6 89
25．阅读程序：
SubsubP（b（）AsInteger）
b（i）=2*i
Dima（1To4）AsInteger
a
（1）=5
a
（2）=6
a（3）=7
a（4）=8
subPa（）
Printa（i）
A）2 B）5 C）10 D）出错
4 6 12
6 7 14
8 8 16
26．下列不能打开菜单编辑器的操作是（）。
A）按Ctrl+E
B）单击工具栏中的“菜单编辑器”按钮
C）执行“工具”菜单中的“菜单编辑器”命令
D）按Shift+Alt+M
27．假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（）。
A）MenuItem.Enabled=False
B）MenuItem.Enabled=True
C）MenuItem
升级会员 