vb程序设计教程

《VB程序设计教程》（第3版）习题解答

习题1答案

一、选择题

1.1 Visual Basic 6.0分为3种版本，不属于这3种版本的是 A）学习版 B）专业版 C）企业版 D）业余版 【答】D。

1.2 下列方法中不能退出Visual Basic的是 A）按Alt+Q组合键

B）按下Alt+F组合键，然后按Esc键 C）按F10键，然后按F键，再按X键 D）打开“文件”菜单→“退出”命令 【答】B。

1.3 Visual Basic集成的主窗口中不包括 A）属性窗口 B）标题栏 C）菜单栏 D）工具栏 【答】A。

1.4 下列操作可以打开立即窗口的是 A）Ctrl+D B）Ctrl+F C）Ctrl+G D）Ctrl+E 【答】C。 二、填空题

1.5 与传统的程序设计语言相比，Visual Basic最突出的特点是____。 【答】事件驱动编程机制。

1.6 如果不使用鼠标，用键盘打开菜单和执行菜单命令，第一步应按____键。

【答】功能键F10或Alt键。

1.7 建立一个新的标准模块，应该选择____菜单下的“添加模块”命令。 【答】“工程”菜单。

三、思考题

1.8 简述Visua

《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、 随机访问模式

（八）数据库

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

VB程序设计部分 重点程序

08管理VB程序设计部分1.

几里德算法）求两个自然数的最大公约数的算法。

（欧Private Sub Form_Click() Dim n%, m%, g%

n = InputBox("输入N") m = InputBox("输入M") g = gcd(n, m)

Print n; "和"; m; "的最大公约数是："; g Private Function gcd(ByVal a%, ByVal b%) End Sub

Dim r As Integer r = a Mod b Do While r <> 0 a = b b = r

gcd = b

Loop r = a Mod b End Function

2. 存放在数组编写一个数组，随机产生compare中，并从中找出一个最12个两位数，大数和一个最小数

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

VB科期中试卷

班级： 姓名： 座号： 成绩：

一、选择题（每题1分，共35分）

1．以下4个选项中，属性窗口未包含的是（ ）。

A、对象列表 B、工具箱 C、属性列表 D、信息栏 2．事件的名称（ ）。

A、都是由系统预先定义 B、都要由用户定义 C、有的由用户定义，有的由系统定义 D、是不固定的 3．窗体的caption属性值是（ ）类型的数据。 A、整型 B、字符型 C、逻辑型 D、实型

4．．改变控件在窗体中的左右位置应修改该控件的（ ）属性。 A、Top B、Left C、Width D、Right 5．为了装入一个VB应用程序，应当（ ）。 A、分别装入工程文件和标准模块文件 B、只装入窗体模块文件

C、只装入工程文件

D、分别工程文件、窗体文件和标准模块文件 6．以下进入代码窗口的方法中错误的是（ ）

实验A A．1

Private Sub Command1_Click() Label3 = Text1 End Sub

A．2

Private Sub Form_Load() Timer1.Interval = 0 End Sub

Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub

Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub

Private Sub Timer1_Timer() Call MyMove End Sub

Sub MyMove()

Label1.Move Label1.Left - 50

If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub

A．3

Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub

Private Sub Form_Load() Text1 = 0 End Sub

A．4

Private Sub Form_Click()

Caption

Vb6.0

第一章 一、判断题

1．属性是Visual Basic对象性质的描述，对象的数据就保存在属性中。 2．控件的属性值不可以在程序运行时动态地修改。

3．许多属性可以直接在属性表上设置、修改，并立即在屏幕上看到效果。 4．所谓保存工程，是指保存正在编辑的工程的窗体。

5．面向对象的程序设计是一种以对象为基础，由事件驱动对象执行的设计方法。 6．为了使一个控件在运行时不可见，应该将该控件的Enabled属性设置为False。 7．保存Visual Basic文件时，若一个工程包含多个窗体或模块，则系统先保存工程文件，再分别保存各窗体或模块文件。

8．事件是由Visual Basic预先定义的对象能够识别的动作。 9．方法是Visual Basic对象可以相应的用户操作。

10．窗体中的控件，是使用工具箱中的工具在窗体上画出的各图形对象。 11．由Visual Basic语言编写的应用程序有解释和编译两种执行方式。

12．在打开一个Visual Basic工程进行修改后，要另存为一个版本，只需单击“工程另存为…”就行，因为系统将同时保存其他文件。

13．当用Load命令将窗体装入内存时，一定触发窗体的load事件和Activate事件.

实验A A．1

Private Sub Command1_Click() Label3 = Text1 End Sub

A．2

Private Sub Form_Load() Timer1.Interval = 0 End Sub

Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub

Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub

Private Sub Timer1_Timer() Call MyMove End Sub

Sub MyMove()

Label1.Move Label1.Left - 50

If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub

A．3

Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub

Private Sub Form_Load() Text1 = 0 End Sub

A．4

Private Sub Form_Click()

Caption