二级VISUAL BASIC-536
(总分74,考试时间90分钟)
一、选择题
1. InputBox函数返回值的类型为 ______。
A. 数值        B. 字符串
C. 变体        D. 数值或字符串(视输入的数据而定)
2. 结构化分析方法是面向____的自顶向下逐步求精进行需求分析的方法。
A. 对象        B. 数据结构
C. 数据流        D. 目标
3. 计算机算法指的是______。
A. 计算方法        B. 调度方法
C. 排序方法        D. 解决某一问题的有限运算序列
4. 一个关系中属性个数为1时，称此关系为____。
A. 对应关系        B. 单一关系
C. 一元关系        D. 二元关系
5. 窗体上有一个名称为CDI的通用对话框，一个名称为Command1的命令按钮。命令按钮的单击事件过程如下：
Private Sub Command1_Click()
CD1. FileName=""
CD1. Filter="All Files|*. *|(*. Doc)|*.Doc|(*. Txt)|*.Txt"
CD1. FiherIndex=2
CD1. Action=1
End Sub
关于以上代码，叙述错误的是____。
A. 执行以上事件过程，通用对话框被设置为“打开”文件对话框
B. 通用对话框的初始路径为当前路径
C. 通用对话框的默认文件类型为*. Txt
D. 以上代码不对文件执行读写操作
6. 检查软件产品是否符合需求定义的过程称为
A. 确认测试        B. 集成测试
C. 验证测试        D. 验收测试
7. 下列不属于需求分析阶段工作的是______。
basic语言if语句A. 需求获取        B. 可行性研究
C. 需求分析        D. 撰写软件需求规格说明书
8. 在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Commmad1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是____。
A. 4321        B. 12
C. 34        D. 1234
9. 使用“打开”对话框的方法是____。
A. 双击工具箱中的“打开”对话框控件，将其添加到窗体上
B. 单击CommonDialog控件，然后在窗体上画出CommonDialog控件，再将Action属性设为1
C. 在程序中用Show方法显示“打开”对话框
D. 在程序中用Showopen方法显示“打开”对话框
10. 在计算机中，算法是指______。
A. 加工方法        B. 解题方案的准确而完整的描述
C. 排序方法        D. 查询方法
11. 执行语句Open "TC.dat" For Random As #1 Len=50后，对文件TC.dat中的数据能执行的操作是____。
A. 只读操作        B. 只写操作
C. 既可以读，也可以写        D. 追加操作
12. 结构化程序设计的3种基本结构是____。
A. 过程、子程序和分程序        B. 顺序、选择和重复
C. 递归、堆栈和队列        D. 调用、返回和转移
13. 为了使文本框显示滚动条，除要设置ScrollBars外，还必须设置的属性是______。
A. AutoSize        B. Alignment
C. Multiline        D. MaxLength
14. 设窗体上有名称为Option1的单选按钮，且程序中有语句：
If Option1.Value=True Then
下面语句中与该语句不等价的是
A. If Option1.Value Then
B. If Option1=True Then
C. If Value=True Then
D. If Option1 Then
15. 在属性窗口中，加载指定的图形放入当前对象中的属性是
A. CurrentY        B. Picture
C. CurrentX        D. Caption
16. 下列函数中，能够得到一个字符串的一组函数是 ____
A. Leh函数、Right函数、Mid函数
B. LTrim函数、RTrim函数、Trim函数
C. Len函数、LCase函数、UCase函数
D. Space函数、Len函数、Trim函数
17. 在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有 _______。
A. 数据无冗余        B. 数据可共享
C. 专门的数据管理软件        D. 特定的数据模型
18. 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：
Private Type animal
animal Name As String * 20
aColor As String * 10
End Type
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1 Click()
Dim rec As animal
Open "c：\vb Test.dat"For Random As # 1 Len=Len(reC)
rec.animalName="cat"
rec.aColor="White"
Put # 1，，rec
Close # 1
End Sub
则以下叙述中正确的是 ______。
A) 记录类型animal不能在Form1中定义，必须在标准模块中定义
D) 如果文件c:\vbTest.dat不存在，则Open命令执行失败
C) 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D) 语句"Put # 1，，rec"将animal类型的两个数据元素写到文件中
19. 阅读下列程序。
Private Sub Command1_Click()
Dim i As Integer，k As Integer
k=2
For i=1 To 3
Print Fun(k)；
Next
End Sub
Function Fun(j As Integer)
Static b
a=0
a=a + 1
b=b + 1
Fun=a*b+j
End Function
程序运行后，单击命令按钮输出结果是
A. 234        B. 345
C. 567        D. 356
20. 下列数组说明语句正确的是
A. Dim g(0，-5)As Single
B. Dim h(100 To 100，100)As String
C. Dim x(5)As IntegerReDim x(10)As Integer
D. Dim y()ReDim y
21. 下列程序运行时输出的结果是______。
Option Base 1
Private Sub Form_Click()
Dim x(10) As Integer,y(5) As Integer
For i=1 to 10
x(i)=10-1+1
Next
For i=1 to 5
y(i)=x(2*i-1)+x(2*i)
Next
For i=1 to 5
Print y(i)
Next
End Sub
A. 3 7 11 45 19        B. 19 15 11 7 3
C. 13 5 79        D. 不确定的值
22. 下列语句都是在Form中定义的，其中，错误的是
A. Public Const A1=2u
B. Private Const A2=8
C. Public a3 As Integer
D. Private a4 As Integer
23. 结构化分析方法SA、结构化设计方法SD，和JACKSON方法，是在软件开发过程中常用的方法，人们使用 SA方法时可以得到______。
A. 程序流程图        B. 具体的语言程序
C. 模块结构图及模块的功能说明书        D. 分层数据流图
24. 设有如下Command1的单击事件过程及fun过程：
Private Sub Command1_Click()
Dim x As Integer
x=Val(InputBox("请输入一个整数"))
fun(x)
End Sub
Private Sub fun(x As Integer)
If x Mod 2=0 Then fun(x/2)
Print x;
End Sub
执行上述程序，输入6，结果是
A. 3 6        B. 6 3
C. 6        D. 程序死循环
25. 下列程序段的输出结果为____。
A=0
Print A+I
A=3
A. 1        B. -1
C. 3        D. 0
二、填空题
1. 以下程序段在窗体上输出______，在图片框中输出______，在立即窗口中输出______。
A="your"
B="aname"
C="iscr"
Print Right(A，3)
Picture1.Print Mid(B,2,4)
Debug.Print Left(C.2)
2. 应用程序结构指的是组织指令的______，即指令存放的______和指令的______顺序。
以下程序用来产生20个100以内的随机整数，并将其中的偶数在窗体上显示，请填空。
Randomize
Fori=1 To 20
x=______
If x/2=______Then
PrintX
End If
Nexti
3.
4.
5. 下列程序的功能是根据两直角边计算直角三角形的斜边并输出，完成下列程序。
Private Sub Command1_Click()
a%=InputBox("Input LineA")
b%=InputBox("Input LineB")
c%=______
If c%＜=0Then
Print"Wrong Lines!"
Else
Print c%
End If
End Sub
Private Function GetValue(ByVal a As Integer, ByVal b As Integer)As Integer

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