2014年全国计算机等级《二级VB》考前押密试题(2)
时长:120分钟 总分:100分
68浏览 0人已完成答题
题型介绍
| 题型 | 单选题 | 简答题 |
|---|---|---|
| 数量 | 40 | 3 |
一、选择题
1.
在窗体上画一个命令按钮，然后编写如下事件过程：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Co mmand1＿Click（）
Di mI ，Num
Rando mize
Do
For I ＝1To 1000
Num＝Int（Rnd＊100）
Print Num；
Select Case Num
Case 12
Exit For
Case 58
Exit DO
Case 65，68，92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是（ ）。
3.
窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击"保存"菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是（ ）。
窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击"保存"菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是（ ）。
标题 名称
文件 file
新建 new
保存 save
6.
在窗体上面1个名称为Co mmand1的命令按钮，然后编写下列事件过程
在窗体上面1个名称为Co mmand1的命令按钮，然后编写下列事件过程
Option Base 1
Private Sub Co mmand1＿Click（）
Di ma（5，5）As Integer
For i ＝1To 5 For j＝1To 5
a（i ，j）＝（i ＋j ）＊5＼10
Next j
Next i
s ＝0
For i ＝1To 5
s ＝s ＋a（i ，i）
Next i
Print s
End Sub
程序运行后，单击命令按钮，输出结果是（ ）。
10.
下列程序的执行结果为（ ）。
下列程序的执行结果为（ ）。
Private Sub Co mmand1＿Click（）
Di mx As Integer ，y As Integer
x＝12：y ＝20
Call Value（x，y）
Print x；y
End Sub
Private Sub Value（ByVal m As Integer ，ByVal n AsInteger）
m＝m＊2：n ＝n －5
Print m；n
End Sub
11.
下列程序执行后，变量X 的值为（ ）。
下列程序执行后，变量X 的值为（ ）。
Di mfl ，b ，c ，d As Si ngle
Di m X As Si ngle
fl ＝10
b ＝30
c ＝400
If b ＞fl Then
d ＝fl ：fl ＝b ：b ＝d
End If
If b ＞c Then
X＝b
Else
If fl ＞c Then
X＝c
Else
X＝a
End If
16.
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件。如图所示。
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件。如图所示。
现有如下程序：
Public Sub display （x As Control）
If TypeOf xis Label Then
x．Caption ＝＂计算机等级考试＂
Else
x．Picture ＝Loadpicture（＂pic ．jpg＂）
EndIf
End Sub
Private Sub Label1＿Click（）
Call display（Label1）
End Sub
Private Sub Picture1＿Click（）
Call display（Picture1）
End Sub
对以上程序，下列叙述中错误的是（ ）。
23.
在窗体上画一个命令按钮，其名称为Co mmand1，然后编写下列代码：
在窗体上画一个命令按钮，其名称为Co mmand1，然后编写下列代码：
Option Base 1
Private Sub Co mmand1＿Click（）
Di ma
a＝Array（1，2，3，4）
j＝1
For i ＝4To 1Step －1
s ＝s ＋a（i）＊j
j＝j＊10
Next i
Print S
End Sub
程序运行后，单击命令按钮，其输出结果是（ ）。
29.
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：
Private Sub Co mmand1＿Click（）
Di ma As Integer ，s As Integer
a＝8
s ＝1
Do
s ＝s ＋a
a＝a－1
Loop While a ＜＝0
Print s ；a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
32.
单击按钮时，以下程序运行后的输出结果是（ ）。
单击按钮时，以下程序运行后的输出结果是（ ）。
Private Sub proc1（x As Integer ，y As Integer ，z As Integer）
x＝3＊z
y ＝2＊z
z ＝x＋y
End Sub
Private Sub Co mmand1＿Click（）
Di mx As Integer ，y As Integer ，z As Integer
x＝1：y ＝2：z ＝3
Call proc1（x，x，z）
Print x；x；z Call proc1（x，y ，y）
Print x；y ；y
End Sub
33.
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Co mmand1的命令按钮，运行后的窗体外观如图所示：
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Co mmand1的命令按钮，运行后的窗体外观如图所示：
设有如下的类型和变量声明：
Private Type Person
name As STRING＊8
major As Stri ng＊20
End Type
Di mp As Person
设文本框中的数据已正确地赋值给Person 类型的变量p ，当点击"保存"按钮时，能够正确地把变量中的数据写入随机文件Test2．dat 中的程序段是（ ）。
34.
设在工程文件中有一个标准模块，其中定义了下列记录类型：
设在工程文件中有一个标准模块，其中定义了下列记录类型：
Type Books
Name As Stri ng＊10
TelNum As Stri ng＊20
End Type
在窗体上画一个名为Co mmand1的命令按钮，要求当执行事件过程Co mmand1Click 时，在顺序文件Person ．txt中写入一条Books 类型的记录。下列能够完成该操作的事件过程是（ ）。
35.
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Co mmand1，然后编写如下事件过程：
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Co mmand1，然后编写如下事件过程：
Private Sub Form＿Load（）
List1．AddIte m＂Ite m1＂
List1．AddIte m＂Ite m2＂
List1．AddIte m＂Ite m3＂
End Sub
Private Sub Co mmand1＿Click（）
List1．List（List1．ListCount）＝＂AAAA＂
End Sub
程序运行后，单击命令按钮，其结果为（ ）。
36.
有如下函数：
有如下函数：
Function fun（a As Integer ，n As Integer）As Integer
Di m m As Integer
While a ＞＝n
a＝a－n
m＝m＋1
Wend
fun ＝m
End Function
该函数的返回值是（ ）。
39.
在窗体上画一个名称为File 的文件列表框，并编写如下程序：
在窗体上画一个名称为File 的文件列表框，并编写如下程序：
Private Sub File1＿DblClick（）
x＝Shell（File1．File Name ，1）
End Sub
以下关于该程序的叙述中，错误的是（ ）。
二、基本操作题
41.
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上建立两个命令按钮，名称分别为Command1和Command2、标题分别为"显示"和"删除"，一个名称为Pic1的图片框。要求程序运行后，每单击一次"显示"按钮，不使用任何变量而直接在图片框中显示"Picture1"；如果单击"删除"按钮，则清除图片框中的文本，如图31-1所示。
图31-1
注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。
（2）在名称为Form1的窗体上建立一个名称为List1的列表框。在程序运行后，通过Form_Load()事件过程加载窗体时，执行语句List1.AddItem "Item1"和List1.AddItem "Item2"，每当单击列表项时，就将执行语句List1.AddItem List1.Text一次，如图31-2所示。
图31-2
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。
三、简单应用题
42.
（1）在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1、标题为"计算"的命令按钮，如图4-3所示。程序运行后，单击"计算"命令按钮，通过在对话框输入整数12，放入整型变量a中，然后计算a!(提示：运算结果应放入Long型变量中)，在文本框中显示结果，如图4-4所示，并把结果存入文件out.txt中。考生文件夹中有一个标准模块mode.bas，该模块中提供了保存文件的过程putdata，考生可以直接调用。
（1）在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1、标题为"计算"的命令按钮，如图4-3所示。程序运行后，单击"计算"命令按钮，通过在对话框输入整数12，放入整型变量a中，然后计算a!(提示：运算结果应放入Long型变量中)，在文本框中显示结果，如图4-4所示，并把结果存入文件out.txt中。考生文件夹中有一个标准模块mode.bas，该模块中提供了保存文件的过程putdata，考生可以直接调用。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj3.frm，工程文件名为sj3.vbp。
（2）在考生文件夹中有一个工程文件sj4.vbp及窗体文件sj4.frm。在名为Form1的窗体上有两个框架，其中一个框架中有两个单选按钮，另一个框架中有两个复选框，窗体上还有一个标题为"确定"的命令按钮和一个初始内容为空的文本框。所有控件已经全部画出。程序的功能是：在运行时，如果选中一个单选按钮和一个或两个复选框，则对文本框中的文字进行相应的设置，如图4-5所示。
图4-5
窗体上的控件已经绘制出，但没有给出主要程序内容，请编写适当的事件过程，完成上述功能。
注意：不能修改已经给出的程序部分和已有的控件；在结束程序运行之前，必须选中一个单选按钮和至少一个复选框，并单击"确定"按钮；必须通过单击窗体右上角的"关闭"按钮结束程序，否则无成绩。最后，按原文件名并在原文件夹中保存修改后的文件。
四、综合应用题
43.
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm，该程序是不完整的，请在有"?"号的地方填入正确内容，然后删除"?"及代码前的所有注释符（即'号），但不能修改其他部分。存盘时不得改变文件名和文件夹。
