二级VISUAL BASIC笔试99
(总分94,考试时间90分钟)
一、选择题下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的。
1. 设a=2，b=3，c=4，d=5，则表达式Not a＜＝c Or 4*c=b^2 And ba+c的值是
A. -1        B. 1
C. True        D. False
2. 公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员，从职员到部门的联系类型是
A. 多对多        B. 一对一
C. 多对一        D. 一对多
3. 以下说法不正确的是
A. Visual Basic是一种可视化编程工具
B. Visual Basic是面向过程的编程语言
C. Visual Basic是结构化程序设计语言
D. Visual Basic采用事件驱动编程机制
4. 软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指
A. 模块间的关系        B. 系统结构部件转换成软件的过程描述
C. 软件层次结构        D. 软件开发过程
5. 我们可以在设计时(属性窗口中)和运行时(程序代码中)设置属性的属性值，以下关于属性设置的说法正确的是
A. 在属性窗口中可以设置所有属性的属性值
B. 在程序代码中可以设置所有属性的属性值
C. 属性的名称由VB事先定义，用户不能改变
D. 所有对象的属性都是可见的
6. 下列叙述中正确的是
A. 在窗体的Form_Load事件过程中定义的变量是全局变量
B. 局部变量的作用域可以超出所定义的过程
C. 在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程
D. 在调用过程时，所有局部变量被系统初始化为0或空字符串
7. 在MsgBox函数中哪一个参数是必须的
A. prompt        B. buttons
C. title        D. context
8. 下面的数组声明语句中正确的是
A. Dim gg[1,5] As String
B. Dim gg[1 To 5,1 To 5] As String
C. Dim gg[1 To 5] As String
D. Dim gg[1:5,1:5] As String
9. 为了使文本框同时具有水平和垂直滚动条，应先把MultiLine属性设置为True，然后再把SerollBars属性设置为
A. 0        B. 1
C. 2        D. 3
10. 下列叙述不正确的是
A. 注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译
B. 注释语句可以放在代码中的任何位置
C. 注释语句不能放在续行符的后面
D. 代码中加入注释语句的目的是提高程序的可读性
11. 只有当一个对象的______和______属性为True，它才能获得焦点。
A. Enabled;Visible        B. Visible;Caption
C. Visible;Name        D. Enabled;Caption
12. 设树T的度为4，其中度为1，2，3，4的结点个数分别为4，2，1，1。则T中的叶子结点数为
A. 8        B. 7
C. 6        D. 5
13. 以下属于Visual Basic合法的数组元素是
A. x8        B. x[8]
C. x(0)        D. x{6}
14. 下面的语句用Array函数为数组a的各元素赋整数值：  a＝Array(1,2,3,4,5,6,7,8,9)  对数组变量a的正确定义是
A. Dim a        B. Dim a As Integer
C. Dim a(9) As Integer        D. Dim a() As IntegEr
15. 线性表L=(a1,a2,a3,…ai,…an)，下列说法正确的是
A. 每个元素都有一个直接前件和直接后件
B. 线性表中至少要有一个元素
C. 表中诸元素的排列顺序必须是由小到大或由大到小
D. 除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件
16. 在磁盘C的根目录下有一个名为Sco.dar的文件，内容为姓名、英语成绩、物理成绩、数学成绩，现依此文件在根目录中建立一个名为Aver.dat的文件，内容为姓名及三门课的平均成绩，但程序不完整，请在______处补充。  Open"C:\Sco.dat"For Input As #3  Open"C:\Aver.dat"For Output As #2  While ______    Input #3,NA$,ENG,PHY,MATH    Write #2,NA$,(ENG+PHY+MATH)/3  Wend  Close #2  Close #3
A. EOF(3)        B. Not EOF(3)
C. EOF(2)        D. Not EOF(2)
17. 在程序运行期间可以用______函数把图形装入窗体、图片框或图像框。没有caption属性的控件是
A. Autosize        B. Stretch
C. Pieture        D. LoadPicture
18. 假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是
A. 单击窗体上没有控件的地方        B. 单击任一个控件
C. 不执行任何操作        D. 双击窗体的标题栏
19. 设有下列二叉树：    对此二叉树前序遍历的结果为
A. ZBTYCPXA        B. ATBZXCYP
C. ZBTACYXP        D. ATBZXCPY
20. 数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是
A. 控制流        B. 加工
C. 数据存储        D. 源和潭
21. 假定程序中有如下语句：  answer＝MsgBox("第一个字符串",vbAbortRetryIgnore_                Or vbCritieal_                Or vbDefaultButton3,_                "第二个字符串")  执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为
A. “第二个字符串”        B. 5
C. 3        D. 7
22. 目录列表框的Path属性的作用是
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示指定路径下的文件
23. 下列程序  Private Sub form_Click()  score=Int(Rnd * 10)+80  Select Case score    Case Is＜60:a$＝"F"    Case 60 To 69:a$＝"D"    Case 70 To 79:a$＝"C"    Case 80 To 89:a$="B"    Case Else:a$＝"A"  End Select  Print a$  End Sub  运行时输出的结果是
A. F        B. D
C. C        D. B
24. 在参数传递过程中，使用关键字来修饰参数，可以使之按值传递，此关键字是(  )
A. ByVal        B. Byref
C. Value        D. Reference
25. 按条件f对关系R进行选择，其关系代数表达式是
A. R|×|R
B.
C. σf(
D. πf(
26. 结构化程序设计的一种基本方法是
A. 筛选法        B. 递归法
C. 归纳法        D. 逐步求精法
27. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：  Private Sub Command1_Click()    Call sub1(-15.1,2.54)  End Sub  Public Function sub1(a As Integer,ByVa1 b As String) As Integer    a＝Val(b)    sub1=a    Print sub1  End Function  程序运行后，单击命令按钮，在窗体上输出的是
A. 3        B. 2
C. -15        D. 提示出错
28. 完全不考虑程序的内部结构和内部特征，而只是根据程序功能导出测试用例的测试方法是
A. 黑箱测试法        B. 白箱测试法
C. 错误推测法        D. 安装测试法
29. 在数据管理技术的发展过程中，可实现数据共享的是
A. 人工管理阶段        B. 文件系统阶段
C. 数据库系统阶段        D. 系统管理阶段
30. 在窗体中添加一个通用对话框，其名称为CommonDialog1，然后添加一个命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“打开”，在文件类型框中显示的是Text Files(*.txt)。则能够满足上述要求的程序是
A. Private Sub Command1_Click()  CommonDialog1. Flags=cdloFNHideReadonly  CommonDialog Filter="AllFiles(*.*)|*.*|TextFiles"&_              "(*.tx|*.txt|BatchFiles(*.ba|*.ba
t"  CommonDialog1.FilterIndex=1  CommonDialog1.ShowOpen  MsgBox CommonDialog1.FileName  End Sub
B. Private Sub Command1_Click()  CommonDialog1. Flags=cdloFNHideReadonly  CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFiles"&_              "(*.tx|*.txt|BatchFiles(*.ba|*.bat"  CommonDialog1. FilterIndex=2  CommonDialog1. ShowOpen  MsgBox CommonDialog1. FileName  End Sub
C. Private Sub Command1_Click()  CommonDialog1. Flags=cdloFNHideReadonly  CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFdes"&_              "(*.tx|*.txt|BatchFiles(*.ba|*.bat"  CommonDialog1.FilterIndex=1  CommonDialog1.ShowSave  MsgBox CommonDialog1.FileName  End Sub
D. Private Sub Command1_Click()  CommonDialog1. Flags=edloFNHideReadonly  CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFiles"&_              "(*.tx|*.txt|BatchFiles(*.ba|*.bat"  CommonDialog1.Filterlndex=2  CommonDialog1.ShowSave  MsgBox CommonDialog1.FileName  End Sub

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。