计算机二级VB真考 选择题 题库2docWord文档格式.docx
《计算机二级VB真考 选择题 题库2docWord文档格式.docx》由会员分享，可在线阅读，更多相关《计算机二级VB真考 选择题 题库2docWord文档格式.docx（17页珍藏版）》请在冰豆网上搜索。
C）多对一
D）多对多
9.在数据管理技术发展的三个阶段中，数据共享最好的是（ C ）。
A）人工管理阶段
B）文件系统阶段
C）数据库系统阶段
D）三个阶段相同
10.有三个关系R、S和T如下：
由关系R和S通过运算得到关系T，则所使用的运算为（ D ）。
A）笛卡尔积
B）交
C）并
D）自然连接
11.以下不能输出"
Program"
的语句是（ D ）。
A）PrintMid（"
VBProgram"
，3，7）
B）PrintRight（"
，7）
C）PrintMid（"
，3）
D）PrintLeft（"
12.以下叙述中错误的是（ D ）。
A）在通用过程中，多个形式参数之间可以用逗号作为分隔符
B）在Print方法中，多个输出项之间可以用逗号作为分隔符
C）在Dim语句中，所定义的多个变量可以用逗号作为分隔符
D）当一行中有多个语句时，可以用逗号作为分隔符
13.设a＝4，b＝5，c＝6，执行语句Printa<
bAndb<
c后，窗体上显示的是（ A ）。
A）True
B）False
C）出错信息
D）0
14.执行下列语句：
strInput＝InputBox（"
请输入字符串"
，"
字符串对话框"
字符串"
）
将显示输入对话框。
此时如果直接单击"
确定"
按钮，则变量strInput的内容是（ C ）。
A）"
B）"
C）"
D）空字符串
15.以下关于过程及过程参数的描述中，错误的是（ C ）。
A）调用过程时可以用控件名称作为实际参数
B）用数组作为过程的参数时，使用的是"
传地址"
方式
C）只有函数过程能够将过程中处理的信息传回到调用的程序中
D）窗体（Form）可以作为过程的参数
16.在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。
运行后的窗体外观如图所示。
设有如下的类型和变量声明：
PrivateTypePerson
nameAsString*8
majorAsString*20
EndType
DimpAsPerson
设文本框中的数据已正确地赋值给Person类型的变量p，当单击"
保存"
按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是（ C ）。
A）Open"
c：
\Test2.dat"
ForOutputAs#1
Put#1，1，p
Close#1
B）Open"
ForRandomAs#1
Get#1，1，p
C）Open"
ForRandomAs#1Len＝Len（p）
D）Open"
17.假定有以下循环结构：
DoUntil条件表达式
循环体
Loop
则以下正确的描述是（ D ）。
A）如果"
条件表达式"
的值是0，则一次循环体也不执行
B）如果"
的值不为0，则至少执行一次循环体
C）不论"
的值是否为"
真"
，至少要执行一次循环体
D）如果"
的值恒为0，则无限次执行循环体
18.执行语句DimX，YAsInteger后（ D ）。
A）X和Y均被定义为整型变量
B）X和Y均被定义为变体类型变量
C）X被定义为整型变量，Y被定义为变体类型变量
D）X被定义为变体类型变量，Y被定义为整型变量
19.以下关系表达式中，其值为True的是（ B ）。
XYZ"
>
"
XYz"
VisualBasic"
<
visualbasic"
the"
＝"
there"
D）"
Integer"
Int"
20.执行以下程序段：
a$＝"
VisualBasicProgramming"
b$＝"
C＋＋"
c$＝UCase（Left$（a$，7））&
b$&
Right$（a$，12）
后，变量c$的值为（ B ）。
A）VisualBASICProgramming
B）VISUALC＋＋Programming
C）VisualC＋＋Programming
D）VISUALBASICProgramming
21.设窗体上有一个列表框控件List1，含有若干列表项。
以下能表示当前被选中的列表项内容的是（ C ）。
A）List1.List
B）List1.ListIndex
C）List1.Text
D）List1.Index
22.在窗体上画一个文本框（名称为Text1）和一个标签（名称为Label1），程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。
以下可以实现上述操作的事件过程是（ A ）。
A）PrivateSubText1_Change（）
Label1.Caption＝Str（Len（Text1.Text））
EndSub
B）PrivateSubText1_Click（）
C）PrivateSubText1_Change（）
Label1.Caption＝Text1.Text
D）PrivateSubLabel1_Change（）
23.在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为"
宋体"
和"
黑体"
；
1个复选框（名称为Check1，标题为"
粗体"
）和1个文本框（名称为Text1，Text属性为"
改变文字字体"
），窗体外观如图所示。
程序运行后，要求"
单选按钮和"
复选框被选中，则以下能够实现上述操作的语句序列是（ D ）。
A）Option1.Value＝False
Check1.Value＝True
B）Option1.Value＝True
Check1.Value＝0
C）Option2.Value＝False
Check1.Value＝2
D）Option1.Value＝True
Check1.Value＝1
24.以下说法中正确的是（ A ）。
A）当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程
B）因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程
C）若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同
D）在KeyPress事件过程中，KeyAscii参数可以省略
25.假定通过复制、粘贴操作建立了一个命令按钮数组Command1，以下说法中错误的是（ D ）。
A）数组中每个命令按钮的名称（Name属性）均为Command1
B）若未做修改，数组中每个命令按钮的大小都一样
C）数组中各个命令按钮使用同一个Click事件过程
D）数组中每个命令按钮的Index属性值都相同
26.以下关于菜单的叙述中，错误的是（ B ）。
A）当窗体为活动窗体时，用Ctrl＋E键可以打开菜单编辑器
B）把菜单项的Enabled属性设置为False，则可删除该菜单项
C）弹出式菜单在菜单编辑器中设计
D）程序运行时，利用控件数组可以实现菜单项的增加或减少
27.以下叙述中错误的是（ C ）。
A）在程序运行时，通用对话框控件是不可见的
B）调用同一个通用对话框控件的不同方法（如ShowOpen或ShowSave）可以打开不同的对话框窗口
C）调用通用对话框控件的ShowOpen方法，能够直接打开在该通用对话框中指定的文件
D）调用通用对话框控件的ShowColor方法，可以打开颜色对话框窗口
28.下面控件中，没有Caption属性的是（ C ）。
A）复选框
B）单选按钮
C）组合框
D）框架
29.用来设置文字字体是否斜体的属性是（ D ）。
A）FontUnderline
B）FontBold
C）FontSlope
D）FontItalic
30.窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3（Circle）。
编写程序如下：
PrivateSubForm_Load（）
Shape1.Top＝0
Timer1.Interval＝100
PrivateSubTimer1_Timer（）
StaticxAsInteger
Shape1.Top＝Shape1.Top＋100
x＝x＋1
IfxMod10＝0Then
Shape1.Top＝0
EndIf
以下关于上述程序的叙述中，错误的是（ C ）。
A）每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1
B）Shape1每移动10次回到起点，重新开始
C）窗体上的Shape1由下而上移动
D）Shape1每次移动100
31.设有如下一段程序：
PrivateSubCommand1_Click（）
StaticaAsVariant
a＝Array（"
one"
，"
two"
three"
four"
five"
Printa（3）
针对上述事件过程，以下叙述中正确的是（ D ）。
A）变量声明语句有错，应改为Statica（5）AsVariant
B）变量声明语句有错，应改为Statica
C）可以正常运行，在窗体上显示three
D）可以正常运行，在窗体上显示four
32.求1！
＋2！
＋……＋10！
的程序如下：
PrivateFunctions（xAsInteger）
f＝1
Fori＝1Tox
f＝f*i
Next
s＝f
EndFunction
DimiAsInteger
DimyAsLong
Fori＝1To10
Printy
为实现功能要求，程序的横线处应该填入的内容是（ C ）。
A）Calls（i）
B）Calls
C）y＝y＋s（i）
D）y＝y＋s
33.窗体上有一个由两个文本框组成的控件数组，名称为Text1，并有如下事件过程：
PrivateSubText1_Change（IndexAsInteger）
SelectCaseIndex
Case0
Text1
（1）.FontSize＝Text1（0）.FontSize*2
Text1
（1）.Text＝Text1（0）.Text
Case1
Text1（0）.FontSize＝Text1
（1）.FontSize/2
Text1（0）.Text＝Text1
（1）.Text
CaseElse
MsgBox"
执行Else分支"
EndSelect
关于上述程序，以下叙述中错误的是（ D ）。
A）Index用于标识数组元素
B）本程序中CaseElse分支的语句永远不会被执行
C）向任何一个文本框输入字符，都会在另一个文本框中显示该字符
D）下标为0的文本框中显示的字符尺寸将越来越小
34.设有如下程序：
OptionBase1
Dima（3，4）AsInteger，b（4，3）AsInteger
'
循环1
Fori＝1To3
Forj＝1To4
b（j，i）＝a（i，j）
Nextj
Nexti
循环2
x＝b（1，1）
Fori＝1To4
Forj＝1To3
Printb（i，j）；
Ifx<
b（i，j）Thenx＝b（i，j）
Print
程序中的数组a已被赋值。
以下关于上述程序的叙述中，正确的是（ B ）。
A）窗体模块中，不能使用Dim声明a、b数组
循环1"
可以正常运行
循环2"
中循环变量i、j的终值不对，所以不能正常运行
D）程序可以正常运行，x中保存的是数组b中所有元素中最小的数
35.某人编写了向随机文件中写一条记录的程序，代码如下：
TypeRType
NameAsString*10
TelAsString*20
DimpAsRType
p.Name＝InputBox（"
姓名"
p.Tel＝InputBox（"
电话号"
Open"
Books.dat"
Put#1，，p
Close#1
该程序运行时有错误，修改的方法是（ A ）。
A）在类型定义"
TypeRType"
之前加上"
Private"
B）DimpAsRType必须置于窗体模块的声明部分
C）应把Open语句中的ForRandom改为ForOutput
D）Put语句应该写为Put#1，p.Name，p.Tel
（36）有如下程序：
PrivateSubForm_Click（）
DimsAsInteger，pAsInteger
p＝1
Fori＝1To4
Forj＝1Toi
s＝s＋j
p＝p*s
Nexti
Printp
程序运行后，单击窗体，则输出结果是（ D ）。
A）在类型定义"
B）DimpAsRType必须置于窗体模块的声明部分
C）应把Open语句中的ForRandom改为ForOutput
D）Put语句应该写为Put#1，p.Name，p.Tel
36.有如下程序：
A）90
B）180
C）400
D）800
37.设有如图所示窗体和以下程序：
Text1.Text＝"
VisualBasic"
PrivateSubText1_LostFocus（）
IfText1.Text<
BASIC"
Then
Text1.Text＝"
Text1.SetFocus
程序运行时，在Text1文本框中输入"
Basic"
（如图所示），然后单击Command1按钮，则产生的结果是（ A ）。
A）文本框中无内容，焦点在文本框中
B）文本框中为"
，焦点在文本框中
C）文本框中为"
，焦点在按钮上
D）文本框中为"
38.窗体上有一个名称为Command1的命令按钮，其事件过程如下：
x＝"
VisualBasicProgramming"
a＝Right（x，11）
b＝Mid（x，7，5）
c＝MsgBox（a，，b）
运行程序后单击命令按钮。
以下叙述中错误的是（ D ）。
A）信息框的标题是Basic
B）信息框中的提示信息是Programming
C）c的值是函数的返回值
D）MsgBox的使用格式有错
39.设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。
两个窗体上分别只有一个名称为Command1的命令按钮。
Form1的代码如下：
PublicxAsInteger
x＝1
y＝5
Form2.Show
Form2的代码如下：
PrintForm1.x，y
Module1的代码如下：
PublicyAsInteger
运行以上程序，单击Form1的命令按钮Command1，则显示Form2；
再单击Form2上的命令按钮Command1，则窗体上显示的是（ A ）。
A）1 5
B）0 5
C）0 0
D）程序有错
40.窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。
窗体文件的程序如下：
PrivateTypex
aAsInteger
bAsInteger
DimyAsx
y.a＝InputBox（"
Ify.a\2＝y.a/2Then
y.b＝y.a*y.a
Else
y.b＝Fix（y.a/2）
Text1.Text＝y.b
EndSub
对以上程序，下列叙述中错误的是（ D ）。
A）x是用户定义的类型
B）InputBox函数弹出的对话框中没有提示信息
C）若输入的是偶数，y.b的值为该偶数的平方
D）Fix（y.a/2）把y.a/2的小数部分四舍五入，转换为整数返回
升级会员 