2013计算机二级VB真考 选择题 题库（9）
1.在下列选项中，那个不是一个算法一般应该具有的基本特征( A) 无穷性 B) 可行性 C) 确定性 D) 有穷性
2.下列关于栈的叙述中正确的是(
A )。
C )。
A) 在栈中只能插入数据，不能删除数据 B) 在栈中只能删除数据，不能插入数据 C) 栈是先进后出(FILO)的线性表 D) 栈是先进先出(FIFO)的线性表
3.设有下列二叉树：
对此二叉树中序遍历的结果为( C )。
A) ACBDEF B) DEBFCA C) ABDECF D) DBEAFC
4.下面描述中，符合结构化程序设计风格的是( B) 模块只有一个入口，可以有多个出口 C) 注重提高程序的执行效率 D) 不使用goto语句
5.软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是
A )。
A) 使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑
( D )。
A) 概要设计 B) 软件设计
C) 可行性研究和计划制定 D) 需求分析
6.)数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是
( B )。 A) 加工
B) 控制流 C) 数据存储 D) 数据流
7.下列叙述中正确的是(
C )。
A) 数据库不需要操作系统的支持
B) 数据库不需要操作系统的支持
C) 数据库是存储在计算机存储设备中的、结构化的相关数据的集合 D) 数据库系统中，数据的物理结构必须与逻辑结构一致
8.关系表中的每一横行称为一个( B )。
A) 字段 B) 元组 C) 行 D) 码
9.关系数据库管理系统能实现的专门关系运算包括( A )。
A) 选择、投影、连接 B) 排序、查找、统计 C) 关联、更新、排序 D) 显示、打印、制表
10.数据库概念设计的过程中，以下各项中不属于视图设计设计次序的是( B A) 自顶向下 B) 由整体到个体 C) 由内向外 D) 由底向上
11.Visual Basic集成环境由若干窗口组成，其中不能隐藏(关闭)的窗口是( A )。A) 主窗口 B) 属性窗口 C) 立即窗口 D) 窗体窗口
12.为了声明一个长度为128个字符的定长字符串变量StrD，以下语句中正确的是( A) Dim StrD As String B) Dim StrD As String(128) C) Dim StrD As String[128] D) Dim StrD As String*128
13.为了用键盘打开菜单和执行菜单命令，第一步应按的键是( A )。
A) 功能键F10或Alt B) Shift＋功能键F4 C) Ctrl或功能键F8 D) Ctrl＋Alt
)。
D )。
14.如果在Visual
Basic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是
( D )。
A) 用鼠标双击窗体的任何部位
B) 执行\工程\菜单中的\属性窗口\命令
C) 按Ctrl＋F4键 D) 按F4键
15.假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，
预先应执行的操作是( A )。
A) 单击窗体上没有控件的地方 B) 单击任意一个控件 C) 双击任意一个控件 D) 单击属性窗口的标题栏
16.下列操作中不能向工程添加窗体的是( A) 执行\工程\菜单中的\添加窗体\命令 B) 单击工具栏上的\添加窗体\按钮
C) 右击窗体，在弹出的菜单中选择\添加窗体\命令
D) 右击工程资源管理器，在弹出的菜单中选择\添加\命令，然后在下一级菜单中选择\添
C )。
加窗体\命令
17.设a＝2， b＝3， c＝4， d＝5， 表达式
Not a<＝c Or 4 * c＝b ^ 2 And b<>a＋c 的值是( D )。
A) －1 B) 1 C) True D) False
18.鼠标拖放控件要触发两个事件，这两个事件是( A) DragOver事件和DragDrop事件 B) Drag事件和DragDrop事件 C) MouseDown事件和KeyDown事件 D) MouseUp事件和KeyUp事件
A )。
19.在窗体上画一个通用对话框，程序运行中用ShowOpen方法显示\打开\对话框时，希望在
该对话框的\文件类型\栏中只显示扩展名为DOC的文件，则在设计阶段应把通用对话框的Filter属性设置为( D )。 A) \
B) \ C) \ D) \
20.以下叙述中错误的是( B )。
A) Print #语句和Write #语句都可以向文件中写入数据
B) 用Print #语句和Write #语句所建立的顺序文件格式总是一样的
C) 如果用Print #语句把数据输出到文件，则各数据项之间没有逗号分隔，字符串也不加双
引号
D) 如果用Write #语句把数据输出到文件，则各数据项之间自动插入逗号，并且把字符串加
上双引号
21.如果把命令按钮的Cancel属性设置为True，则程序运行后( A) 按Esc键与单击该命令按钮的作用相同 B) 按回车键与单击该命令按钮的作用相同 C) 按Esc键将停止程序的运行 D) 按回车键将中断程序的运行
22.为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效，必须把它的Style属性
A )。
设置为( B )。
A) 0 B) 1 C) True D) False
23.列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是( A) List B) ListIndex C) Text D) ListCount
24.为了使一个复选框被禁用(灰色显示)，应把它的Value属性设置为( A) 0 B) 1 C) 2 D) False
25.为了使文本框显示滚动条，除要设置ScrollBars外，还必须设置的属性是( A) AutoSize B) Alignment C) Multiline D) MaxLength
B )。
C )。
C )。
在窗体上画一个通用对话框，其名称为CommonDialog1，则下列与CommonDialog1.ShowOpen方法等效的语句是( A )。
26.
A) CommonDialog1.Action＝1 B) CommonDialog1.Action＝2 C) CommonDialog1.Action＝3 D) CommonDialog1.Action＝4
27.如果改变驱动器列表框的Drive属性，则将触发的事件是( A) Change B) Scroll
A )。
C) KeyDown D) KeyUp
28.为了调整图像框的大小以与其中的图形相适应，必须把它的Stretch属性设置为( A) True B) False C) 1 D) 2
29.在窗体上添加\控件\的正确的操作方式是(
B )。
C )。
A) 先单击工具箱中的控件图标，再单击窗体上适当位置 B) 先单击工具箱中的控件图标，再双击窗体上适当位置 C) 直接双击工具箱中的控件图标，该控件将出现在窗体上 D) 直接将工具箱中的控件图标拖动到窗体上适当位置
30.窗体上有一个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click() Dim arr_x(5， 5)As Integer For i＝1 To 3
For j＝2 To 4
arr_x(i， j)＝i * j
Next j Next i
Print arr_x(2， 1)； arr_x(3， 2)； arr_x(4， 3) End Sub
运行程序，并单击命令按钮，窗体上显示的内容为( A )。
A) 0 B) 2
6 0
6 0
C) 0 6 12 D) 2 6 12
31.有如下程序：
Private Sub Form_Click()
Dim i As Integer， n As Integer For i＝1 To 20 i＝i＋4 n＝n＋i
If i>10 Then Exit For Next
Print n End Sub
程序运行后，单击窗体，则输出结果是( D )。
A) 14 B) 15 C) 29 D) 30
32.窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim num As Integer， x As Integer
num＝Val(InputBox(\请输入一个正整数\ Select Case num Case Is>100 x＝x＋num Case Is<90 x＝num Case Else
x＝x * num End Select Print x；
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为( B )。
A) 0
0 0
B) 0 0 60 C) 0 90 0 D) 100 0 60
33.窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click() m＝－3.6 If Sgn(m)Then n＝Int(m) Else
n＝Abs(m) End If
Print n End Sub
运行程序，并单击命令按钮，窗体上显示的内容为( A )。
A) －4 B) －3 C) 3 D) 3.6
34.设有如下程序：
Private Sub Form_Click()
num＝InputBox(\请输入一个实数\ p＝InStr(num， \ If p>0 Then
Print Mid(num， p＋1) Else
Print \ End If
End Sub
运行程序，单击窗体，根据提示输入一个数值。如果输入的不是实数，则程序输出\END\；否则( C )。
A) 用字符方式输出该实数 B) 输出该实数的整数部分 C) 输出该实数的小数部分
D) 去掉实数中的小数点，保留所有数码输出
35.在窗体上画一个文本框，名称为Text1，然后编写如下程序：
Private Sub Form_Load() Show
Text1.Text＝\ Text1.SetFocus End Sub
Private Sub Form_Click()
Dim a As String， s As String a＝Text1.Text s＝\
For k＝1 To Len(a)
s＝UCase(Mid(a， k， 1))＋s Next k
Text1.Text＝s
End Sub
程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容( C )A) 与原字符串相同
B) 与原字符串中字符顺序相同，但所有字母均转换为大写 C) 为原字符串的逆序字符串，且所有字母转换为大写 D) 为原字符串的逆序字符串
36.有以下通用过程：
Function fun(N As Integer) s＝0
For k＝1 To N
s＝s＋k *(k＋1) Next k fun＝s
End Function
该过程的功能是( D )。
。
A) 计算N！
B) 计算1＋2＋3＋...＋N C) 计算1×2×2×3×3×... ×N×N
D) 计算1×2＋2×3＋3×4＋...＋N×(N＋1)
37.在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a$＝InputBox(\请输入一个二进制数\ n＝Len(a$) For i＝1 To n
Dec＝Dec * 2＋ (a$， i， 1) Next i
Print Dec End Sub
程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制
数，并单击\确定\按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在\ \处填入的内容是( D )。
A) Left B) Right C) Val D) Mid
38.设有如下事件过程：
Private Sub Form_Click() Sum＝0
For k＝1 To 3 If k<＝1 Then x＝1 ElseIf k<＝2 Then x＝2
ElseIf k<＝3 Then x＝3
Else
x＝4 End If
Sum＝Sum＋x
Next k Print Sum
End Sub
程序运行后，单击窗体，输出结果是( B )。
A) 9 B) 6 C) 3 D) 10
39.在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下
事件过程：
Private Sub Command1_Click() Dim arr(10) For i＝6 To 10 arr(i)＝i－5
Next i
Label1.Caption＝arr(0)＋arr(arr(10)/ arr(6)) End Sub
运行程序，单击命令按钮，则在标签中显示的是( A )。
A) 0 B) 1 C) 2 D) 3
40.在窗体上画一个名称为Text1的文本框，并编写如下程序：
Option Base 1
Private Sub Form_Click() Dim arr
Dim Start As Integer， Finish As Integer Dim Sum As Integer
arr＝Array(12， 4， 8， 16)
Start＝LBound(arr) Finish＝UBound(arr) Sum＝0
For i＝Start To Finish
Sum＝Sum＋arr(i) Next i
c＝Sum / Finish Text1.Text＝c
End Sub
运行程序，单击窗体，则在文本框中显示的是( B )。
A) 40 B) 10 C) 12 D) 16