VB基础练习题.docx
- 文档编号:2398121
- 上传时间:2022-10-29
- 格式:DOCX
- 页数:20
- 大小:21.83KB
VB基础练习题.docx
《VB基础练习题.docx》由会员分享,可在线阅读,更多相关《VB基础练习题.docx(20页珍藏版)》请在冰豆网上搜索。
VB基础练习题
1.下列不能打开属性窗口的操作是()。
A)执行“视图”菜单中的“属性窗口”命令
B)按F4键
C)按Ctrl+T
D)单击工具栏上的“属性窗口”按钮。
2.下列可以打开立即窗口的操作是()。
A)Ctrl+D
B)Ctrl+E
C)Ctrl+FD)Ctrl+G
3.InputBox函数返回值的类型为()。
A)数值
B)字符串
C)变体
D)数值或字符串(视输入的数据而定)
4.可以同时删除字符串前导和尾部空白的函数是()。
A)Ltrim
B)Rtrim
C)Trim
D)Mid
5.表达式4+56*7/8Mod9的值是()。
A)4
B)5
C)6
D)7
6.如果在立即窗口中执行以下操作:
a=8
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
x=3
Fork=1To2
x=x+6
Nextk
Nextj
Nexti
Printx
EndSub
程序运行后,单击命令按钮,输出结果是()。
A)7
B)15
C)157
D)538
14.在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_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、3、2、1、-1,则输出结果为()。
A)2
B)3
C)14
D)15
15.在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:
PrivateSubCommand1_Click()
a=Text1.Text+Text2.Text
Printa
EndSub
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
Nexti
执行上面的三重循环后,a的值为()。
A)3
B)9
C)14
D)21
17.在窗体上画一个文本框(其中Name属性为Text1),然后编写如下事件过程:
PrivateSubForm_Load()
Text1.Text=""
Text1.SetFocus
Fori=1To10
Sum=Sum+i
Nexti
Text1.Text=Sum
EndSub
上述程序的运行结果是()。
A)在文本框Text1中输出55
B)在文本框Text1中输出0
C)出错
D)在文本框Text1中输出不定值
18.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:
PrivateSubCommand1_Click()
x=0
DoWhilex<50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
EndSub
程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。
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
PrivateSubCommand1_Click()
Dima(10),p(3)AsInteger
k=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
Nexti
Fori=1To3
k=k+p(i)*2
Nexti
Printk
Endsub
A)33
B)28
C)35
D)37
21.在窗体上画一个命令按钮,然后编写如下事件过程:
OptionBase1
PrivateSubCommandl_Click()
Dima
a=Array(1,2,3,4)
j=1
Fori=4ToStep-1
s=s+a(i)*j
j=j*10
Nexti
Prints
EndSub
运行上面的程序,单击命令按钮,其输出结果是()。
A)4321
B)12
C)34
D)1234
22.在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
OptionBase1
PrivateSubCommandl_Click()
Dima(4,4)
Fori=1To4
Forj=1To4
a(i,j)=(i-1)*3+j
Nextj
Nexti
Fori=3To4
Forj=3To4
Printa(j,i);
Nextj
Nexti
EndSub
程序运行后,单击命令按钮,其输出结果为()。
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
EndSub
在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommandl_Click()
DimaAsSingle
DimbAsSingle
a=5
b=4
Sa,b
Printa,b
EndSub
程序运行后,单击命令按钮,输出结果为()。
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)
Nexti
EndSub
运行上面的程序,单击命令按钮,输出结果为()。
A)4 B)4 C)4 D)4
4 5 67
4 6 89
25.阅读程序:
SubsubP(b()AsInteger)
Fori=1To4
b(i)=2*i
Nexti
EndSub
PrivateSubCommandl_Click()
Dima(1To4)AsInteger
a
(1)=5
a
(2)=6
a(3)=7
a(4)=8
subPa()
Fori=1To4
Printa(i)
Nexti
EndSub
运行上面的程序,单击命令按钮,输出结果为()。
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
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 基础 练习题