多模块程序设计与调试.ppt

关于多模块程序设计与调试1现在学习的是第1页，共30页2第十一章第十一章 多模块程序设计与调试多模块程序设计与调试11.1 多模块程序设计多模块程序设计11.2 程序的调试程序的调试现在学习的是第2页，共30页311.1 多模块程序设计多模块程序设计本节知识点本节知识点：启动对象启动对象窗体的加载与卸载窗体的加载与卸载窗体加载时的事件窗体加载时的事件窗体卸载时的事件窗体卸载时的事件多模块之间的数据共享多模块之间的数据共享程序的中止程序的中止现在学习的是第3页，共30页411.1 多模块程序设计多模块程序设计v到目前为止所编制的程序都是单单模模块块程程序序。但在实际工作中，功能稍微复杂一些的程序就会包含多个模块。VB包含三种类型的模块：窗体模块窗体模块、标准模块标准模块和类模块类模块。v窗窗体体模模块块(.frm)：是一个相对独立的程序单位，每每个个窗窗体对应一个窗体模块体对应一个窗体模块。窗体模块包含窗窗体体、窗窗体体和和控控件件的的属属性性设设置置、事事件件过过程程和通用过程和通用过程、模块级的变量和常量模块级的变量和常量。默认时应用程序只有一个窗体，如应用程序有多个窗体，会有多个以会有多个以.frm为扩展名的窗体模块文件为扩展名的窗体模块文件。现在学习的是第4页，共30页511.1 多模块程序设计多模块程序设计v标标准准模模块块(.bas)：标准模块没没有有界界面面对对象象，只有代码。专门用来存放工程中各各个个窗窗体体共共同同使使用用的的全全局局通通用用过过程程、变变量量、常常量量及自自定定义义数数据据类类型型。标准模块的代码保存在扩展名为“.bas”的文件中。v类类模模块块(.cls)：类模块用于建立新对象，这些新对象可以包含自定义的属性和方法。类模块既包含代码又包含数据，它可以被应用程序内的过程调用。现在学习的是第5页，共30页611.1 多模块程序设计多模块程序设计1、启动对象、启动对象v启启动动对对象象：是指一个程序运行时，首首先先被被加加载载并并执执行行的的对对象象。可以是窗体模块也可以是标准模块。v设定工程的启动对象设定工程的启动对象：vSub Main过过程程：在一个含有多窗体的应用程序中，有时需需要要在在显显示示多多个个窗窗体体之之前前对对一一些些条条件件进进行行初初始始化化，需要在启动程序时执行一个特定的过程。在VB中，这样的过程称为启动过程，并命名为Sub Main。Sub Main过程位位于于标准模块标准模块中，一个工程只能有一个Sub Main过程。现在学习的是第6页，共30页711.1 多模块程序设计多模块程序设计v没没有有窗窗体体的的工工程程：虽然VB自动为每个标准EXE工程提供了一个窗体，但工程可以没有任何窗体。在没有窗体的工程中，至少要有一个标准模块，标准模块中要有Sub Main过程，并已设为启动对象。这时的Sub Main过程是程序的入口，它可以再调用其他过程来完成更复杂的任务。当由Sub Main调用的所有过程执行完毕后，程序就结束了。现在学习的是第7页，共30页811.1 多模块程序设计多模块程序设计v在一个既有窗体又有Sub Main过程的工程中，如没有将Sub Main设为启动对象，它就是一个普通过程。v一个工程必须有一个启动对象，默默认认启启动动对对象象是第一个被创建的窗体。现在学习的是第8页，共30页911.1 多模块程序设计多模块程序设计2、窗体的加载与卸载、窗体的加载与卸载v作为启动对象的窗体是是由由操操作作系系统统加加载载的的，其他窗体只有使用VB的窗体加载语句或方法才能加加载载到到内内存存中中，执行时显示在屏幕上执行时显示在屏幕上。v当窗体操作完毕，可以将它隐藏或从内存中卸载隐藏或从内存中卸载。v下面学习与窗体加载和卸载有关的语句语句和方法方法。现在学习的是第9页，共30页1011.1 多模块程序设计多模块程序设计vLoad语句语句窗体在显示之前，首先要加载到内存中。语法：Load 窗体名使用Load语句加载到内存的窗体并不被显示。窗体一旦被加载到内存，便可通过程序对它及其所属控件进行操作。(通过设置Visible属性，使其可见)例子例子：Private Sub Form1_Click()Load Form2 End Sub现在学习的是第10页，共30页1111.1 多模块程序设计多模块程序设计vShow方法方法窗体对象的方法。当调用这个方法时，如果窗体尚未被加载到内存，则先加载到内存，然后再显示它。语法：窗体名窗体名.Show 0|1参数为0或被省略时，显示窗体后，继续执行后面的语句。即非模态的。参数为1时，显示窗体并暂停执行后面的语句。即模态的。只有隐藏或卸载了模态窗体之后，才继续执行后面的语句。现在学习的是第11页，共30页1211.1 多模块程序设计多模块程序设计vHide方法方法调用窗体的Hide方法可以隐藏这个窗体。语法：窗体名窗体名.Hide此方法同时将窗体的Visible属性置为False，但不卸载窗体。如果在执行此方法之前窗体尚未加载，则加载它。现在学习的是第12页，共30页1311.1 多模块程序设计多模块程序设计vUnload语句语句使用Unload语句可把指定的窗体从内存中卸载。语法：Unload 窗体名窗体名Unload语句卸载掉的只是窗体和控件的显示部分显示部分，它的代码(如过程和变量)仍然可用。窗体卸载之后，运行时对窗体和控件属性进行的所有修改都将丢失。程序中对该窗体与窗体上控件的访问会导致窗体重新加载。单击窗体右上角的“关闭”按纽也可卸载窗体。现在学习的是第13页，共30页1411.1 多模块程序设计多模块程序设计3、窗体加载时的事件、窗体加载时的事件v窗体从未被加载到加载，再由加载到显示，会会依依次次收收到系统引发的到系统引发的Initialize、Load和和Active事件事件。vInitialize事件事件窗体的初始化事件。在加载一个窗体时，此事件最先发此事件最先发生生。事件过程语法：Private Sub Form_Initialize()End Sub现在学习的是第14页，共30页1511.1 多模块程序设计多模块程序设计vLoad事件事件由于Load事件是窗体“生存周期”(从加载到卸载)中仅次于Initialize事件发生的事件，所以一般在该事件过程中加入窗体的初始化代码。过程语法：Private Sub Form_Load()End Sub注意：Load事件发生时，窗体并未显示窗体并未显示，所以在该事件过程中不应有绘图和设置焦点的行为。现在学习的是第15页，共30页1611.1 多模块程序设计多模块程序设计vActivate事件事件当窗体被激活变为活动窗体时引发Activate事件。激活的例子：窗体标题栏由灰色变为蓝色，使用鼠标点击。事件过程语法：Private Sub Form_Activate()End Sub注意：与Initialize事件和Load事件不同，Activate事件在窗体的一个生存周期内可以多次触发多次触发，除了第一次显示窗体外，每次窗体被激活时，都会触发此事件。可在该事件过程中绘图和设置焦点。现在学习的是第16页，共30页1711.1 多模块程序设计多模块程序设计4、窗体卸载时的事件、窗体卸载时的事件v窗 体 在 卸 载 时 会 依 次 收 到 系 统 发 送 的 四 个 事 件：Deactivate、QueryUnload、Unload、Terminate。vDeactivate事件事件当窗体由活动变为非活动时触发此事件。过程语法:Private Sub Form_Deactivate()End Sub现在学习的是第17页，共30页1811.1 多模块程序设计多模块程序设计vQueryUnload事件事件当窗体要被卸载之前，先引发此事件。过程语法：Private Sub Form_QueryUnload(Cancel as Integer,UnloadMode as Integer)End Sub参数UnloadMode传递给事件过程的值可以反映卸载是反映卸载是如何引起的如何引起的。该参数值与所代表的意义见表11.1现在学习的是第18页，共30页1911.1 多模块程序设计多模块程序设计参数Cancel可以用来终止窗体的卸载。可在该事件过程中为为CancelCancel参数赋一个非参数赋一个非0 0值值，终止窗体的卸载终止窗体的卸载。而值为0或不赋值，则继续卸载。可以在QueryUnload事件过程中提示用户对未保存的工提示用户对未保存的工作进行保存作进行保存。或者根据各种情况决定是否继续进行窗体卸载。被终止卸载的窗体，仍然显示在屏幕上并保持激活状态。现在学习的是第19页，共30页2011.1 多模块程序设计多模块程序设计q【例例11.1】Private Sub Command1_Click()Unload MeEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer,UnloadMode As Integer)Dim i As Integer If UnloadMode 1 Then MsgBox 请单击请单击“关闭关闭”按钮退出本程序。按钮退出本程序。,vbInformation Cancel=1 Exit Sub End If i=MsgBox(数据尚未保存，是否保存？数据尚未保存，是否保存？,vbYesNoCancel+vbQuestion)If i=vbYes Then 选择选择是是则执行保存代码则执行保存代码 MsgBox 数据已保存。数据已保存。,vbInformation Save 进行相应的保存操作进行相应的保存操作 ElseIf i=vbCancel Then 选择选择取消取消则停止卸载则停止卸载 Cancel=1 End IfEnd Sub现在学习的是第20页，共30页2111.1 多模块程序设计多模块程序设计vUnload事件事件如果QueryUnload事件过程未终止窗体的卸载，当窗体从屏幕上消失时，会继续引发Unload事件。语法：Private Sub Form_Unload(Cancel as Integer)End SubCancel参数的作用同上。在事件过程中将其值设置为非0，可以阻止窗体卸载。Unload事件过程中，适合进行关闭文件、清除所占系统资源的工作。现在学习的是第21页，共30页2211.1 多模块程序设计多模块程序设计vTerminate事件事件是窗体卸载过程中的最后一个事件，事件过程语法：Private Sub Form_Terminate()End Sub现在学习的是第22页，共30页2311.1 多模块程序设计多模块程序设计5、多模块之间的数据共享、多模块之间的数据共享vVB的工程通常由多个模块组成，各个模块之间即相互独立又相互联系，模块之间可以共享代码和数据.v共享代码共享代码：通过调用定义在其他模块中的全局通用过程实现。v共享数据共享数据：通过以下四种方法实现。使用全局变量全局变量、全局常量全局常量和全局数组全局数组。使用对象属性对象属性。使用过程参数过程参数。使用文件文件。现在学习的是第23页，共30页2411.1 多模块程序设计多模块程序设计v使用全局变量、全局常量和全局数组使用全局变量、全局常量和全局数组在程序内部进行数据交换。一个模块的代码可以存取另一个模块中定义的全局变量、全局数组或全局变量.v使用对象属性使用对象属性VB允许一个模块的程序代码访问另一个模块中对象的属性和方法。例子：Private Form_Click()窗体Form1的事件过程 Form2.Text1.Text=“你好！”End Sub现在学习的是第24页，共30页2511.1 多模块程序设计多模块程序设计v使用过程参数使用过程参数一个模块的代码调用另一个模块中定义的全局过程时，可以通过参数将数据从一个模块传递到另一个模块。v使用文件使用文件一个模块以文件形式将数据保存在磁盘上，另一个模块读取该文件，可以实现数据共享。现在学习的是第25页，共30页2611.1 多模块程序设计多模块程序设计6、程序的终止、程序的终止v程序的终止程序的终止就是程序的关闭或退出，VB应用程序一般由多个模块组成，程序的终止体现为模块全部从内存中卸载模块全部从内存中卸载。vUnload语句语句使用Unload语句可以卸载窗体，终止程序。vEnd语句语句End语句可以强行终止程序的执行。同时关闭文件、清除变量、且不向窗体发送任何事件。现在学习的是第26页，共30页2711.1 多模块程序设计多模块程序设计vStop语句语句Stop语句会使程序进入中断状态中断状态(即暂停状态)，这是按F5键程序会继续执行。Stop语句可用于程序的调试。注意注意：在编译程序之前要清除Stop语句，否则编译后的Stop语句会终止程序的执行。现在学习的是第27页，共30页2811.2 程序的调试程序的调试本节知识点本节知识点：错误的种类错误的种类调试窗口调试窗口切换到中断状态的方法切换到中断状态的方法现在学习的是第28页，共30页2911.2 程序的调试程序的调试现在学习的是第29页，共30页感感谢谢大大家家观观看看现在学习的是第30页，共30页