文档介绍：第 1 页
附录1 Visual Basic笔试模拟试题〔1~6套〕
笔试模拟试题 1
第一局部 软件技术根底〔共15分〕
一、是非判断题〔每题1分，共10分〕〔判断以下各题是否正确，如正确，在客观答题纸上对应编号选A，否那么选〕Enabled
〔C〕Visible 〔D〕Name
9. 以下方法中，〔 A 〕不能实现程序的不同过程之间的数据传递。
〔A〕局部变量 〔B〕全局变量
〔C〕窗体或模块级变量 〔D〕将形参及实参结合
10. 以下关于文件的表达中，不正确的选项是〔 D 〕。
〔A〕VB文件根据数据存取方式不同，可分为顺序文件与随机文件。
〔B〕顺序文件的访问只能按记录顺序访问，不能随机访问。
〔C〕随机文件只要给出记录号就能读取该记录。
〔D〕随机文件的每个记录长度可以不一样。
二、阅读分析程序〔每个选择3分，共45分〕
1. 程序如下：
0ption Explicit
Private Sub Command1_Click〔〕
Dim n As Integer，s As Integer
n = 1
S = 1
Do While n＜6
S = S + n
If n＜=2 Then n=n*2
If n＜=4 Then n=n*2
第 6 页
Loop
Print s
End Sub
〔1〕程序运行中，语句“S=S+n〞的执行次数是〔 B 〕。
〔A〕1 〔B〕2 〔C〕4 〔D〕6
〔2〕程序运行后输出的数据结果是〔 D 〕。
〔A〕1 〔B〕2 〔C〕4 〔D〕6
〔3〕如果将语句“Do white n＜6〞改为“Do While n＜10〞，由程序运行后输出的结果是〔 D 〕。
〔A〕2 〔B〕4 〔C〕6 〔D〕以上都不对
2. 程序如下：
Option Explicit
Option Base 1
Private Sub Commandl_Click〔〕
Dim A〔2,2〕 As Integer，B〔2,2〕 As Integer，C〔2,2〕As Integer
Dim n As Integer， m As Integer， S As Integer， k As Integer
A〔1,1〕 =3:A〔1,2〕 =1:A 〔2,1〕=-2:A〔2,2〕=5
B〔1,1〕 =2:B〔1,2〕=-3:B〔2,1〕=6:B〔2,2〕=1
For n=1 TO 2
For m=1 TO 2
S=0
For k=1 TO 2
S=S+A〔n,k〕*B〔k,m〕
C〔n,m〕= S
Next k
Next m
Next n
For n=1 TO 2
For m=1 TO 2
Print C〔n，m〕；Spc〔3〕；
Next m
Print
Next n
End Sub
〔1〕以下关于语句“Option Base 1〞，正确的说法是〔 C 〕。
〔A〕其功能是声明数组下标的默认上界
第 7 页
〔B〕其功能是定义动态数组
〔C〕其功能是声明数组下标的默认下界
〔D〕其功能是定义静态数组
〔2〕以下关于语句“Option Explicit〞，正确的说法是〔 D 〕。
〔A〕说明此模块没有通用过程
〔B〕说明此模块的通用过程不能被其他模块调用
〔C〕说明此模块变量不声明可以直接使用
〔D〕说明此模块变量必须先声明后使用
〔3〕程序运行完成后，Print C〔n,m〕语句输出的结果是〔 D 〕。
〔A〕0 -16 〔B〕12 26 〔C〕26 11 〔D〕12 -8
-13 11 -8 11 12 -8 26 11
3. 程序如下：
Private Sub Command