1 / 14

VB6 程序设计

VB6 程序设计. 第五部分 窗体和标准控件. ★ 产学研中心. 教学目标：　 1. 掌握： 利用 ActiveX 控件进窗体设计的方法，与多窗体操作有关的属性和方法，设计多窗体应用程序，多窗体应用程序的保存和加载， MDI 的基本概念。 2. 理解： 建立 MDI 应用程序的方法， MDI 菜单 3. 了解：应用程序窗体设计的概念 教学内容： 基于 ActiveX 控件进行窗体的界面设计，多窗体程序设计的概念与方法，多文档界面（ MDI) 的程序设计的概念. 利用 ActiveX 控件进行窗体的界面设计

maddy
Download Presentation

VB6 程序设计

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. VB6程序设计 第五部分 窗体和标准控件 ★产学研中心

  2. 教学目标：　1.掌握： 利用ActiveX控件进窗体设计的方法，与多窗体操作有关的属性和方法，设计多窗体应用程序，多窗体应用程序的保存和加载，MDI的基本概念。 2.理解： 建立MDI应用程序的方法，MDI菜单 3.了解：应用程序窗体设计的概念 教学内容：基于ActiveX控件进行窗体的界面设计，多窗体程序设计的概念与方法，多文档界面（MDI)的程序设计的概念

  3. 利用ActiveX控件进行窗体的界面设计 在VB的可视化的编程环境中，用户不必编写大量的代码，就可以利用VB提供的功能强大的大量控件设计出丰富的界面，这样一来可以使程序员从繁琐的代码编写任务中解脱出来，从而投入到更具有创造力和想象力的工作中去，设计出有个性，有特色、友好的界面。 　　下面是一个利用ActiveX控件来进行程序界面设计的示例，在这个示例程序中所用到的一些控件在程序的初始化阶段没有被加载，需在用户自己把它们添加到工具箱中。

  4. 一、启动一个新工程，向工具箱中添加ActiveX控件一、启动一个新工程，向工具箱中添加ActiveX控件 启动一个新的标准Exe工程，然后选择菜单[工程]/[部件]，在弹出的对话框中选择选中部件对话框中的Microsoft Table Dialog Control6.0,确认后返回设计状态，就会发现SSTab控件已经加入到工具箱中。

  5. 二、设置SSTab控件属性 SSTab控件的状态可以在程序中动态的修改，比如在窗体的设计阶段双击窗体，在窗体的Form_load（）事件中添加下列代码： Private Sub Form_load（） SSTab1.TabCaption(1)="选项1" '设置选项1上的文本。 SSTab1.TabVisible(2)=False '设置选项2上的可见状态为不可见。 SSTab1.TabEnabled(0)=False '设置选项0的有效状态为无效。 SSTab.Tab=1 '设置选项1为选中的状态 SSTab.Tabs=4 '添加一个选项 End Sub

  6. 三、向窗体上添加控件 设计一个用于算术运算的应用例子，先向窗体上添加一个CommandButton控件，两个TextBox控件，一个SSTab控件，四个ToggleButton控件、两个UpDown控件和四个Lable控件。 控件说明如下： CommandButton 控件用来结束程序的运行，为程序的正常结束提供一个出口 TextBox控件用来显示程序中的两个变量X和Y的值。 UpDown控件用来实现变量的更新 ToggleButton控件用来实现不同的加减乘除运算 Lable控件用来显示文本的运算结果 SSTab控件用来显示不同的选项，同时作为ToggleButton控件的容器。

  7. 四、添加事件响应代码 下面以乘法操作为例来添加代码，在程序的设计 阶段双击ToggleButton3控件，在它的ToggleButton_Click()事件中添加下列代码： Private Sub ToggleButton3_Click() Label4.Caption=Val(Text1.text)*Val(Text2.text) '乘法操作。 End Sub 然后保存文件，运行程序

  8. 多文档界面（MDI）的程序设计 多文档界面（Mulgiple Document Interface）是指在一个父窗口下面可以同时打开多个子窗口。子窗口归属于父窗口，如果父窗口全部关闭，则所有子窗口全部关闭。常见的Windows应用的界面，例如微软Office的几个组件程序，全部采用的都是多文档界面

  9. 属性 设置 Name Form1 Caption Form1 BorderStyle 2-Sizable MDIChild True Moveable True 1.设置初始窗体属性 首先启动一个新的工程，在屏幕一就会出现一个空白的窗体，窗体的属性

  10. 属性 设置 Name MDIform1 AutoShowChildern False Caption MDIForm1 Moveable False StartUpPosition 2-CenterScreen 2.添加MDI窗体，设置属性 选择菜单Project/Add MDI Form,弹出对话框，单击[打开]按钮，添加一个MDI窗体，窗体的属性设置 这样设置的MDI窗体有如下特性： MDI窗体不能够自动的显示子窗体；窗体在程序的运行过程中不能移动；窗体始终位于屏幕的中央。

  11. 属性 设置 Name FrmAbout BorderStyle 3-Fixed Dialog Caption About MyApp MDIChild True Moveable True Visible True 3.添加子窗体，设置属性 选择菜单Project/Add Form,就会弹出对话框 在AddForm对话框中选择About Dialog,单击[打开]按钮，就在MDI窗体上添加一个子窗体，子窗体FrmAbout的属性设置如下 这样设置的子窗体有如下的特性 窗体在程序的运行过程中不能改变大小；程序运行时可以移动窗体；窗体为MDI窗体的一个子窗体。

  12. 4.为子窗体Form1添加代码 在程序的设计阶段双击子窗体Form1，在它的Form_Load()过程中添加下列代码： Private Sub Form_Load() Dim X As Integer For X=0 TO 3000 Step 75 Line(0,1000)-（x,0）'画线 line(0,1000)-(x,2000) Line(3000,1000)-(3000-x,2000) Line(3000,1000)-(3000-x,0) Next End Sub 程序说明：程序首先定义了一个整型变量X，然后进入一个循环，在循环中通过四个画直线的语句来实现程序中绘制图形的功能。 5.为MDI窗体添加菜单 选择菜单Tool/Menu Editor,就会弹出对话框，在菜单编辑器中，建立两个菜单项，即"文件"和"退出"，在"文件"项下还有两个菜单，即"绘图"和"关于"

  13. 5.为MDI窗体添加菜单 选择菜单Tool/Menu Editor,就会弹出对话框，在菜单编辑器中，建立两个菜单项，即"文件"和"退出"，在"文件"项下还有两个菜单，即"绘图"和"关于"

  14. 6.添加菜单单击事件响应代码 分别响应三个菜单项的鼠标单击事件的代码如下 （1）单击"关于"菜单项 Private Sub About_Click() Form1.Hide '隐藏窗体Form1. frmAbout.Show '显示窗体frmAbout End Sub （2）单击"绘图"菜单项 Private Sub Draw_Click() frmAbout.Hide '隐藏窗体frmAbout Form1.Show '显示窗体Form1. End Sub （3）单击"退出"菜单项 Private Sub Exit _Click End End Sub 运行程序

More Related