作者：孙家启主编
出版社：人民邮电出版社
格式: AZW3, DOCX, EPUB, MOBI, PDF, TXT
新编VisualBasic程序设计上机实验教程(工业和信息化普通高等教育“十二五”规划教材立项项目)试读：
前言
本书是《新编VisuaI Basic程序设计教程》的配套教材。学习VisuaI Basic程序设计仅凭看书和听课是不够的。程序设计需要必备的理论知识指导，而更重要的是丰富的实践经验。许多细节是难以直接从教科书中体会的，必须经过自身实践才能真正领悟。因此，在学习过程中必须十分重视上机实践环节，包括编写和调试应用程序。本实验教程就是为了帮助读者更好地进行程序设计实践而编写的，全书归纳为4个部分。
第一部分是VisuaI Basic程序设计上机实验。每一个实验都包括了实验目的、实验要求、实验内容、实验步骤、思考与练习等。在这部分中，突出应用可视化工具和面向对象编程方法，以操作步骤为线索，强调实用性和操作性。
第二部分是VisuaI Basic程序设计综合实验（包含5个实验）。每个实验都包括了实验目的、实验要求、实验内容、实验步骤等。这部分是提高性的、难度较高的实验内容，根据学历层次（本科、专科）和学时（建议上机时数不小于30学时）的差异，学生可以在完成18个基本实验后选做或自学完成。
第三部分是VisuaI Basic程序设计无纸化考试样题及参考答案。为了帮助学生更好地备战，本书提供了4套无纸化考试样题及参考答案。考试样题给学生提供了一个自我检验的途径，让学生在学完本课程之后可以通过这些样题的检测，从中发现自己所学内容有哪些部分存在疑问，哪些知识掌握得还比较薄弱，从而可以进行有针对性的复习与巩固，最终达到通过考试的目的。
第四部分是附录，Visual Basic程序设计典型应用题—学生信息系统。
本书由孙家启任主编并最后统稿，万家华、王骏任副主编。孙家启编写第一部分第1章、第2章和第四部分，万家华编写第一部分第3章、第7章和第二部分综合实验1、实验2，王骏编写第一部分第4章、第6章、第10章和第三部分，刘书影编写第一部分第5章和第二部分综合实验3，曾莉编写第一部分第8章和第二部分综合实验4，姚成编写第一部分第9章和第二部分综合实验5。
本书的编写工作得到了安徽省内高校专家、同行的大力支持，特别是得到了安徽新华学院领导的大力支持，在此一并表示感谢！
由于编写时间仓促，加之水平有限，书中内容难免有疏误之处，欢迎广大读者批评指正。作者2013年1月第一部分Visual Basic程序设计上机实验
第1章 Visual Basic程序设计概论
第2章 简单Visual Basic程序设计
第3章 Visual Basic语言基础
第4章 数组
第5章 用户界面设计
第6章 菜单设计
第7章 鼠标与键盘事件
第8章 文件处理
第9章 数据库编程
第10章 使用ActiveX控件第1章 Visual Basic程序设计概论实验 认识Visual Basic 6.0系统及程序设计初步【实验目的】
通过本次实验，一方面练习Visual Basic 6.0 的启动和退出，熟悉Visual Basic 6.0 的集成开发环境；另一方面学习编写程序的步骤，加深对关键性概念的理解。【实验要求】
1．掌握Visual Basic 6.0的启动和退出的各种方法；
2．掌握定制Visual Basic 6.0开发环境的方法；
3．掌握开发Visual Basic 6.0程序的基本步骤，加深对Visual Basic 6.0关键性概念的理解。【实验要求】
1．利用多种方法启动Visual Basic 6.0系统；
2．利用多种方法退出Visual Basic 6.0系统；
3．定制Visual Basic 6.0开发环境；
4．编写一个简单的Visual Basic 6.0程序。【实验步骤】
1．启动Visual Basic 6.0系统
方法一：利用开始菜单启动Visual Basic 6.0。
单击“开始”→“所有程序”→“Microsoft VisualBasic6.0中文版”就可以启动Visual Basic 6.0中文版，如图1.1所示。
方法二：利用快捷方式启动Visual Basic 6.0。
双击桌面上的快捷图标就可以启动Visual Basic 6.0 中文版。采用这种方法必须先在桌面创建快捷方式。
方法三：利用“运行”命令启动Visual Basic 6.0。
操作步骤：
单击“开始”按钮，弹出“开始”菜单。
① 单击其中的“运行（R）…”选项，弹出如图1.2 所示的“运行”对话框。
② 单击图1.2 中的“浏览”按钮，弹出如图1.3 所示的“浏览”对话框。
③ 在“浏览”对话框中，打开"C:\Program Files\Microsoft Visual Studio\VB98\VB6.EXE"文件。图1.1 利用“开始”菜单启动Visual Basic 6.0的过程图1.2 “运行”对话框图1.3 “浏览”对话框
④ 单击“浏览”对话框中的“打开”按钮，再单击“运行”对话框中的“确定”按钮，就可以启动Visual Basic 6.0。
● 也可以直接在“运行”对话框中输入"C:\Program Files\Microsoft Visual Studio\VB98\VB6.EXE"。
● 根据 Visual Basic 6.0 安装位置来选择盘符。例如，安装在 D 盘则输入"D:\Program Files\Microsoft Visual Studio\VB98\VB6.EXE"。
在用上述任何一种方法启动Visual Basic 6.0后，将会弹出“新建工程”对话框，如图1.4所示，询问用户要创建的工程类别，系统默认为标准EXE文件。直接单击对话框中的“打开”按钮，就进入Visual Baisc 6.0 集成开发环境，如图1.5 所示。图1.4 “新建工程”对话框图1.5 Visual Basic 6.0的集成开发环境
2．退出Visual Basic 6.0系统
方法一：双击图1.5左上角的窗口控制图标，退出Visual Basic 6.0。
方法二：单击图1.5右上角的关闭控钮，退出Visual Basic 6.0。
方法三：单击图1.5中“文件”菜单，从下拉菜单中选择“退出”命令，就可以退出Visual Basic 6.0。
3．定制Visual Basic 6.0开发环境（1）使用菜单和拖动窗口的方法定制Visual Basic 6.0 集成开发环境。
操作步骤：
① 单击“工具窗口”、“工程资源管理器窗口”、“属性窗口”及“窗体布局窗口”右上角的关闭按钮，将这4个窗口全部关闭，为定制一个Visual Basic 6.0 集成开发环境做好准备。
② 使用以下方法定制Visual Basic 6.0 的集成开发环境：
● 单击“视图”菜单中的“工具箱”选项，打开“工具箱”窗口；
● 单击“视图”菜单中的“工程资源管理器”选项，打开“工程资源管理器”窗口；
● 单击“视图”菜单中的“属性窗口”选项，打开“属性”窗口；
● 单击“视图”菜单中的“窗体布局窗口”选项，打开“窗体布局”窗口。
最后得到如图1.5所示的窗口。
用鼠标拖动这4个窗口的标题栏，移动窗口到合适的位置，可以得到自己定制的集成开发环境，如将“属性”窗口拖动至图1.6所示的位置。图1.6 将“属性”窗口拖动到合适的位置后的集成开发环境（2）使用“选项”对话框定制Visual Basic 6.0 系统环境。
单击“工具”菜单中的“选项（）…”菜单项，系统弹出“选项”对话框，如图1.7所示。使用对话框中的各个选项卡，可以对Visual Basic 6.0 集成开发环境中的各种参数进行定制。
例如，选择“通用”选项卡，在“窗体网格设置”选项中选择“显示网格”，并设置“宽度”、“高度”值均为50，可以使网格更密一些，这样提高了控件对象的定位精度。
4．编写简单的Visual Basic应用程序
操作步骤：（1）利用资源管理器，在C盘名为“VB实验”的文件夹下创建一个名为“第1章实验1”的文件夹，如图1.8所示。（2）启动Visual Basic 6.0系统，并在“新建工程”对话框中，选择默认项“标准EXE”，单击“打开”按钮，创建一个“标准EXE”工程，如图1.1、图1.4和图1.5所示。图1.7 使用“选项”对话框定制VB 6.0集成开发环境图1.8 “VB实验”文件夹结构（3）利用Visual Basic 6.0的集成开发环境，依次通过拖动左侧工具箱上的“标签”控件与“命令按钮”控件，向窗体内添加1个标签与4个命令按钮，如图1.9所示。图1.9 从工具箱向窗体拖动控件（4）先设置窗体Form1的标题（属性名为Caption）为“第1章实验”，然后设置标签Label1的标题（属性名为Caption）为空；对于4个命令按钮，其中名称为 Command1 的按钮标题（属性名为Caption）设置为“屏幕输出”，名称为Command2的按钮标题设置为“标签输出”，名称为Command3的按钮标题设置为“屏幕内容清除”，名称为 Command4 的按钮标题设置为“标签内容清除”，如图1.10所示。图1.10 实验窗口界面
具体的操作步骤是，选中相应的控件后，利用图 1.6 中的属性窗口分别设置各控件的属性值。（5）通过编写代码，实现单击“屏幕输出”按钮，在窗体上打印“第一个VB示例”。单击“标签输出”按钮，在标签内输出“第一个VB示例”，单击“屏幕内容清除”按钮，清除刚才打印在窗体上的内容，单击“标签内容清除”按钮，则清除标签的内容。
具体的操作步骤是，直接在设计窗口上双击相应的按钮，即可进入相应按钮的 Click 事件代码过程，然后输入以下相应的过程代码。
Command1的Click事件过程代码
Print "第一个VB示例"
Command2的Click事件过程代码
Label1.Caption = "第一个VB示例"
Command3的Click事件过程代码
Cls
Command4的Click事件过程代码
Label1.Caption = " "
如图1.11所示。（6）按F5键或单击标准工具栏上的“运行”按钮，运行、调试应用程序。（7）单击标准工具栏上的“保存”按钮，将其保存到第一步建立的文件夹内，窗体名为“实验窗体”，工程名为“第1章实验工程”。保存完成后，工程资源管理器窗口如图1.12所示。图1.11 “VB实验”工程的代码窗口图1.12 实验工程资源管理器窗口（8）最后，利用文件菜单生成名为“第1章实验工程”的可执行的EXE文件。第2章 简单Visual Basic程序设计实验1 窗体对象【实验目的】
通过本次实验，掌握对Visual Basic中窗体对象的常用属性、方法与事件的应用。【实验要求】
1．掌握Visual Basic中窗体对象的常用属性设置。
2．掌握Visual Basic中窗体对象的典型事件与方法的应用。【实验内容】
1．分别通过属性窗口与代码方式设置窗体对象的常用属性。
2．通过示例验证窗体的常见事件的发生顺序。
3．通过示例了解窗体常用方法的功能。【实验步骤】（1）创建实验文件夹，命名为“第2 章实验1”，然后启动Visual Basic，并创建一个标准EXE工程。（2）如表2.1所示，设置窗体的相关属性。表2.1 窗体对象属性设置（3）在窗体上添加两个命令按钮控件，Caption属性分别设置为“修改位置与大小1”与“修改位置与大小2”，运行的初始界面如图2.1所示。图2.1 窗体的属性、事件与方法（4）编写代码并运行，演示窗体常用事件的触发动作，了解如何利用代码修改窗体的常用属性并掌握窗体的常用方法。
'窗体的装载（Load）事件
Private Sub Form_Load()
MsgBox "触发了窗体的Load事件"
End Sub
'窗体的单击（Click）事件
Private Sub Form_Click()
MsgBox "触发了窗体的Click单击事件"
Me.Cls
Me.Picture = LoadPicture()
Me.BackColor = vbWhite
Me.ForeColor = vbBlue
Print "使用了Cls方法"
Print "删除了背景图片"
Print "背景色改为白色，前景色改为蓝色"
End Sub
'窗体的改变大小（Resize）事件
Private Sub Form_Resize()
MsgBox "触发了窗体的Resize事件"
End Sub
'窗体的卸载（Unload）事件
Private Sub Form_Unload(Cancel As Integer)
MsgBox "触发了窗体的Unload事件"
End Sub
'改变窗体的位置与大小方法1
Private Sub Command1_Click()
'利用Move方法同时改变位置（Left为2000，Top为3000）及大小（Width为6000，Height为4000）
Me.Move 2000, 3000, 6000, 4000
End Sub
'改变窗体的位置与大小方法2
Private Sub Command2_Click()
'分别修改窗体的Height、Width属性改变大小
Me.Height = Me.Height + 200
Me.Width = Me.Width + 200
'分别修改窗体的Left与Top属性改变位置
Me.Left = Me.Left + 300
Me.Top = Me.Top + 300
End Sub（5）调试并运行程序，最终保存并生成可执行文件。程序开始运行时会自动触发 Load事件，用鼠标在窗体上单击会触发窗体的Click事件，并通过执行相应代码实现删除背景图片，修改背景色与前景色等操作。当单击窗体中的按钮修改窗体时，会触发窗体的 Resize事件，并改变窗体的大小与位置，最后关闭窗体会触发Unload事件。运行时的效果如图2.2所示。图2.2 窗体示例程序运行结果实验2 命令按钮、标签、文本框【实验目的】
通过本次实验，掌握 Visual Basic 中对命令按钮、标签、文本框对象的常用属性的设置，及其方法与事件的应用。【实验要求】
1．掌握Visual Basic中按钮、标签、文本框对象的常用属性设置。
2．掌握Visual Basic中按钮、标签、文本框对象的典型事件与方法的应用。【实验内容】
1．分别通过属性窗口与代码方式设置按钮、标签、文本框对象的常用属性。
2．通过示例验证按钮、标签、文本框对象的典型事件与方法的应用。【实验步骤】（1）创建实验文件夹，命名为“第2章实验2”，然后启动Visual Basic，并创建一个标准EXE工程。（2）向窗体上添加一些必要的控件，然后如表 2.2 所示设置窗体及各控件的相关属性。设置完成后的窗体初始状态如图2.3所示。表2.2 窗体及各控件的初始属性设置续表图2.3 命令按钮、标签与文本框示例（3）编写代码，演示命令按钮、标签及文本框控件的常用属性、事件及方法。代码如下：
Private Sub Command1_Click()
Label1.Alignment = 2
Command1.Enabled = False
Command2.Enabled = True
End Sub
Private Sub Command2_Click()
Label1.Alignment = 0
Command2.Enabled = False
Command1.Enabled = True
End Sub
Private Sub Command3_Click()
Label2.AutoSize = True
End Sub
Private Sub Form_Click()
Command1.Value = True
Text1.SetFocus
End Sub
Private Sub Text1_LostFocus()
Label3.Caption = Text1.Text
End Sub
Private Sub Text2_LostFocus()
Label3.Caption = "你从第" & Text2.SelStart _
& "个字符后开始选取，选定文本的长度是" & _
Text2.SelLength & ",选定的文本内容是：" & Text2.SelText
End Sub（4）运行、调试并保存工程。
① 单击 Command1 触发其 Click 事件，此时会将 Label1 的内容设置为居中对齐。同时，将Command1的Enabled属性设置为False，使其变为灰色失效，并设置Command2的Enabled属性为 True。单击 Command2 触发其 Click 事件，会将 Label1 的内容设置为左对齐，并相应修改Command1与Command2的Enabled属性，如图2.4所示。图2.4 标签与命令按钮示例
② 按Alt+C和Alt+L组合键能分别触发Command1与Command2的Click事件。
③ 鼠标在 Command1 上停留一会可以看到“将标签内容左对齐”的提示，这是由 ToolTipText 属性决定的。
④ 窗体最初运行时，不能完整显示Label2的内容，单击 Command3 触发其 Click 事件，此时会将 Label2 的Autosize属性设置为True，完整显示Label2的内容。
⑤ 在文本框Text1 内输入内容时，最多6个字符，输入的内容会被*号遮掩。
⑥ 当焦点离开文本框Textl时，会自动将Text1 的内容在标签Label3 内显示出来。
⑦ 单击窗体时会将Command1的Value设置为True，从而触发Command1的Click事件；同时会调用Text1的Setfocus方法，使Text1获得焦点。实验3 简单Visual Basic应用程序创建实例【实验目的】
通过本次实验，掌握完整的 Visual Basic 应用程序的创建、窗体设计、代码编辑、调试与运行、保存、编译生成可执行文件及打包制作安装盘的过程。【实验要求】
1．掌握完整的Visual Basic应用程序的制作流程。
2．了解创建Visual Basic应用程序、生成可执行文件、打包制作安装盘的联系与区别。【实验内容】
设计一个窗体，通过命令按钮控制窗体中标签里内容的显示与隐藏，最终生成可执行文件并打包制作安装盘。
1．创建实验文件夹，命名为“第2章实验3”；
2．利用Visual Basic创建一个应用程序；
3．在窗体上添加一个标签Label1，标题为“Visual Basic示例”，两个命令按钮，一个名称为Command1，标题为“隐藏”，另一个名称为 Command2，标题为“显示”，同时将窗体的标题修改为“文字的显示与隐藏”；
4．编写代码，单击“隐藏”按钮文字被隐藏，单击“显示”按钮隐藏的文字又会被显示出来，单击窗体结束程序；
5．运行、调试；
6．保存工程到刚才建立的文件夹内；工程文件名设置为“我的工程.VBP”，工程名设置为“实验3工程”，然后在工程中建立窗体文件“我的窗体.FRM”，窗体名设置为“实验3窗体”；
7．生成可执行文件“我的工程.EXE”；
8．制作程序的安装包。
设计好的程序界面如图2.5所示。图2.5 简单的Visua Basic程序示例【实验步骤】（1）打开Windows资源管理器，创建实验文件夹，命名为“第2章实验3”。（2）启动Visual Basic程序，并创建一个标准EXE工程。创建工程文件及窗体文件，并以指定名称进行保存。（3）在窗体上添加控件和修改控件的属性。
① 先从工具箱选择需要的控件，然后在窗体上根据需要绘制出相应大小的控件。按此方法依次向窗体添加标签控件Label1，命令按钮控件Command1与Command2。
② 设置控件对象的属性。根据要求分别设置窗体对象Form1 的Caption（标题）属性为“文字的显示与隐藏”，标签对象Label1 的Caption 属性为“Visual Basic示例”，命令按钮对象Command1的Caption属性为“隐藏”，Command2的Caption属性为“显示”。此时，已得到类似图2.5所示的界面。（4）编写命令按钮Command1与Command2，以及窗体Form1的事件过程代码。直接在窗体上双击 Command1 对象，打开代码编辑窗口，同时自动生成了 Command1 对象的单击事件过程（Click）的代码框架，此时可以直接在代码框架内输入代码：
Label1.Visible = False
其中Visible属性用于决定对象是否可见，取值为True表示可见，False表示不可见。
在代码编辑窗口的顶部有两个下拉列表框，左侧一个用于显示要编程的对象，右侧选择对象要响应的事件过程，如图2.6所示。
依次选择编程对象为Command2，响应的事件为Click，然后在Command2的Click事件代码框架内输入代码：图2.6 代码编辑窗口中对象与事件下拉列表框
Label1.Visible = True
用同样的方法选择编程对象为Form1，响应事件为Click，在Form1的Click事件代码框架内输入代码：
End
如图2.7所示。图2.7 代码编辑窗口
试读结束[说明：试读内容隐藏了图片]