全国计算机等级考试二级VB语言笔试试题及答案Word下载.docx
《全国计算机等级考试二级VB语言笔试试题及答案Word下载.docx》由会员分享，可在线阅读，更多相关《全国计算机等级考试二级VB语言笔试试题及答案Word下载.docx（15页珍藏版）》请在冰点文库上搜索。
EndSub
程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为
A）1516B）156C）1515D）56
（7）设a=3,b=5，则以下表达式值为真的是
A）a%26gt;
=bAndb%26gt;
10B）（a%26gt;
b）Or（b%26gt;
0）
C）（a%26lt;
0）Eqv（b%26gt;
0）D）（-3+5%26gt;
a）And（b%26gt;
（8）设有语句
x=InputBox（“输入数值”，“0”，“示例”）
程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是
A）变量X的值是数值10B）在InputBox对话框标题栏中显示的是“示例”
C）0是默认值D）变量X的值是字符串“10”
（9）从键盘上输入两个字符串，分别保存在变量str1、str2中。
确定第二个字符串在第一个字符串中起始位置的函数是
A）LeftB）MidC）StringD）Instr
（10）设a=“VisualBasic”，下面使b=“Basic”的语句是
A）b=Left（a,8,12）B）b=Mid（a,8,5）
C）b=Rigth（a,5,5）D）b=Left（a,8,5）
（11）以下能够触发文本框Change事件的操作是
A）文本框失去焦点B）文本框获得焦点
C）设置文本框的焦点D）改变文本框的内容
（12）在窗体上有一个文本框控件，名称为TxtTime：
一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。
程序为：
PrivateSubTimer1_（）
TxtTime.text=Time
在下划线上应填入的内容是
A）EnabledB）VisibleC）IntervalD）Timer
（13）在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为“宋体”和“黑体”；
一个复选框，名称为Check1,标题为“粗体”；
一个文本框，名称为Text1，Text属性为“改变文字字体”。
要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中（窗体外观如下图），则能够实现上述要求的语句序列是
A）Option1.value=TrueB）Option1.Value=True
Check1.Value=FalseCheck1.Value=True
C）Option2.Value=FalseD）Option1.Value=True
Check1.Value=TrueCheck1.Value=1
（14）为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是
A）ValueB）DefaultC）CancelD）Enabled
（15）在窗体上画一个命令按钮，名称为Command1。
然后编写如下程序：
ForI=1To4
ForJ=0To1
PrintChr$（65+I）;
NextJ
Print
NextI
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A）BBB）AC）BD）AA
CCBBCCBBB
DDDDCCCDDDCCCC
EEEEEDDDDEEEEDDDDD
（16）图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是
A）AutosizeB）Stretch
C）AutoRedrawD）Appearance
（17）在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
DimxAsInteger,nAsInteger
x=1
n=0
DoWhilex<
20
x=x*3
n=n+1
Loop
Text1.Text=Str（x）
Text2.Text=Str（n）
程序运行后，单击命令按钮，在两个文本框中显示的值分别是
A）15和1B）27和3C）195和3D）600和4
（18）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
DimiAsInteger,nAsInteger
ForI=0To50
i=i+3
Ifi>
10Thenxitfor
Next
Text1.Text=Str（n）
程序运行后，单击命令按钮，在文本框中显示的值是
A）2B）3D）4D）5
（19）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Dimarray1（10,10）AsInteger
Dimi,jAsInteger
Fori=1To3
Forj=2To4
array1（i,j）=i+j
Nextj
NextI
Text1.Text=array1（2,3）+array1（3,4）
A）12B）13C）14D）15
（20）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
DimiAsInteger,jAsInteger
Dima（10,10）AsInteger
Forj=1To3
a（i,j）=（i-1）*3+j
Printa（i,j）;
Print
程序运行后，单击命令按钮，窗体上显示的是
A）123B）234C）147D）123
246345258456
369456369789
（21）设有如下程序：
OptionBase0
PrivateSubForm_Click（）
Dima
DimiAsInteger
a=Array（1,2,3,4,5,6,7,8,9）
Fori=0To3
Printa（5-i）;
EndSub
程序运行后，单击窗体，则在窗体上显示的是
A）4321B）5432C）6543D）7654
（22）下列叙述中正确的是
A）在窗体的Form_Load事件过程中定义的变量是全局变量
B）局部变量的作用域可以超出所定义的过程
C）在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程
D）在调用过程时，所有局部变量被系统初始化为0或空字符串
（23）在窗体上画一个命令按钮，名称为Command1。
程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。
在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。
能够正确实现上述功能的代码是
A）PrivateSubCommand1_Click（）
x=InputBox（“请输入整数”）
a=F1（Val（x））
Printa
FunctionF1（ByRefbAsInteger）
IfbMod2=0Then
Return0
Else
Return1
EndIf
EndFunction
B）PrivateSubCommand1_Click（）
F1=0
F1=1
C）PrivateSubCommand1_Click（）
F1（Val（x））
D）PrivateSubCommand1_Click（）
（24）在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：
Dimx,y,zAsInteger
x=5
y=7
z=0
Text1.text=“”
CallP1（x,y,z）
SubP1（ByValaAsInteger,ByValbAsInteger,cAsInteger）
c=a+b
程序运行后，如果单击命令按钮，则在文本框中显示的内容是
A）0B）12C）Str（z）D）没有显示
（25）以下叙述中错误的是
A）如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B）Sub过程中不能嵌套定义Sub过程
C）Sub过程中可以嵌套调用Sub过程
D）事件过程可以像通用过程一样由用户定义过程名
（26）以下叙述中错误的是
A）在KeyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）
B）在KeyUp和KeyDown事件过程中，将键盘上的“1”和右侧小键盘上的“1”视作不同的数字（具有不同的KeyCode）
C）KeyPress事件中不能识别键盘上某个键的按下与释放
D）KeyPress事件中可以识别键盘上某个键的按下与释放
（27）以下叙述中错误的是
A）在同一窗体的菜单项中，不允许出现标题相同的菜单项
B）在菜单的标题栏中，“%26”所引导的字母指明了访问该菜单项的访问键
C）程序运行过程中，可以重新设置菜单的Visible属性
D）弹出式菜单也在菜单编辑器中定义
（28）设在菜单编辑器中定义了一个菜单项，名为menu1。
为了在运行时隐藏该菜单项，应使用的语句是
A）menu1.Enabled=TrueB）Munu1.Enabled=False
C）Menu1.Visible=TrueD）Menu1.Visible=False
（29）以下叙述中错误的是
A）在程序运行时，通用对话框控件是不可见的
B）在同一个程序中，用不同的方法（如ShowOpen或ShowSave等）打开的通用对话框具有不同的作用
C）调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件
D）调用通用对话框控件的ShowColor方法，可以打开颜色对话框
（30）在用通用对话框控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件（即.txt文件），则正确的描述格式是
A）“text（.txt）|（*.txt）”B）“文本文件（.txt）|（.txt）”
C）“text（.txt）||（*.txt）”D）“text（.txt）（*.txt）”
（31）以下叙述中错误的是
A）一个工程中只能有一个SubMain过程
B）窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C）窗体的Hide方法和Unload方法的作用完全相同
D）若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体
（32）以下叙述中错误的是
A）一个工程中可以包含多个窗体文件
B）在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C）在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D）全局变量必须在标准模块中定义
（33）设在工程中有一个标准模块，其中定义了如下记录类型
TypeBooks
NameAsString*10
TelNumAsString*20
EndType
在窗体上画一个名为Command1的命令按钮。
要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。
下列能够完成该操作的事件过程是
DimBAsBooks
Open“c:
\Person.txt”ForOutputAs#1
B.Name=InputBox（“输入姓名”）
B.TelNum=InputBox（“输入电话号码”）
Write#1,B.Name,B.TelNum
Close#1
\Person.txt”ForInputAs#1
Print#1,B.Name,B.TelNum
Write#1,B
Name=InputBox（“输入姓名”）
TelNum=InputBox（“输入电话号码”）
Print#1,Name,TelNum
（34）以下叙述中正确的是
A）一个记录中所包含的各个元素的数据类型必须相同
B）随机文件中每个记录的长度是固定的
C）Open命令的作用是打开一个已经存在的文件
D）使用Input#语句可以从随机文件中读取数据
（35）目录列表框的Path属性的作用是
A）显示当前驱动器或指定驱动器上的目录结构
B）显示当前驱动器或指定驱动器上的某目录下的文件名
C）显示根目录下的文件名
D）显示该路径下的文件
二、填空题（每空2分，共40分）
请将每空的正确答案写在答题卡
（1）至（15）的横线上，答在试卷上不得分。
（1）在窗体上画两个标签，其名称分别为Label1和Label2,Caption属性分别为“数值”及空白；
然后画一个名称为Hscoll1的水平滚动条，其Min的值为0，Max的值为100。
程序运行后，如果单击滚动条两端的箭头，则在标签Lable2中显示滚动条的值，如图所示。
请在[1]和[2]处填入适当的内容，将程序补充完整。
PrivateSubHScroll1_[1]（）
Labl2.Caption=HScroll1.[2]
（2）在窗体上画一个名称为Command1、标题为“计算”的命令按钮；
画两个文本框，名称分别为Text1和Text2；
然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”和空白；
再建立一个含有4个单选按纽的控件数组，名称为Option1，标题分别为“+”、“-”、“*”和“/”。
程序运行后，在Text1、Text2中输入两个数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Label4，程序运行情况如图所示。
请在[3]、[4]和[5]处填入适当的内容，将程序补充完整。
If[3]=Truethen
opt=Option1（i）.Caption
SelectCase[4]
Case”+”
Result=Val（Text1.Text）+Val（Text2.Text）
Case”-”
Result=Val（Text1.Text）-Val（Text2.Text）
Case”*”
Result=Val（Text.Text）*Val（Text2.Text）
Case”/”
Result=Val（Text1.Text）/Val（Text2.Text）
EndSelect
[5]=Result
EndSub
（3）在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。
程序运行后，Command1为禁用（灰色）。
当向文框中输入任何字符时，命令按钮Command1变为可用。
请在[6]处填入适当的内容，将程序补充完整。
PrivateSubForm_Load（）
Command1.Enabled=False
PrivateSubText1_[6]（
）
Command1.Enabled=True
（4）在菜单编辑器中建立了一个菜单，名为pmenu，用下面的语句可以把它作为弹出式菜单弹出，请填空。
Form1.[7]Pmenu
（5）以下程序的功能是：
从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。
请在[8]和[9]处填入适当的内容，将程序补充完整。
DimxAsSingle,amaxAsSingle,aminAsSingle
x=InputBox（“Enterascore”）
amax=x
amin=x
DoWhile[8]
Ifx>
amaxThen
Amax=x
If[9]Then
Amin=x
Print”Max=”;
amax,”Min=”;
amin
（6）在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Text1.Text=”计算机”
PrivateSubText1_Change（）
Picture1.Print“等级考试”
程序运行后，在文本框中显示的内容是[10]，而在图片框中显示的内容是[11]。
（7）在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
FunctionM（xAsInteger,yAsInteger）AsInteger
M=IIf（x>
y,x,y）
PrivateSubcommand1_Click（）
DimaAsInteger,bAsInteger
a=100
b=200
PrintM（a,b）
程序运行后，单击命令按钮，输出结果为[12]。
（8）为了改变计时器控件的时间间隔，应该修改该控件的[13]属性。
（9）在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。
程序运行后，在列表框中添加若干列表项。
当双
升级会员 