当前位置:文档之家› 电大VB期末考试

电大VB期末考试

2847VisualBasic程序设计-0006
试卷总分:100 答题时间:60分钟
客观题
单项选择题(共16题,共48分)
1. 在正确安装Visual Basic6.0后,可以通过多种方法启动Visual Basic ,以下方式中不能启动Visual Basic的是()。

D 进入DOS方式,执行vb6.exe
2. 在VB6.0集成开发环境中有三种工作模式,下列不属于三种工作模式之一的是()。

D 编写代码模式
3. 下列不正确的赋值语句是()。

B x + y = 15
4. MsgBox函数的返回值的类型是()。

A 整型
5. 下列关于属性设置的叙述错误的是()。

A 控件具有什么属性是VB预先设计好的,用户不能改变
6. 在Visual Basic中,如果一个变量未作类型声明而直接使用,则该变量的数据类型是()。

C 变体类型
7. 对于窗体级变量,下列说法中错误的是()。

C 所在窗体的子程序不能访问用Private定义的窗体级变量
8. 在Visual Basic中,下列优先级最高的是()。

A *
9. 在VB工程中,可以作为启动对象的是()。

D Sub Main过程或任何窗体
10. 在设计菜单时,如果要在菜单中加入一个菜单分隔条,则菜单分隔条的标题必须设置为()。

B 减号(-)
11. Dim A(1 To 6, 6) As String定义的数组包含的元素个数是()。

C 42
12. 以下关于过程和过程参数的描述中,错误的是()。

C 只有函数过程能够将过程中处理的信息传回到调用的程序中
13. 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

当改变当前驱动器时,目录列表框应该与其同步改变。

设置两个控件同步的命令放在一个事件过程中,这个事件过程是( )。

B Drive1 Change
14. 重新定义图片框控件的坐标系统,可采用该图片框的方法是()。

A Scale
15. 如果希望返回远程机器的IP地址,可以使用Winsock控件的()属性。

C RemoteHostIP
16. Access数据库文件的扩展名是()。

D mdb
判断题(共14题,共28分)
1. 新建工程时系统会自动将窗体标题设置为Form1。

T √
2. 每个对象都有一系列预先定义好的对象事件,但要使对象能响应具体的事件,需要编写该对象相应的事件过程。

T √
3. 在程序中Name 属性作为对象的标识被引用,不会显示在窗体上,而控件上显示的内容由Caption属性决定。

T √
4. Timer控件在程序运行时是可见的。

F ×
5. 任何一种循环都必须有起始语句和终端语句。

T √
6. If x >y Then Max=x Else Max=y 程序段是求两个数中的最大数。

T √
7. 移动框架时框架内的控件也跟随移动,所以框架内各控件的Left与Top属性值也随之改变。

F ×
8. 列表框控件中最后一项的序号等于ListCount属性减1。

T √
9. 用Private、Static定义过程只能被定义它的窗体模块及标准模块中的语句、过程调用。

T √
10. 数组元素中的下标的个数称为数组的维数。

F ×
11. 在Visual Basic程序中实现删除文件" d:/tem.tmp "的语句为Kill " d:/tem.tmp "。

T √
12. Image与PictureBox的AutoSize属性功能一样。

F ×
13. 使用ADO模型时,可通过ActiveConnection属性建立Recordset和Connection对象的连接。

T √
14. ADO模型中一般可通过Conection对象的Execute方法执行增加、删除、修改SQL语句。

T √
程序阅读分析题(共4题,共24分)
1. Private Sub Command1_Click()
Static x As Integer
Cls
For I = 1 To 2
y = y + x
x = x + 2
Next I
Print x, y
End Sub
程序运行后,连续三次单击Command1按钮后,窗体上显示的是()。

B 12 18
2. Private Sub Form_Click()
Dim I As Integer, j As Integer
Dim c As Integer
c = 0
For I = 1 To 3
For j = 1 To 2
c = c + 3
Next j
Next I
Print c
End Sub
程序运行后,单击窗体,在窗体上显示的结果是()。

A 18
3. Private Sub Form_click()
b = 1
Do While b < 40
b = b * (b + 1)
Loop
Print b
End Sub
程序运行后,单击窗体,在窗体上显示的值为()。

A 42
4. Private Sub Form_Click()
I = 0
For G = 10 To 19 Step 3
I = I + 1
Next G
Print I
End Sub
程序运行后,单击窗体,在窗体上显示的值是()。

A 4。

相关主题