|
|
2015年秋季学期《VB程序设计》在线考试(适用于2015年12月份考试)
一、单选题（共 15 道试题，共 15 分。）V
1. 运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的（ ）事件
A. CLICK
B. DBLCLICK
C. GOTFOCUS
D. CHANGE
满分：1 分
2. 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，以下能实现上述操作的程序段是（ ）
A. Private Sub HScroll_Change()
Text1.Text=HScroll1.Value
End Sub
B. Private Sub HScroll_Click()
Text1.Text=HScroll1.Value
End Sub
C. Private Sub HScroll_Change()
Text1.Text=HScroll.Caption
End Sub
D. Private Sub HScroll_Click()
Text1.Text=HScroll.Caption
End Sub
满分：1 分
3. 为了防止用户随意将光标置于控件上，应（ ）
A. 将控件的TABINDEX属性设置为0
B. 将控件的TABSTOP属性设置为TRUE
C. 将控件的TABSTOP属性设置为FALSE
D. 将控件的ENABLED属性设置为FALSE
满分：1 分
4. 下列关于控件画法的叙述错误的是（ ）
A. 单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件
B. 按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件
C. 双击工具箱中的控件图标，所画控件的大小和位置是固定的
D. 不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符
满分：1 分
5. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=InputBox("Input")
Select Case x
Case 1,3
Print "分支 1"
Case Is >4
Print "分支 2"
Case Else
Print "Else 分支 "
End Select
End Sub
程序运行后，如果在输入对话框中输入2，则窗体上显示的是（. ）
A. 分支1
B. 分支2
C. Else分支
D. 程序出错
满分：1 分
6. InputBox函数返回值的类型为（ ）
A. 数值
B. 字符串
C. 变体
D. 值或字符串（视输入的数据而定）
满分：1 分
7. 当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到（ ）
A. MouseDown
B. MouseUp
C. Load
D. Click
满分：1 分
8. 窗体Form1的Name属性是Frm1，它的单击事件过程名是（ ）
A. Form1_Click
B. Form_Click
C. Frm1_Click
D. Me_Click
满分：1 分
9. 语句DIM AA(3,4,5)中定义的数组有多少个元素（ ）
A. 12
B. 60
C. 120
D. 345
10. 当一个对象（如窗体或图片框）被移动或改变大小之后，或当一个覆盖该窗体被移开之后，如果要保持该所画图形的完整性，可以选择触发（ ）事件来完成图形的重画工作
A. Paint
B. Load
C. Click
D. Active
11. 用于设置通用对话框控件显示文件类型的属性是（ ）
A. Filter
B. Path
C. Partern
D. FoleName
满分：1 分
12. 用于从内存删除窗体的命令是（ ）
A. Move
B. Hide
C. Unload
D. Delete
满分：1 分
13. 以下叙述中错误的是（ ）
A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B. Sub过程中不能嵌套定义Sub过程
C. Sub过程中可以嵌套调用Sub过程
D. 事件过程可以像通用过程一样由用户定义过程名
满分：1 分
14. 设菜单中有一个菜单项为“Open”。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行“Open”命令，则在菜单编辑器中设置“Open”命令的方式是（ ）
A. 把Caption属性设置为&Open
B. 把Caption属性设置为O&pen
C. 把Name属性设置为&Open
D. 把Name属性设置为O&pen
满分：1 分
15. 下列说法正确的是（ ）
A. 对象属性只能在“属性窗口”中设置
B. 一个新的工程可以在“工程窗口”中建立
C. 必须先建立一个工程，才能开始设计应用程序
D. 只能在“代码窗口”中编写程序代码
满分：1 分
二、计算题（共 2 道试题，共 10 分。）V
1.读下面的程序，分析其功能，写出运行结果。
在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：
Private Sub Command1_Click()
For I = 1 To 4
For J = 0 To I
Print Chr$(65 + I);
Next J
Print
Next I
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？
答案如下
2. 分析以下程序，写出运行结果。
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
答案如下
三、简答题（共 10 道试题，共 30 分。）V
1. 为什么要生成可执行文件和制作安装盘？
2. 菜单的形式有哪两种？ 满分：3 分
3. 滚动条的change事件和scroll事件有什么不同？ 满分：3 分
4. 颜色函数主要有哪些？ 满分：3 分
5. 在设计状态，若用户想打开代码窗口，应怎样操作？代码窗口主要包括哪几部分？ 满分：3 分
6. 如何在框架中建立控件？ 满分：3 分
7. EOF函数的功能是什么？ 满分：3 分
8. 逐语句和逐过程有什么区别？ 满分：3 分
9. 如何为一个菜单项设置热键和快捷键？ 满分：3 分
10. 如何使用帮助功能？ 满分：3 分
四、论述题（共 2 道试题，共 20 分。）V
1. 编程题满分：10 分
编程实现对n个整数按由小到大的顺序排序。（界面自行设计）
参考程序如下：
2. 编程题满分：10 分
求一元二次方程ax2+bx+c=0的根（包括实根和复根）界面自行设计
参考程序如下：
五、主观填空题（共 1 道试题，共 5 分。）V
1. 设某列表框共有10项，按题目要求补齐程序，完成相应的功能。
（1）按下命令按钮Command1时将列表框第8项的内容显示在窗体上：
Private Sub Command1_Click( )
List.
(7)=True
Print List1.
End Sub
（2）单击列表框某一项时立即将该项打印在窗体上：
Private Sub List1_Click( )
Print
End Sub
（3）按下命令按钮Command1时在窗体上删除第1、3、5、7、9项：
Private Sub Command1_Click( )
For I=1 To 5
List1.
Next I
End Sub
（4）在列表框的每一项之后插入一个新的项：
Private Sub Command1_Click( )
For I=1 to 10
X=InputBox(“请输入插入的第” & I & “项内容”)
List1.AddItem
Next I
End Sub
试题满分：5 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
第 3 空、 满分：1 分
第 4 空、 满分：1 分
第 5 空、 满分：1 分
答案
六、主观填空题（共 1 道试题，共 4 分。）V
1. 设在界面上放置了一个滚动条Hscroll1和一个标签控件Label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。
Private Sub Hscroll1.
( )
Label1.Caption = Hscroll1.
End Sub
要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码。
Private Sub Hscroll1.
( )
Label1.Caption = Hscroll1.
End Sub
试题满分：4 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
第 3 空、 满分：1 分
第 4 空、 满分：1 分
答案
七、主观填空题（共 2 道试题，共 6 分。）V
1. 在VB中，用语句设定数组的下界，用和语句分别返回数组的上、下界。试题满分：3 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
第 3 空、 满分：1 分
答案
2. 在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并在文本框中显示出来。请填空。
Option Base 1
Dim a(3,2) As Integer
Private Sub Command1_Click() ‘“初始化”命令按钮
For i=1 To 3
For j=1 To 2
=i+j
Next j
Next i
End Sub
Private Sub Command2_Click() ‘ “求和”命令按钮
For j=1 To 3
For i=1 To 2
s=s+
Next i
Next j
Text1.Text=
End Sub
试题满分：3 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
第 3 空、 满分：1 分
参考答案
八、主观填空题（共 2 道试题，共 4 分。）V
1. VB中的数据以四种形式存储：常量、、和记录。 试题满分：2 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
2. 生成消息框的命令是，生成输入框的命令是。 试题满分：2 分
第 1 空、 满分：1 分
第 2 空、 满分：1 分
参考答案
九、主观填空题（共 6 道试题，共 6 分。）V
1. 所有控件都具有的共同属性是属性。 试题满分：1 分
2. 要将焦点定位到命令按钮Command1上，需要使用代码。 试题
3. 为了使一个Picture控件能自动根据装入的图片调整大小，应设
4. 表达式10 Mod 6 \ 4的值为。 试题满分：1 分
5.有相同性质的对象的。 试题满分：1 分
6. 对于正在使用的动态数组Arraya()，要增加一个单元，但不能破坏数组内的数据，则应使用语句。
需要答案请在附件下载
|
|
