Basic案例教程解读

《Visual Basic案例教程》
清华大学出版社 11.3.3 管理向导脚步 管理教本主要包含： ● 查看所有打包或部署脚本的列表。 ● 重命名一个脚本。 ● 创建一个具有新名字的脚本副本。 ● 删除不再需要的脚本。
《Visual Basic案例教程》
清华大学出版社 11.3.4 定制安装程序
《Visual Basic案例教程》
清华大学出版社
Function FileExists (filename) As Boolean Dim Msg As String '如果检测到任何一个错误，则开始捕获错误，从而响应错误处理程 序 On Error GoTo CheckError FileExists = (Dir(filename) <> "") '如果未出现错误，则避免使用错误处理程序。 Exit Function CheckError: '如果出现错误，则在此分枝。 '定义常数以表示固定的 Visual Basic 错误代码。 Const mnErrDiskNotReady = 71, mnErrDeviceUnavailable = 68 ' vbExclamation、vbOK、vbCancel、vbCritical 和 vbOKCancel 是 '定义在 VBA 类型库中的常数。
清华大学出版社
第11章 Visual Basic应用系统开发及其集成技术
教学要求：通过本章的学习让读者学会如何去制作 比较简单的系统封面、可以处理一般的VB错误以及为可 能方程的错误设置错误陷阱以及学会应用程序的打包与 发布。
11.1 应用系统封面的制作与系统集成
11.2 系统调试与错误处理 11.3 应用系统的发布与安装盘的建立 11.4 小结
《Visual Basic案例教程》
《Visual Basic案例教程》
清华大学出版社 2. 调试工具提供帮助 调试工具的功能是帮助处理： ● 逻辑错误和运行时错误。 ● 观察无错代码的状况。 调试工具提供了应用程序当前状态的快照，包括： ● 用户界面 (UI) 的外观 ● 变量、表达式和属性的值 ● 活动的过程调用 越是透彻了解应用程序的运行，就越能迅速发 现错误。
《Visual Basic案例教程》
清华大学出版社 11.1.3用人工控制法制作系统封面
1. 在窗体Form1中拖放一个时间控件Timer1 和一个容器 控 件 Frame1, 然 后 在 Frame1 上 拖 放 一 个 命 令 按 钮 Command1， 2.把所有主程序工作控件都放在Frame1上。 3. 为窗体及各控件编写事件代码。
《Visual Basic案例教程》
清华大学出版社
11.3 应用系统的发布与安装盘的建立
11.3.1 使用程序打包与展开向导打包应用程序 ● 自动搜索指定工程所以来的所有文件； ● 允许用户添加工程中附加的文件； ● 自动压缩所有需要安装的文件。在指定生成 安装磁盘组的情况下，对于一些需要跨磁盘存 放的文件自动分解成若干个压缩文件； ● 为用户建立一个Setup程序和一个用于卸载的 程序。
(1) BootStrap段 本列出了关于应用程序的核心信息，例如应用程序的主安 装程序的名称、在安装过程中使用的临时目录以及在安 装过程的起始窗口出现的文字。 (2) BootStrap Files 段 本段列出了在加载您的应用程序和从属文件之前，必须 加载入用户机器的所有文件。 (3) Icon Group段 本段包含了关于安装过程所创建的“启动”菜单的程序 组的信息。 (4) Setup段 Setup.lst 文件的 Setup 段是一个简单的列表
《Visual Basic案例教程》
清华大学出版社 11.2.4使用调试窗口 1. 立即窗口
立即窗口可以帮助用户检查变量或属性的值， 也可以重新设置变量或属性的值。
《Visual Basic案例教程》
清华大学出版社 2.监视窗体
《Visual Basic案例教程》
清华大学出版社 3. 本地窗口 本地窗口显示当前过程中所有变量的值。
《Visual Basic案例教程》
清华大学出版社 (8) 设置完应用程序组和图标以后，单击下一步 显示对话框使用户设定那些非系统文件的安装 位置。 (9) 指定文件安装位置以后，单击下一步弹出 对话框指定作为共享安装的文件 。 (10) 单击下一步，弹出对话框用来输入一个名 字用于保存前面的步骤中所收集到的信息，当 输入文件名以后，单击“完成”按钮开始为工 程进行打包生成安装程序。 (11) 打包完成后，会自动产生一个带有很多重 要信息的报表。
《Visual Basic案例教程》
清华大学出版社 11.2.3 系统调试方法 Visual Basic 的调试支持包括：断点、中断表达 式、监视表达式、通过代码一次经过一个语句或 一个过程、显示变量和属性的值。 1. 错误类型 三种类型的错误： 语法错误、运行时期错误和逻辑错误。 (1) 语法错误 (2) 运行时期错误 (3) 逻辑错误
《Visual Basic案例教程》
清华大学出版社
3.关闭错误处理 如果在过程中激活了错误捕获，则当过程完成执行时， 错误捕获会自动无效。
Sub ErrDemoSub () On Error GoTo SubHandler Kill "test.bmp“ ' Kill 函数用于删除文件 On Error GoTo 0 Kill " test.bmp " On Error GoTo SubHandler '再次激活错误捕获 Kill " test.bmp " Exit Sub SubHandler: MsgBox "发生错误！" Resume Next End Sub
《Visual Basic案例教程》
清华大学出版社 11.1.2用自然顺序法创建系统封面
所谓自然顺序法是指按照封面窗体的启动与卸出自然顺 序来创建系统封面，此种方法是通常采用的方法，即在 程序中创建两个或两个以上的Form窗体，把其中的一个 作为专门的程序封面制作场所， 分1,2,3,4,5,6共六步骤创建。
《Visual Basic案例教程》
清华大学出版社 11.2.2 设计错误处理程序
错误处理程序是应用程序中捕获和响应错误的例程。对 于预感可能会出错的任何过程（应该假定任何 Basic 语句都可能导致错误，除非确知情况并非如此），均 要对这些过程添加错误处理程序。设计错误处理程序 的进程包括三步：
《Visual Basic案例教程》
清华大学出版社 11.1 应用系统封面的制作与系统集成
11.1.1 如何创建系统封面
1. 封面的制作 在VB中，封面也是一个窗体，开发者可以在窗体上使用VB的绘图工具 Line和Shape绘制出图形，也可以在窗体内载入一个图片框 （Picture Box）或图象控制（Image Control）,利用图片框或图象 控制载入自己所喜欢的图片来制作封面 2. 浮动窗体的实现 在Visual Basic中，需要通过调用WINDOWS的API函数SetWindowpos来 实现。 3. 封面窗体的卸出 当主窗体载入完毕后，封面窗体必须自动卸出。这里通过在主窗体中使 用定时器控件，在激活主窗体的 Activate 事件中激活定时器，设置 定时器属性，在定时器控件的事件Timer中，关闭定时器，卸出封面。
《Visual Basic案例教程》
Байду номын сангаас
清华大学出版社 11.2 系统调试与错误处理 11.2.1 如何处理错误 Function FileExists (filename) As Boolean FileExists = (Dir(filename) <> "") End Function 为避免这种情况，在 Visual Basic 中可用错 误处理功能中断错误并执行正确操作。当错误 发生时， Visual Basic 将设置错误对象 Err 的各种属性，如错误号、描述等。
《Visual Basic案例教程》
清华大学出版社
对于任何一个创建的Visual Basic工程都可以使用打包和发 布向导进行打包。 (1) 在程序组中单击Package and Development Wizard菜单项 启动打开与发布向导对话框， (2) 选定工程以后，单击“打包”按钮，开始创建一个可以发 布的安装程序；假如用户没有编译此工程，打包和发布向导 要求用户编译该工程。工程文件编译以后，进入选择打包类 型对话框。 (3)在选择打包类型对话框中选择“标准安装包”，然后单击 下一步，将弹出对话框用于指定包文件存放位置。在文件夹 列表中选择一个已有的目录，也可以单击“网络”按钮，将 安装程序保存到其它机器上。而“新建文件夹”按钮，用来 创建一个新文件夹来保存安装程序。
《Visual Basic案例教程》
清华大学出版社 (4) 指定安装程序的存放位置以后，单击下一步， 屏幕上显示对话框列出检测到的所有安装的文 件列表，如果需要增加安装文件，则单击“添 加”按钮进行添加文件。 (5) 选定包含文件以后，单击下一步，选择以 何种方式创建压缩文件对话框， (6) 选定压缩文件方式后，单击下一步，屏幕 显示对话框用于为安装程序创建标题。 （7）单击下一步出现对话框用于指定要建立的 图片组和图标，
《Visual Basic案例教程》
清华大学出版社 11.2.3 调试应用程序 1. 三种工作模式： (1) 设计时 (2) 运行时 (3)中断模式
《Visual Basic案例教程》
清华大学出版社 2. 调试工具
《Visual Basic案例教程》
清华大学出版社 3.调试方法 （1）用断点有选择地中断执行 设置断点可以使程序执行到某一语句时停止执 行。 (2) 跟踪执行轨迹 在VB中提供了四种在中断模式下使用的跟踪方式： 逐语句 (Step Into)、逐过程(Step Over)、跳 出 (Step Out) 和运行到光标 (Run to Cursor) 处。
(1) 当错误发生时，通知应用程序在分支点（执行错误 处理例程的地方）设置或激活错误捕获。
(2) 编写错误处理例程，这里所有能预见的错误都作出 响应。如果在某些点，控件实际上分支进入捕获，则 说捕获是活动的。 (3) 退出错误处理例程。
《Visual Basic案例教程》
清华大学出版社 1. 设置错误陷阱 (1) OnError Goto Line语句 (2) On Error Resume Next语句 (3) On Error Goto 0语句 2. 编写错误处理例程 错误处理例程体包含实际处理错误的代码，通常 以 Case 或 If...Then...Else 语句的形式出 现。需要确定可能会发生什么错误并对每种错 误提供操作方法。
《Visual Basic案例教程》
清华大学出版社 11.3.2 使用程序打包与展开向导发布应用程序
将一个应用程序打包后，制作安装程序得过程并 没有结束。用户必须将打包后得应用程序发布 到某一媒体上（如软盘、本地硬盘、或者一个 Web 节点）。发布一个应用程序的主要步骤有： (1)、(2)、(3)、(4)。
《Visual Basic案例教程》
清华大学出版社 11.4 小结
本章主要介绍了三个方面的内容： 系统封面的制作方法，通过介绍系统封面的一般制作方 法，让读者学会如何去制作比较简单的系统封面。 系统调试与错误处理的方法，这部分主要介绍了程序错 误处理的一般方法以及如何利用调试工具进行程序的 调试。通过学习，读者可以处理一般的VB 错误以及为 可能方程的错误设置错误陷阱。 应用程序的打包与发布，这是应用程序开发的最后一步， 也是最终要的一步，本部分主要介绍了如何利用向导 去打包和发布应用程序。