友情提示:同学您好,此页面仅供预览,在此页面学习不会被统计哦! 请进入学习空间后选择课程学习。

   例题1:设计多窗体及窗体生命周期演示程序,学会在一个工程中使用多个窗体,理解窗体生命周期中的四个阶段,掌握常用的窗体对象的方法和事件。

常用方法:

       PrintClsShowHide

       常用事件:

       InitializeLoadQueryUnloadUnloadClick

在本工程中添加窗体Form2Form3,再添加标准代码模块。设置Form2Form3的背景色,以互相区别。在Form1上添加文本框2个,标签2个,命令按钮14个,并设置其Caption属性,如下图所示。


具体代码和设计过程参加后面的实验八部分。

其中用到的MsgBox ()函数,该函数可以以对话框的形式输出简单的信息提示,同时还可以让用户在对话框中选择各种按钮。其使用格式如下:

      MsgBox(Prompt[,Button] [,Title])

    其中,PromptTitle参数都是字符串,Button参数是一个整数,由三类数值相加而成。

    第一类: 0:对话框中显示“确定”按钮

                    1:对话框中显示“确定”、“取消”按钮

                    2:对话框中显示“中止”、“重试”、“忽略”按钮

                    3:对话框中显示“是”、“否”、“取消”按钮

                    4:对话框中显示“是”、“否”按钮

                    5:对话框中显示“重试”、“取消”按钮

第二类:16:对话框中显示“停止(X)”图标

                    32:对话框中显示“问题(?)”图标

                    48:对话框中显示“警告(!)”图标

                    64:对话框中显示“信息(i)”图标

       第三类   0:对话框中第一个按钮为当前活动按钮

                  256:对话框中第二个按钮为当前活动按钮

                  512:对话框中第三个按钮为当前活动按钮

MsgBox 函数的返回值:

    值               VB常数                    意义

      1                vbOK                     按下了“确定”按钮

      2                vbCancel               按下了“取消”按钮

      3                vbAbort                 按下了“中止”按钮

      4                vbRetry                  按下了“重试”按钮

      5                vbIgnore                按下了“忽略”按钮

      6                vbYes                     按下了“是”按钮

      7                vbNo                       按下了“否”按钮