vb程序设计题库及答案

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

程序设计 第一题 题目：（事件）单击窗体

（响应）求50以内所有偶数的和，并在窗体上输出来。 将结果存入变量S中。 代码：Dim I As Integer For i = 2 To 50

If (i Mod 2)=0 Then S=s+i End If Next

Print (CStr(s)) 第二题 题目：（事件）双击窗体

（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中 代码：Dim i,j As Integer Dim k As Long k=1 s=0

For i =1To 10 For j=1 To i k=k*j Next s=s+k k=1 Next

Print(CStr(s)) 第三题 题目：（事件）单击窗体

（响应）求100以内偶数的和，并将结果输出在窗体上。

例题1-1. Visual Basic中的标准模块文件的扩展名是________。 A. reg B. frm C. bas D. vbp 例题1-2. VB的使用目的是________。

A. 开发Windows应用程序 B. 图像处理

C. 制作WAV文件 D. 文字处理

例题1-3. Visual Basic是一种面向________的程序设计语言。

A. 过程 B. 用户 C. 方法 D. 对象

例题1-5. Visual Basic是用于开发________环境下的应用程序的

工具。

A. DOS B. Windows

C. DOS和Windows D. UNIX

例题2-1. 在设计列表框时，若实现输入多行文字的目的，应使用

________键实现文本的换行。

A. Enter B. Alt+Enter C. Ctrl+Shift+Enter D. Ctrl+Enter

例题

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

VB程序设计

一、判断题

1. 同一Form窗体中的各控件可以相互重叠，其显示的上下层次的次序不可以调整。（ X ） 2. 一个对象的若能识别多个事件，我们只能对其中一个事件编程（ ? ）

3. 单选按钮与复选框对象的Value属性类型不同，且只能取值True和False。（ √ ） 4. 事件过程由某个用户事件或系统事件触发执行，它不能被其他过程调用。（ ? ） 5. 图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框有关属性的值。（ √ ）

6. “A=B=C”是一个合法的Visual Basic语句。（ ? ）

7. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时，组合框会自动把这一条目添加到它的列表框中。（ ? ）

8. Visual Basic程序的运行可以从 Main（）过程启动，也可以从某个窗体启动。（ √ ） 9. 在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。（? ） 10. 对于文件系统控件，当驱动器控件Drivel中的驱动器符改变时，文件夹列表控件Dir1中显示的文件夹也作相应的改变，可以在Drive1中的Change事件中

VB课后习题解答

第一、二章：

1、 简述VB6.0的主要特点

答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。 2、 当正常安装VB6.0后，误把Windows子目录删除。当重新安装Windows后，是否需要再次安装VB6.0？

答：要重新安装的。因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。

3、 Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？

答：在VB6.0的启动界面上，能显示对应的版本。 4、 叙述建立一个完整应用程序的过程

答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。

5、 Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？

答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。 6、 当建立好一个简单的应用程序后，假定该

一、单选 共300题 （共计300分）

滚动条的( )属性用于指定用户单击滚动条的滚动箭头时,Value属性值的改变量. A:Value B:LargeChange C:Change D:SmallChange 答案：D

运行时,当用户向文本框输入新的内容,或在程序代码中对文本框 的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文 本框的()事件. A:CLICK B:DBLCLICK C:GOTFOCUS D:CHANGE 答案：D

要获得用户在组合框输入的内容,应利用的组合框的属性是( ). A:List B:ListIndex C:Selected D:Text 答案：D

输入对话框InputBox的返回值的类型是 . A:长整数

1

B:字符串 C:浮点数 D:整数 案：B

要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. A:alignment B:usemnemonic C:autosize D:tag 答案：C

假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(). A:BOOLVAR='TRUE' B:BOOLVAR=.TRUE. C:BOOLVAR=#TR

1.要使一个标签能够显示所需要的文本，应设置该标签的( )属性的值(单) A.Caption B.Name C.Text D.AutoSize

2.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为( )(单)

A.5 B.300 C.500 D.5000

3.下列的( )对象支持KeyPress事件(单)

A.文本框 B.命令按钮 C.标签框 D.图像框 4.确定一个控件在窗体上的位置的属性是( )(单)

A.Width或Height B.Top和Height C.Top或Width D.Top和Left 5.确定一个窗体或控件的大小的属性是( )(单)

A.Width或Height B.Top和Width C.Top或Left D.Top和Left

6.用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，这称为( )(单)

A.面向对象的程序设计 B.结构化程序设计 C.事件驱动的编程机制 D.程序设计 7.在VB中，工程文件的扩展名是( )(单) A..fr

《VB语言程序设计》教材 林卓然编著 年1月出版 电子工业出版社2003书号: 5053-8421-X/TP.4904 元 定价: 23编者免费提供本教材的课堂教学用的电子教案。需要电子教 案及习题解答的教师，可从电子工业出版社网站的“资源下载”区中下载，也可直接与编者联系（Puslzr@zsu.edu.cn）。 《VB语言程序设计》习 题 参 考 答 案

第1章习题

一、单选题

1．D 7．A

2．B 8．B

3．C 9．C

4．A

5．C 6. A

10．(1)A (2)B

二、多选题

1．ACDE

2．BCDE 3．CD 4. CE

2．解释，编译 3．设计，运行，中断

三、填空题

1．事件驱动

4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print \语言程