《图形操作与多文档窗体.ppt》由会员分享，可在线阅读，更多相关《图形操作与多文档窗体.ppt（38页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、 6.1 6.1 绘图板绘图板 6.2 6.2 电子相册电子相册 6.3 6.3 知识进阶知识进阶第六章第六章 图形操作与多文档窗体图形操作与多文档窗体Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计本章要点n常用的作图方法常用的作图方法n图形控件图形控件n多文档窗体的使用多文档窗体的使用Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计1 1、项目界面展示、
2、项目界面展示6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计2 2、项目分析、项目分析n本项目实例主要运用了本项目实例主要运用了VB6.0的的Line、Circle、Pset方法来画出各种图形。并用方法来画出各种图形。并用两个标签的背景色来标明当前绘图区域的两个标签的背景色来标明当前绘图区域的前景色和填充色，单击标签时弹出颜色对前景色和填充色，单击标签时弹出颜色对话框，来选择前景色和填充色。利用话框，来选择前景色和填充色
3、。利用3 个个组合框设置组合框设置“线型线型”、“线宽线宽”、“填充填充样式样式”。6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计3 3、项目实现、项目实现n程序界面的设计程序界面的设计n界面对象属性设置界面对象属性设置n编写对象事件过程代码编写对象事件过程代码6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 V
4、isual Basic 6.0 程序设计程序设计程序设计程序设计4 4、相关知识点、相关知识点n4.1坐标系统概述坐标系统概述每个容器都有一个坐标系，构成一个坐标系，需每个容器都有一个坐标系，构成一个坐标系，需要三个要素：要三个要素：坐标原点、坐标度量单位、坐标轴的坐标原点、坐标度量单位、坐标轴的长度与方向。长度与方向。HeightScaleHeight6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计n包括包括5个属性个
5、属性（ScaleLeft、ScaleTop、ScaleWidth、ScaleHeight、ScaleMode）1个方法（个方法（Scale）ScaleTop、ScaleLeft属性用于控制容器属性用于控制容器对象左边和顶端的坐标，根据这两个属对象左边和顶端的坐标，根据这两个属性值可形成坐标原点。性值可形成坐标原点。一、使用默认的刻度一、使用默认的刻度4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程
6、序设计属性设置属性设置单单 位位0 0用户定义用户定义1 1TwipTwip（缺省值）（缺省值）2 2磅（磅（pointpoint，每英寸，每英寸7272磅）磅）3 3像素（像素（PixedPixed，与显示器分辨率有关），与显示器分辨率有关）4 4字符（缺省为高字符（缺省为高1212磅宽磅宽2020磅的单位）磅的单位）5 5英寸（英寸（inchinch，1inch=1440 Twip1inch=1440 Twip）6 6毫米（毫米（millimetermillimeter）7 7厘米（厘米（centimetercentimeter）坐标度量单位由容器对象的坐标度量单位由容器对象的ScaleM
7、odeScaleMode属性决定。缺省时属性决定。缺省时为为TwipTwip。每英寸。每英寸14401440个个TwipTwip，2020个个TwipTwip为一磅。为一磅。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计二、自定义坐标系二、自定义坐标系4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板（1 1）语法格式：）语法格式：对象名对象名.Scal
8、e(x1,y1)-(x2,y2).Scale(x1,y1)-(x2,y2)Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计（2）重定义坐标原点及坐标轴方向和度量单位重定义坐标原点及坐标轴方向和度量单位 属性属性ScaleTop，ScaleLeft的值用于控制对象左上角坐标；的值用于控制对象左上角坐标；属属性性ScaleWidth，ScaleHeight的的值值可可确确定定对对象象坐坐标标系系X轴轴与与Y轴的正向及最大坐标值。轴的正向及最大坐标值。如如果果ScaleWidth的
9、的值值小小于于0，则则X轴轴的的正正向向向向左左，如如果果ScaleHeight的值小于的值小于0，则，则Y轴的正向向上。轴的正向向上。YXScaleWidth=nScaleHeight=mScaleletf=0ScaleTop=00(n,m)YXScaleWidth=nScaleHeight=-mScaleletf=0ScaleTop=00(n,-m)Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计1.1.用用AutoRedrawAutoRedraw创建持久的图形创建持久的
10、图形每个窗体和图片框都具有每个窗体和图片框都具有AutoRedrawAutoRedraw属性。属性。（1 1）当）当AutoRedrawAutoRedraw为默认值为默认值FalseFalse时，时，VBVB会把图形输出会把图形输出到屏幕，而不输出到内存。到屏幕，而不输出到内存。（2 2）当）当AutoRedrawAutoRedraw为为TrueTrue时，时，VBVB会把图形输出并保存会把图形输出并保存在内存中。在内存中。注意：运行时，只有当注意：运行时，只有当AutoRedrawAutoRedraw为为TrueTrue时，才可以用时，才可以用ClsCls方法清除。方法清除。4.24.2使用
11、使用Visual BasicVisual Basic作图作图 4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计2 2、使用、使用CurrentXCurrentX、CurrentYCurrentY设置当前坐标设置当前坐标（1 1）窗体或图形框或打印机的）窗体或图形框或打印机的CurrentXCurrentX、CurrentYCurrentY属性属性给出这些对象在绘图时的当前坐标。给出这些对象在
12、绘图时的当前坐标。（2 2）在调用与绘图有关的方法时）在调用与绘图有关的方法时,CurrentX,CurrentX与与CurrentYCurrentY的值会自动改变。的值会自动改变。变化情况如下：变化情况如下：PsetPset方法方法:当前坐标用来指向画出的点。当前坐标用来指向画出的点。LineLine方法方法:当前坐标指向画出线的终点。当前坐标指向画出线的终点。CircleCircle方法方法:当前坐标指向画出圆形的中心。当前坐标指向画出圆形的中心。ClsCls:当前坐标指向坐标原点。当前坐标指向坐标原点。（3 3）使用）使用CLSCLS方法后，方法后，CurrentXCurrentX、Cu
13、rrentYCurrentY属性值为属性值为0 0。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计3 3、用、用DrawWidthDrawWidth和和DrawStyleDrawStyle属性设置属性设置 线宽与线型线宽与线型 窗体、图形框或打印机的窗体、图形框或打印机的DrawWidthDrawWidth属性给出这些属性给出这些对象上所画线的宽度或点的大小。对象上所画线的宽度或点的大小。
14、DrawWidthDrawWidth属性以像素属性以像素为单位来度量，最小值为为单位来度量，最小值为1 1。例例6.2 6.2 用用DrawWidthDrawWidth属性改变直线宽度。属性改变直线宽度。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计 窗体或图形框或打印机的窗体或图形框或打印机的DrawStyleDrawStyle属性给出这些对属性给出这些对象上所画线的形状象上所画线的形状
15、。注意：只有当注意：只有当DrawWidthDrawWidth设置为设置为1 1时，时，DrawStyleDrawStyle属性才会产生如上图所示的各种效果。属性才会产生如上图所示的各种效果。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计 4 4、填充与色彩、填充与色彩 由由FillstyleFillstyle、FillcolorFillcolor这两个属性决定封闭图形的这两个属性决定封闭
16、图形的填充方式。填充方式。（1 1）FillcolorFillcolor指定填充图案的颜色，默认的颜色与指定填充图案的颜色，默认的颜色与ForecolorForecolor相同。相同。（2 2）FillStyleFillStyle属性取值属性取值0707，用来指定填充的图案，共，用来指定填充的图案，共有有8 8种内部图案。种内部图案。注意：如果注意：如果FillStyleFillStyle设置为设置为1 1（透明），则忽略（透明），则忽略FillColorFillColor属性，但属性，但FormForm对象除外。对象除外。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘
17、图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计4 4、相关知识点、相关知识点三个重点内容（方法）三个重点内容（方法）点、线、圆点、线、圆6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计1、画点（、画点（Pset方法）方法）例：例：1.Pset(500,1000),RGB(255,0,0
18、)1.Pset(500,1000),RGB(255,0,0)2.Pset(500,1000),BackColor 2.Pset(500,1000),BackColor 擦除该点擦除该点格式格式：对象对象.Pset(x,y),Color参数说明参数说明:（X,YX,Y）:确定画点的位置确定画点的位置 单精度单精度,可以是常量或变量和表达式可以是常量或变量和表达式 ColorColor:设置点的颜色设置点的颜色缺省时缺省时,点的颜色为点的颜色为ForeColorForeColor4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0
19、Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计2 2、项目实例实现、项目实例实现 （演示演示）For i=-180 To 180 Step 0.01For i=-180 To 180 Step 0.01Picture1.PSet(i/50,5*Sin(i*3.14/180)Picture1.PSet(i/50,5*Sin(i*3.14/180)Next iNext i4 4、相关知识点、相关知识点用点画正弦曲线用点画正弦曲线6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6
20、.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计直线格式直线格式：对象对象.LineLineStep(x1,y1)-Step(x2,y2),ColorStep(x1,y1)-Step(x2,y2),Color参数说明参数说明:（X1,Y1X1,Y1）:画线的起点画线的起点,省略省略:当前坐标为起始坐标。当前坐标为起始坐标。（X2,Y2X2,Y2）:直线的终点直线的终点 Color Color:设置直线的颜色设置直线的颜色 缺省时缺省时,为为ForeColorForeColorStepStep:表示后面的
21、坐标相对于当前坐标的偏移量表示后面的坐标相对于当前坐标的偏移量4 4、相关知识点、相关知识点2、画线（、画线（line方法）方法）6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计举例举例:Private Sub Command1_Click()Line(1000,1000)-(2000,2000)Line-(300,3000)Picture1.Line(100,500)-Step(2000,2000)Picture1.L
22、ine(1500,1500)-Step(200,200),vbBlueEnd Sub如何改变直线的如何改变直线的粗细和线型粗细和线型?DrawWidthDrawWidth属性属性:指定线的宽度指定线的宽度(以磅为单位）。以磅为单位）。DrawStyleDrawStyle属性属性:指定线型。指定线型。4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计矩形格式矩形格式：对象对象.LineLineS
23、tep(x1,y1)-Step(x2,y2),Color,BFBF参数说明参数说明:（X1,Y1X1,Y1）:矩形的左上角点矩形的左上角点,省略省略:当前坐标的为起始坐标当前坐标的为起始坐标,（X2,Y2X2,Y2）:矩形的右下角点矩形的右下角点B B：表示画一个矩形表示画一个矩形;F F：表示画一个表示画一个实心实心的矩形的矩形,这时忽略这时忽略 FillcolorFillcolor和和FillStyleFillStyle属性属性注意：注意：有有B B参数才能使用参数才能使用F F例例1 1：Private Sub Command1_Click()Line(500,500)-Step(100
24、0,0)Line-Step(0,1000)Line-Step(-1000,0)Line-Step(0,-1000)Line(500,500)-Step(1000,1000),BFEnd Sub4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计 怎样在窗体上绘制一幅颜色、大小各不相同的彩环？怎样在窗体上绘制一幅颜色、大小各不相同的彩环？效果如图效果如图4 4、相关知识点、相关知识点6.1 6.1
25、 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计格式格式：对象对象.CircleStep(x,y),.CircleStep(x,y),半径半径,Color,Color,起始角起始角,终止角终止角,纵横比纵横比 (1 (1）111时，指向垂直方向的时，指向垂直方向的Y Y半径半径 参数说明参数说明:起始角和终止角：取值在起始角和终止角：取值在0 0 时为圆弧。时为圆弧。如果起始角的绝对值大于终止角的绝对值，则画一个角如果起始角的绝对值大
26、于终止角的绝对值，则画一个角度大于度大于180180的圆弧；如果为负数，则画出扇形。的圆弧；如果为负数，则画出扇形。3、画圆（、画圆（circle方法）方法）4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0
27、Visual Basic 6.0 程序设计程序设计程序设计程序设计Private Sub Command1_Click()X=Form1.Width Y=Form1.Height For I=1 To 10 R=Rnd*Y*0.1 Circle(X*Rnd,Y*Rnd),R,QBColor(I)Next IEnd Sub（3 3）画圆代码实现（）画圆代码实现（演示演示）4 4、相关知识点、相关知识点6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设
28、计程序设计程序设计程序设计4 4、相关知识点、相关知识点4.34.3鼠标事件鼠标事件事事 件件描描 述述MouseDown按下任一鼠标按键时发生MouseUp释放任一鼠标按键时发生MouseMove每当鼠标移动到屏幕的新位置时发生6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计4 4、相关知识点、相关知识点4.34.3鼠标事件鼠标事件利用鼠标事件完成简单的绘图板利用鼠标事件完成简单的绘图板6.1 6.1 6.1 6.1
29、绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计4 4、相关知识点、相关知识点4.34.3鼠标事件鼠标事件Private Sub Form_MouseDown(Button As Private Sub Form_MouseDown(Button As Integer,Shift AsInteger,X As Single,Y As Integer,Shift AsInteger,X As Single,Y As Single)Single)Curre
30、ntX=X CurrentX=X CurrentY=Y CurrentY=YEnd SubEnd SubPrivate Sub Form_MouseMove(Button As Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Integer,Shift As Integer,X As Single,Y As Single)Single)If Button=1 Then Line-(X,Y)If Button=1 Then Line-(X,Y)End SubEnd Sub 绘图板的代绘图
31、板的代码码6.1 6.1 6.1 6.1 绘图板绘图板绘图板绘图板Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册1 1、项目目标、项目目标本项目实例主要任务是设计完成“休闲娱乐”中的“电子相册”界面，单击“新建”菜单，打开一个通用对话框，选择一个图片文件后，产生一个新的子窗体，并在子窗体上显示图片；通过选择“层叠”、“平铺”、“排列”菜单会使打开的多个子窗口进行相应方式的排列。Visual Basic 6.0 Visual Basic 6.0 Vis
32、ual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册2 2、项目分析、项目分析本项目实例主要运用了本项目实例主要运用了VB6.0VB6.0的的MDIMDI窗体窗体的相关知识。在窗体上添加菜单栏，然的相关知识。在窗体上添加菜单栏，然后建立一个子窗体作为模板，并按相应后建立一个子窗体作为模板，并按相应模式排列窗体。模式排列窗体。Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册3 3、项目实现
33、、项目实现1.1.程序界面设计和属性设置程序界面设计和属性设置（1）建立MDI窗体。选择“工程”“添加MDI窗体”。添加一个MDI窗体，新建的MDI窗体名称为“MDIForm1”，Caption属性为“相册”。（2）在MDI窗体中添加菜单栏，4个菜单项分别为“新建”、“层叠”、“平铺”、“排列”。（3）在工程中添加新窗体Form14，设置Form14的Caption属性为“相册”，MDIChild属性为“True”。Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子
34、相册电子相册3 3、项目实现、项目实现2.2.编写对象事件过程代码编写对象事件过程代码Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册4 4、相关知识、相关知识n多文档界面（Multiple Document Interface，即MDI）与多重窗体不是一个概念。多重窗体程序中的各个窗体是彼此独立的。MDI虽然也可以含有多个窗体，但它有一个父窗体，其他窗体（子窗体）都在父窗体内。1 1、什么是多文档界面？、什么是多文档界面？Visual Basic 6
35、.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册4 4、相关知识、相关知识2、多文档界面有如下特性：(1)所有子窗体均显示在MDI窗体的工作区中。用户可改变、移动子窗体的大小，但被限制在MDI窗体中。(2)当最小化子窗体时，它的图标显示于MDI窗体上而不是在任务栏中。当最小化MDI窗体时，所有的子窗体也被最小化，只有MDI窗体图标出现在任务栏中。(3)当最大化一个子窗体时，它的标题与MDI窗体的标题一起显示在MDI窗体的标题栏上。(4)MDI窗体和子窗体都可以有各自的菜单，当子窗
36、体加载时覆盖MDI窗体的菜单。Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册4 4、相关知识、相关知识3 3、创建和设计、创建和设计MDIMDI窗体及其子窗体窗体及其子窗体 开发多文档界面的一个应用程序至少需要两个窗体：一个(只能一个)MDI窗体和一个(或若干个)子窗体。在不同窗体中共用的过程、变量应存放在标准模块中。添加MDI窗体 选择“工程”菜单中的“添加MDI窗体”命令，然后从相应的对话框中选择“MDI窗体”，再单击“打开”按钮。这样就添加了一
37、个MDI窗体。Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册对子窗体或子窗体图标的层叠、平铺和排列图标命令通常也放在“窗口菜单上，用Arrange方法来实现。Arrange方法的语法形式如下：排列方式取值如下：0-vbCascade：层叠所有非最小化MDI子窗体。1-vbTileHorizontal：水平平铺所有非最小化MDI子窗体。2-vbTileVertical：垂直平铺所有非最小化MDI子窗体。3-vb ArrangeIcons：对任何已经最小
38、化的子窗体排列图标。4 4、相关知识、相关知识Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册(1)(1)活动子窗体和活动控件活动子窗体和活动控件在在VBVB中，提供了访问中，提供了访问MDIMDI窗体的两个属性，即窗体的两个属性，即ActiveFormActiveForm和和ActiveControlActiveControl，前者表示具有焦点的或，前者表示具有焦点的或者最后被激活的子窗体，后者表示活动子窗体上具有者最后被激活的子窗体，后者表示活动子
39、窗体上具有焦点的控件。焦点的控件。注意：当访问注意：当访问ActiveFormActiveForm属性时，至少应有一个属性时，至少应有一个MDIMDI子子窗体被加载或可见，否则会返回一个错误窗体被加载或可见，否则会返回一个错误。在代码中指定当前窗体的另一种方法是用在代码中指定当前窗体的另一种方法是用MeMe关键字。关键字。用用MeMe关键字来引用当前其代码正在运行的窗体。当需关键字来引用当前其代码正在运行的窗体。当需要把当前窗体实例的引用参数传递给过程时，这个关要把当前窗体实例的引用参数传递给过程时，这个关键字很有用。例如要关闭当前窗口，其语句为：键字很有用。例如要关闭当前窗口，其语句为：Un
40、load MeUnload Me 4 4、相关知识、相关知识Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 Visual Basic 6.0 程序设计程序设计程序设计程序设计6.2 电子相册电子相册 (2)(2)显示显示MDIMDI窗体及其子窗体窗体及其子窗体显示显示MDIMDI窗体及其子窗体的方法是窗体及其子窗体的方法是ShowShow。加载子窗体时，其父窗体加载子窗体时，其父窗体(MDI(MDI窗体窗体)会自动加载并显示。会自动加载并显示。而加载而加载MDIMDI窗体时，其子窗体并不会自动加载窗体时，其子窗体并不会自动加载。4 4、相关
41、知识、相关知识MDIMDI窗体有窗体有AutoShowChildrenAutoShowChildren属性，决定是否自动显示属性，决定是否自动显示子窗体。如果它被设置为子窗体。如果它被设置为TrueTrue，则当改变子窗体的属性，则当改变子窗体的属性(如如CaptionCaption等等)后，会自动显示该子窗体，不再需要后，会自动显示该子窗体，不再需要ShowShow方法；如果设置方法；如果设置AutoShowChildrenAutoShowChildren为为FalseFalse，则改，则改变子窗体的属性值后，不会自动显示该子窗体，子窗体变子窗体的属性值后，不会自动显示该子窗体，子窗体处于隐藏状态，直至用处于隐藏状态，直至用ShowShow方法把它们显示出来。方法把它们显示出来。MDIMDI子窗体没有子窗体没有AutoShowChildrenAutoShowChildren属性。属性。