国家二级（VB）机试模拟试卷270
选择题
1.在数据库管理技术的发展中，数据独立性最高的是( )。(C)
A. 人工管理
B. 文件系统
C. 数据库系统
D. 数据模型
解析：在人工管理阶段，数据无法共享，冗余度大，不独立，完全依赖程序；在文件系统阶段，数据共享性差；在数据库系统阶段，共享性好，独立性高。
2.当一个工程含有多个窗体时，其中启动窗体是( )。(D)
A. 启动Visual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体
D. 在“工程属性”对话框中指定的窗体
解析：VB规定，对于多窗体程序，必须在“工程属性”对话框中指定其中一个窗体为启动窗体。如果未指定，那么就默认设计时的第一个窗体为启动窗体，这个默认的启动窗体就是“工程属性”对话框中的默认窗体。
3.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。
Private Sub Command1 Click()
Picture1．Picture=LoadPicture(\\(A)
A. 窗体无显示，图片框显示图片和文字picture
B. 窗体上出现picture文本，图片框无显示
C. 窗体上出现picture文本，图片框显示图片picture．jpg
D. 窗体无显示，图片框只显示picture文字
解析：本题考查图片框属性。单击命令按钮时，图片框首先装入图片，然后图片框清空(注意，该方法只能清空在图片框中输出的文本信息和绘图信息，而不能清除有LoadPicture函数装载的图片)，最后图片框显示图片和“picture”文字。全部操作都是在图片框中进行的，窗体上没有任何显示。
4.窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：
Private Type x
a As Integer
b As Integer
End Type
Private Sub Command1_Click()
Dim y As x
y．a=InputBox(\\(D)
A. x是用户定义的类型
B. InputBox函数弹出的对话框中没有提示信息
C. 若输入的是偶数，y．b的值为该偶数的平方
D. Fix(y．a／2)把y．a／2的小数部分四舍五入，转换为整数返回
解析：x是用户定义的一种变量类型，可以使用它来声明变量。InputBox(\\
5.在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
Private Sub Command1_Click()
Counter=0
For i=1 To 4
For j=6 To 1 Step-2
Counter=Counter+1
Next j
Next i
Label1．Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是( )。(B)
A. 11
B. 12
C. 16
D. 20
解析：这是一个双层循环，外层循环是4次，内层循环变量初值6，终值1，步长一2，则j可取的值为6、4、2，因此内层For循环会循环3次，两层循环的总数是4*3=12次，Counter的值即为12。Str函数将数值转换成字符串，即“12”，所以标签中显示的内容为“12”。
6.设有一个有10个元素的数组，下列程序将该数组的第1个元素与第10个元素交换，第2个元素与第9个元素交换……，第5个元素与第6个元素交换，在横线处应填写( )。
Private Sub Command1_ Click()
Dim a(1 To 10)As Integer
Dim i As Integer,Dim P As Integer
Dim t As Integer,Dim j As Integer
For i=1 To 10
a(i)=i
Next i
Forj=1 To 5
t=a(j)
Next j
For i=1 To 10
Print a(i)
Next i
End Sub(A)
A. a(j)=a(1 1-j) a(11-j)=t
B. a(11-j)=a(j) a(j)=t
C. a(i)=a(11-j) a(j)=t
D. a(11-j)=t a(j)=a(11-j)
解析：本题考查数组中元素的逆置操作。循环次数为数组中元素个数的一半，每一次都要进行下标之和为11的前后两个元素交换。
7.在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
Private Sub Command1_Click()
Counter＝0
For i＝1 To 4
For j＝6 To 1 Step－2
Counter＝Counter＋1
Next j
Next i
Label1.Caption＝Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是( )。(B)
A. 11
B. 12
C. 16
D. 20
解析：这是一个双侧循环，外层循环是4次，内层循环变量初值6，终值1，步长-2，则j可取的值为6，4，2，因此内层For循环会循环3次，两侧循环的总数是4*3＝12次，Counten的值即为12.Sir函数将数值转换成字符串，即“12”，所以标签中显示的内容为“12”。
8.在E盘当前目录文件夹下建立一个名为“Student。txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As String*10
StuAge As Integer
End Type
Private Sub Form_Click()
Dim SAs student
Open“c：＼student．txt”For Random As#1 Len=
Len(s)
For i=1 To 5
s．StuName=InputBox(“请输入姓名”)
s．StuGrade=InputBox(“请输入年级号”)
本文档预览：3600字符，共18453字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
