Visual Basic程序设计教程-电子教案-何振林-7995.ppt

⑶菜单编辑器的使用 ⑷ 菜单项增减 在程序运行时，菜单随时增减，如“文件”菜单能保留最近打开的文件数。这同控件数组一样，使用菜单数组。步骤如下： 　　①在菜单设计时，加入一个菜单项，其Index为0(菜单数组)，Visible为False。 　　②在程序运行时，通过Load方法向菜单数组增加新的菜单项。同样，要删除所建立的菜单项，使用UnLoad方法向菜单数组减少菜单项。 ⑸ 弹出菜单(快捷菜单) ←返回目录 ⑶用Line方法绘制函数f(x)=x2在区间[a,b]之间积分面积图，如图下图左一所示。 提示：为了能绘制任意区间[a,b]上函数f(x) 积分面积图，可在窗体上放置一个图形框和两个文本框。文本框用于指定积分上下限的值，图形框用于绘图。根据区间[a,b]的值设置图形框的左上角坐标为（a-1，b?b+1），右下角坐标为（b+1，-1）。将区间[a,b]等分为n 份，在每一等分点i上，用Line方法连线到（i,i*i）。 ⑷用Circle方法绘制如上图左二所示图形。 提示：要绘制的圆由小到大，只需要在循环中改变圆心坐标x和半径r，圆心的另一坐标y可保持不变，例如，取窗体高度的1/2，半径r取x/2。 ⑸使用自定义坐标：Scale (-4, 4)-(4, -8)。然后，按照阿基米德螺线x=αcos(α)，y= αsin(α)，绘制0~2π之间的展开直线，如上图右三所示。 ⑹设计一个时钟程序，要求以钟表刻度的形式显示时间，如上图右四所示。 第11章 多重窗体和多文档窗体 一、多重窗体 　　前面的应用程序都是只有一个窗体的简单程序。在实际应用中，单一窗体往往不能满足需要，须通过多个窗体来实现，这就是多重窗体。在多重窗体中，每个窗体可以有自己的界面和程序代码，分别完成不同的功能。 新建 现存 ⑴添加窗体 操作方法：“工程|添加窗体” 添加“现存”窗体时要注意： 防止多个窗体的name相同而不能添加； 添加的窗体实际是将其它工程中已有的窗体加入，多个工程共享窗体； 通过“另存为”命令以不同的窗体文件名保存，断开共享。 一个工程中有多个窗体，应分别取不同的文件名保存在磁盘上，VBP工程文件中记录了该工程的所有窗体文件名。 ⑵ 保存窗体 　　“启动对象”是程序启动时被VB自动装载的对象，可通过“工程”菜单的“工程属性”所激活的“工程属性”对话框中选择“启动对象”。 　　可以用作启动对象的只有两种对象之一： ①工程中的一个窗体； ②标准模块中的Sub Main过程。 　　默认的启动对象是第一个窗体。 ⑶设置启动对象 　　例如，在标准模块中的一个典型的Main()过程，代码如下： Sub main() Dim d As Date If Weekday(d) = 1 Or Weekday(d) = 7 Then 判断是否为周末 Load Form2 加载窗体Form2 Form2.Show 显示窗体Form2 Else Form1.Show End If End Sub ⑷窗体的加载、显示、隐藏与卸载 ①加载： 窗体在显示之前要先加载到内存：使用语句： Load 窗体名 ②显示：显示一个窗体可以使用窗体的Show方法。 窗体名.Show 0 | 1, Me 0：窗体是无模式的（或非模态的），即窗体的出现不会影响用户对其它窗体的操作。 1：窗体是模式的（或模态的），即窗体显示之后，用户就不能对本程序的其它窗体进行操作，直到关闭此窗体为止。 如果在使用此方法之前，窗体未加载到内存，VB会自动加载。 ③隐藏：隐藏一个窗体，使用其Hide方法。 窗体名.Hide 此方法把窗体的Visible属性设为False。但并不卸载窗体。 程序仍可以对窗体及其控件进行操作，甚至窗体的Timer也在工作。如果在执行此方法之前窗体尚未加载，则加载之。 ④卸载： 把窗体从内存中清除。 Unload 窗体名 卸载掉的只是窗体的显示部件，它的代码，如过程与函数仍可用。 打开【例11.1】 使用启动对象。创建工程，添加窗体Form1、Form2和标准模块Module1，定义和启用Main()过程。 ⑸窗体加载与卸载时的相关事件 ①Initialize事件：窗体的初始化事件，在加载一个窗体时，此事件最先被激活。 ②Load事件：当窗体被装载入内存时，激活此事件。在以在