VisualBasic程序的界面设计

1、对象的功能和使用场合对象的功能和使用场合对象的主要属性、方法和事件对象的主要属性、方法和事件 合理选用对象和窗体布局合理选用对象和窗体布局 PictureBox图片框图片框TextBox文本框文本框CommandButton命令按钮命令按钮OptionButton选项按钮选项按钮ListBox列表框列表框Vscroll垂直滚动条垂直滚动条Label标签标签Frame框架框架CheckBox复选框复选框ComboBox组合框组合框Hscroll水平滚动条水平滚动条Timer计时器计时器Shape形状形状Line线条线条Image图像框图像框定制窗体定制窗体(或其他对象或其他对象)属性的方法属性的

2、方法 在在为其设定各种属性值为其设定各种属性值M必须必须先选中对象先选中对象，后设置属性；在属性窗口列出，后设置属性；在属性窗口列出的属性中大多可采用系统缺省值的属性中大多可采用系统缺省值 在在改变属性值改变属性值当程序运行，执行完以上代码行时，会将等号左边当程序运行，执行完以上代码行时，会将等号左边对象的相应属性值设置或更改为等号右边的属性值对象的相应属性值设置或更改为等号右边的属性值每个对象在创建时，每个对象在创建时，VB就自动为它创建一个默认名就自动为它创建一个默认名称称(对象类名后跟编号，编号从对象类名后跟编号，编号从1开始，依次顺延开始，依次顺延) ；自行命名对象的自行命名对象的：必

3、须：必须长度不得超过长度不得超过40个字符个字符在同一窗体中，控件对象的名称属性值是在同一窗体中，控件对象的名称属性值是的、的、不能同名，在同一工程中，窗体对象也不能同名不能同名，在同一工程中，窗体对象也不能同名设计态时，通过属性窗口设置设计态时，通过属性窗口设置Name属性；在程序运属性；在程序运行时，它是只读的，不能改变行时，它是只读的，不能改变该属性是该属性是，往往在外，往往在外观上起到提示和标志的作用观上起到提示和标志的作用在在设计态和设计态和程序运行时，均可修改该属性值程序运行时，均可修改该属性值M注意它与注意它与Name属性的区别属性的区别 NameCaption 决定对象决定对象

4、用户或系统用户或系统缺省值为缺省值为“True”，表示可以响应用户或系统的事件；，表示可以响应用户或系统的事件；当设置为当设置为“False”，表示禁止该对象响应事件，往，表示禁止该对象响应事件，往往在程序运行时控件对象呈暗淡色往在程序运行时控件对象呈暗淡色除了几何图形、直线控件外，所有对象均有除了几何图形、直线控件外，所有对象均有Enabled属性属性Enabled属性为属性为True Enabled属性为属性为False大小、位置属性大小、位置属性 Height、Width属性分别决定对象大小的属性分别决定对象大小的和和Top表示对象到表示对象到上边框的距离，上边框的距离，Left表示对表

5、示对象到直接容器左边框的距离象到直接容器左边框的距离单位单位：1twip=1/20点点=1/1440英寸英寸=1/567厘米厘米 在默认坐标系统，把该对象所在的直接容器的左上在默认坐标系统，把该对象所在的直接容器的左上角顶点作为坐标原点，该对象的角顶点作为坐标原点，该对象的Left和和Top属性值则属性值则是该对象左上角顶点相对于坐标原点的是该对象左上角顶点相对于坐标原点的X、Y坐标坐标示意图示意图 TopHeightLeftWidth(0,0)可视可视属性属性决定对象决定对象缺省值为缺省值为“True”表示可见，表示可见，“False”表示对象存在，表示对象存在，但对象隐藏、不可见但对象隐藏

6、、不可见系列字体属性系列字体属性FontName字体类型字体类型FontSize字体大小字体大小FontBold粗体粗体FontItalic斜体斜体FontStrikethru加删除线加删除线FontUnderLine加下划线加下划线例题例题3-1在窗体上建立一个标签，名称为在窗体上建立一个标签，名称为Label1，运行时单，运行时单击窗体界面如图所示击窗体界面如图所示 Private Sub Form_Click() Label1.Caption = 欢迎您使用欢迎您使用VB! Label1.FontName = 隶书隶书 Label1.FontSize = 24 Label1.FontBo

7、ld = True Label1.FontItalic = True Label1.FontStrikethru = True Label1.FontUnderline = TrueEnd SubN实例演示实例演示Font系列字体属性系列字体属性A对于不同的对象可以分别设置不同对于不同的对象可以分别设置不同Font属性，若属性，若要为窗体中所有控件对象设置相同要为窗体中所有控件对象设置相同Font属性，可属性，可以以先对窗体设置先对窗体设置Font属性，而属性，而后再创建的控件后再创建的控件对对象在缺省情况下都自动采用窗体的象在缺省情况下都自动采用窗体的Font属性值，属性值，除非用户再自行设

8、置除非用户再自行设置属性属性设置对象上显示文本或图形的前景颜色和背景颜色设置对象上显示文本或图形的前景颜色和背景颜色ForeColor前景颜色；前景颜色；BackColor背景颜色；其值是背景颜色；其值是一个一个16进制的常数；通常在编写代码时，常用进制的常数；通常在编写代码时，常用Qbcolor或或RGB函数为其设置颜色函数为其设置颜色BackStyle属性用于设置背景风格。属性值为属性用于设置背景风格。属性值为0时，时，表示该对象透明显示，即对象的背景颜色表示该对象透明显示，即对象的背景颜色BackColor不起作用；不起作用；属性值为属性值为1时，表示对象不透明显示，即时，表示对象不透明

9、显示，即此时为此时为对象设置背景色才有效对象设置背景色才有效属性属性设置对象的设置对象的属性值为属性值为0时，表示对象周围无边框；为时，表示对象周围无边框；为1时，表示时，表示对象有单线边框对象有单线边框该属性对于某些不同对象而言，还有其他不同的取该属性对于某些不同对象而言，还有其他不同的取值和意义值和意义属性属性MousePointer设置在运行时鼠标移动到对象上时显设置在运行时鼠标移动到对象上时显示的示的鼠标指针类型鼠标指针类型MousePointer取值在取值在015之间，仅当取值为之间，仅当取值为99时表时表示用户自定义图标示用户自定义图标MouseIcon属性起作用，即可用属性起作用

10、，即可用MouseIcon设置设置自定义的鼠标图标自定义的鼠标图标，类型为，类型为.ico或或.curG常用的图片在常用的图片在Graphics目录下目录下 提示属性提示属性设置在运行时鼠标暂停在控件上时显示的文本信息，设置在运行时鼠标暂停在控件上时显示的文本信息，往往起到提示作用往往起到提示作用对齐属性对齐属性设置选项按钮、复选框或控件文本的对齐方式设置选项按钮、复选框或控件文本的对齐方式缺省值为缺省值为0，表示左对齐；若为，表示左对齐；若为1，表示右对齐；若，表示右对齐；若为为2，表示居中对齐，表示居中对齐例题例题3-2 在例题在例题3-13-1的基础上，再添加一个标签，通过属性的基础上，

11、再添加一个标签，通过属性设置，产生如下文字叠影效果，当鼠标移动到标签设置，产生如下文字叠影效果，当鼠标移动到标签位置处，鼠标指针形状从默认的箭头变成手形，当位置处，鼠标指针形状从默认的箭头变成手形，当鼠标暂停在标签位置处，会出现如图所示的文字提鼠标暂停在标签位置处，会出现如图所示的文字提示信息示信息N实例演示实例演示属性属性AutoSize属性决定控件是否能够属性决定控件是否能够WordWrap属性值为属性值为True，表示控件能按照文本和，表示控件能按照文本和字体大小在垂直方向上改变显示区域的大小，在水字体大小在垂直方向上改变显示区域的大小，在水平方向上不发生变化；值为平方向上不发生变化；值

12、为False，表示控件能在水，表示控件能在水平方向上按正文的长度放大或缩小，在垂直方向上平方向上按正文的长度放大或缩小，在垂直方向上以字体大小来放大或缩小显示区域以字体大小来放大或缩小显示区域仅当仅当AutoSize属性为属性为True时，时，WordWrap属性才有属性才有效效 N实例演示实例演示属性属性 TabIndex属性决定了按属性决定了按Tab键时，对象在其父窗体中键时，对象在其父窗体中得到焦点的顺序得到焦点的顺序“”代表接收用户鼠标或键盘输入的能力。获代表接收用户鼠标或键盘输入的能力。获得焦点称为聚焦，当对象获得焦点时，才可接收用得焦点称为聚焦，当对象获得焦点时，才可接收用户的输入

13、。在户的输入。在Windows界面下，任何时刻可运行多界面下，任何时刻可运行多个应用程序，但只有一个包含个应用程序，但只有一个包含“聚焦聚焦”窗口的应用窗口的应用程序才是当前活动程序；同样在一个有多个文本框程序才是当前活动程序；同样在一个有多个文本框所构成的窗口中，只有具有焦点的那个文本框才能所构成的窗口中，只有具有焦点的那个文本框才能接收用户的输入接收用户的输入若要改变若要改变Tab顺序，即对象在其父窗体中得到焦点的顺序，即对象在其父窗体中得到焦点的顺序，可以直接修改对象的顺序，可以直接修改对象的TabIndex属性的值属性的值属性属性 系统会根据控件创建的次序为大部分控件系统会根据控件创建

14、的次序为大部分控件(除除Menu、Timer、Data、Image、Line和和Shape等等)分配一个分配一个Tab顺序，并将此次序号保存在顺序，并将此次序号保存在TabIndex属性中。在属性中。在缺省情况下，第一个创建的控件缺省情况下，第一个创建的控件TabIndex属性值为属性值为0，第二个为第二个为1，依次类推。在程序运行时，按，依次类推。在程序运行时，按Tab键就键就按照按照TabIndex属性值中的递增次序在各个控件上循属性值中的递增次序在各个控件上循环移动焦点环移动焦点运行时，对于不可见或被禁用的控件以及某些不能运行时，对于不可见或被禁用的控件以及某些不能接收焦点的控件接收焦点

15、的控件(如如Frame和和Label等控件等控件)仍保持在仍保持在Tab键次序中，但利用键次序中，但利用这些这些控件。而对于那些原本可以接收焦点的对象，则可控件。而对于那些原本可以接收焦点的对象，则可以通过以通过，达到此效果，达到此效果 M不同类的对象可以有一些相同的属性，但是有些不同类的对象可以有一些相同的属性，但是有些属性并非所有对象都有，可能是该对象特有的属性并非所有对象都有，可能是该对象特有的M属性的设置可以在设计时通过属性窗口设置，也属性的设置可以在设计时通过属性窗口设置，也可通过代码窗口在编程时设置可通过代码窗口在编程时设置M属性窗口并未列出该对象的所有属性，只列出设属性窗口并未列

16、出该对象的所有属性，只列出设计态属性，而有一些是只能在程序代码中使用的运计态属性，而有一些是只能在程序代码中使用的运行态属性，当然也有一部分属性在运行时是只读的行态属性，当然也有一部分属性在运行时是只读的 窗体是窗体是VB最重要的最重要的，它用于创建，它用于创建VB应用程序应用程序的用户界面或对话框，是包容用户界面或对话框所的用户界面或对话框，是包容用户界面或对话框所需的各种控件对象的需的各种控件对象的在创建新工程时，在创建新工程时，VB会在窗体设计器中自动新建会在窗体设计器中自动新建一个空白的窗体，要求以它为起点创建程序一个空白的窗体，要求以它为起点创建程序一个应用程序通常包含多个窗体，其中

17、应有一个窗一个应用程序通常包含多个窗体，其中应有一个窗体作为程序的体作为程序的启动窗体启动窗体，也就是运行程序时首先出，也就是运行程序时首先出现的窗体。系统现的窗体。系统默认第一个窗体默认第一个窗体，即属性，即属性Name为为Form1的窗体为启动（起始）窗体。的窗体为启动（起始）窗体。用户也可使用用户也可使用，设置起始窗体设置起始窗体窗体名称窗体名称系统为应用程序的第一个窗体缺省命名为系统为应用程序的第一个窗体缺省命名为Form1，在程序代码中通过引用窗体名称以识别和访问不同在程序代码中通过引用窗体名称以识别和访问不同的对象的对象 窗体标题窗体标题窗体标题是出现在窗体标题栏的文本内容。缺省使

18、窗体标题是出现在窗体标题栏的文本内容。缺省使用窗体名的缺省值用窗体名的缺省值 Form1.Picture = LoadPicture(D:GraphicsBEANY.bmp)Form2.Picture = Form1.PictureControlBox属性值取属性值取True或或False，表示窗体左上角是，表示窗体左上角是否有否有控制菜单框控制菜单框仅当仅当ControlBox属性值取属性值取True，Icon属性设置才有效，属性设置才有效，可为窗体最小化自定义一个可为窗体最小化自定义一个显示图标显示图标当当ControlBox属性值取属性值取False，则无控制菜单框，这时，则无控制菜单框

19、，这时，系统将系统将MaxButton和和MinButton属性自动设置为属性自动设置为FalseBorderStyle：窗体边框风格：窗体边框风格该属性对于窗体对象在该属性对于窗体对象在。当。当BorderStyle设设置为除置为除2以外的值时，系统将以外的值时，系统将MaxButton和和MinButton属性设置为属性设置为False。常常利用对该属性的设置，来设计。常常利用对该属性的设置，来设计不同的窗体形式不同的窗体形式 BorderStyle设定值设定值常量常量风格风格0VbBSNone窗口无外框，无法移动及改变大小窗口无外框，无法移动及改变大小1VbFixedSingle单线外框

20、，运行时可移动、但大小不可改变单线外框，运行时可移动、但大小不可改变2VbSizable(缺省值缺省值)双线外框，运行时可移动并可改变双线外框，运行时可移动并可改变大小大小3VbFixedDouble双线外框，运行时窗口为固定对话框、大小双线外框，运行时窗口为固定对话框、大小不可改变不可改变4VbFixedToolWindow包含一个关闭按钮，标题栏字体缩小，窗口包含一个关闭按钮，标题栏字体缩小，窗口大小不可改变，在大小不可改变，在Windows95任务栏中不会任务栏中不会显示，外观与工具条相似显示，外观与工具条相似5VbSizableToolWindow包含一个关闭按钮，标题栏字体缩小，窗口

21、包含一个关闭按钮，标题栏字体缩小，窗口大小能改变，在大小能改变，在Windows95任务栏中不会显任务栏中不会显示，外观与工具条相似示，外观与工具条相似：设置窗体执行时的显示状态：设置窗体执行时的显示状态WindowsState属性取值为属性取值为0表示有窗口边界的正常窗表示有窗口边界的正常窗口状态，口状态，1表示以图标方式显示的最小化状态，表示以图标方式显示的最小化状态，2表示表示无边框充满整个屏幕的最大化状态无边框充满整个屏幕的最大化状态：打印方法（用于将文本输出到对象上）：打印方法（用于将文本输出到对象上）调用格式调用格式：G对象除了可以是窗体外，还可以是图片框对象除了可以是窗体外，还可

22、以是图片框(PictureBox)、Debug或打印机或打印机(Printer)，若，若缺省对象名，表示将文本输出缺省对象名，表示将文本输出到当前窗体上到当前窗体上G输出项列表：是由输出项列表：是由0个、个、1个或多个待输出的数值表达式或个或多个待输出的数值表达式或字符串表达式构成；当输出项是由多个项构成，则中间必字符串表达式构成；当输出项是由多个项构成，则中间必须用逗号或分号分隔；若须用逗号或分号分隔；若Print后什么都不跟，则表示输出后什么都不跟，则表示输出一个空行一个空行J Form1.Print 1, 2, 3Print 1, 2, 3Picture1.Print 1, 2, 3Fo

23、rm1.PrintPrintPicture1.Print ：打印方法：打印方法 例题例题3-3 调用格式调用格式：G;(分号分号)和和,(逗号逗号)分隔符：用于分隔符：用于分隔分隔前后两个输出项，并前后两个输出项，并指定指定分隔符后的下一个输出项的输出位置分隔符后的下一个输出项的输出位置G分号分号(;)表示下一个输出项将以紧凑格式，紧跟着上一个输表示下一个输出项将以紧凑格式，紧跟着上一个输出项输出，中间没有空格出项输出，中间没有空格G逗号逗号(,)表示采用标准格式，下一个输出项将在下一个打印区表示采用标准格式，下一个输出项将在下一个打印区(每隔每隔14列开始一个打印区，每列的宽度是所有字符的平

24、均列开始一个打印区，每列的宽度是所有字符的平均宽度宽度)的起始位置输出的起始位置输出J Print 1, 2, 3Print “We”；“study”；“VB”E 标准格式标准格式E 紧缩格式紧缩格式JPrint 1, 2, 3Print We, study, VB5.0 运行结果运行结果 1-2 3WestudyVBGPrint各数据分别存储在各自的标准输出区内，数据之各数据分别存储在各自的标准输出区内，数据之间留有一定的空格字符，数据划分非常明显（间留有一定的空格字符，数据划分非常明显（读取数读取数据容易据容易）G对于一个对于一个数值型数值型数据，数据，前面有一个符号位前面有一个符号位（对

25、于正号，（对于正号，不显示但留有一个空格），数据不显示但留有一个空格），数据后留有一个空格后留有一个空格作为作为分隔符分隔符JPrint 1； 2； 3Print We； study； VB5.0 运行结果运行结果 1 -2 3WestudyVBGPrint各数据紧凑地显示，各数据紧凑地显示，节省空间节省空间G对于一个对于一个数值型数值型数据，数据，前面有一个符号位前面有一个符号位（对于正号（对于正号，不显示但留有一个空格），数据，不显示但留有一个空格），数据后留有一个空格后留有一个空格作作为分隔符为分隔符G对于对于字符串字符串数据，输出的各字符串数据间没有空格而数据，输出的各字符串数据间没有

26、空格而连成一片，造成连成一片，造成读取数据的困难读取数据的困难用用Print方法的标准和紧凑格式输出数据，请写出程序方法的标准和紧凑格式输出数据，请写出程序运行结果运行结果Private Sub Form_Click() Print 标准格式标准格式 Print 数值数值, 123, Print 字符字符, VB Print Print 紧缩格式紧缩格式 Print 数值数值; 123; Print 字符字符; VB Print Print 标准和紧缩格式混合使用标准和紧缩格式混合使用 Print 数值数值; 123, 字符字符; VBEnd Sub：打印方法：打印方法 例题例题3-4 调用格

27、式调用格式：G调用调用Print方法打印输出的位置是方法打印输出的位置是由对象的绘图坐标由对象的绘图坐标CurrentX和和CurrentY属性决定的属性决定的，默认为对象的左上，默认为对象的左上角角(0,0)G定位输出函数：定位输出函数： ：可选的。在显示或打印列表中的下一个输：可选的。在显示或打印列表中的下一个输出项前插入出项前插入n个空格，从而实现对输出进行定位个空格，从而实现对输出进行定位：可选的。用来将输出定位在绝对：可选的。用来将输出定位在绝对n列号上，列号上，使用无参数的使用无参数的Tab()表示将输出定位在下一个打印区表示将输出定位在下一个打印区的起始位置的起始位置用用Prin

28、t方法和定位函数输出数据方法和定位函数输出数据：下一个输出项：下一个输出项前插入前插入n个空格个空格：输出定位在：输出定位在绝对绝对n列号上列号上Private Sub Form_Click() Print Tab(8); A Print Tab(6); B; Spc(2); B Print Spc(3); C; Spc(2); C; Spc(2); C Print Tab(2); D; Spc(2); D; Spc(2); D; Spc(2); DEnd Sub：清屏方法：清屏方法调用格式调用格式：G清除运行时在对象中用清除运行时在对象中用Print和图形方法创建的文本和和图形方法创建的文本

29、和图形，同时将绘图坐标图形，同时将绘图坐标CurrentX和和CurrentY属性恢复属性恢复到原点到原点(0,0)G对象可以是对象可以是，对象名缺省对象名缺省时，表示清除时，表示清除当前窗体当前窗体JForm1.ClsClsPicture1.Cls和和：分别用于显示和隐藏窗体：分别用于显示和隐藏窗体 调用格式调用格式：G窗体名缺省，表示显示或隐藏当前窗体窗体名缺省，表示显示或隐藏当前窗体GShow方法的方法的Style参数决定窗体是有模式的（参数决定窗体是有模式的（vbModel）还是无模式的（还是无模式的（vbModeless）。有模式的窗体不允许）。有模式的窗体不允许用户同时与应用程序的

30、其他窗体交互，无模式窗体则用户同时与应用程序的其他窗体交互，无模式窗体则允许，允许，Style缺省值是无模式的缺省值是无模式的 JForm1.Show Form1.Hide Show Hide：设置焦点设置焦点：移动方法（除时钟和菜单外）移动方法（除时钟和菜单外）G如果对象是窗体，则如果对象是窗体，则“左边距离左边距离”和和“上边距离上边距离”以屏幕左边界和上边界为准，否则以窗体的左边以屏幕左边界和上边界为准，否则以窗体的左边界和上边界为准，给出宽度和高度表示可以改变界和上边界为准，给出宽度和高度表示可以改变大小大小：打印窗体方法打印窗体方法：刷新方法刷新方法 (单击单击)事件：当用户单击窗体

31、时触发本事件事件：当用户单击窗体时触发本事件 (双击双击)事件事件 ：当用户双击窗体时触发本事：当用户双击窗体时触发本事件。件。MM“双击双击”实际上触发两个事件，第一次按实际上触发两个事件，第一次按鼠标按钮时产生鼠标按钮时产生Click单击事件，第二次按鼠标按钮单击事件，第二次按鼠标按钮时产生时产生DblClick事件事件 (初始化初始化)事件事件 ：在窗体被加载：在窗体被加载(Load)之前，之前，窗体被配置的时候触发窗体被配置的时候触发 (装载装载)事件事件 ：VB把窗体从磁盘或从磁盘缓冲区把窗体从磁盘或从磁盘缓冲区读入内存时触发本事件。读入内存时触发本事件。Load事件往往用于在启动事

32、件往往用于在启动程序时对属性和变量进行初始化程序时对属性和变量进行初始化事件：在窗体被改变大小时，会触发本事件事件：在窗体被改变大小时，会触发本事件(绘画绘画)事件：当窗体被移动或放大时，或者窗体事件：当窗体被移动或放大时，或者窗体移动时覆盖了一个窗体时，触发本事件移动时覆盖了一个窗体时，触发本事件(激活激活)事件：当窗体变为激活的当前窗口时，事件：当窗体变为激活的当前窗口时，引发本事件引发本事件(失去激活失去激活)事件：当窗体失去激活状态，即事件：当窗体失去激活状态，即另一个窗体成为当前窗口时，引发本事件另一个窗体成为当前窗口时，引发本事件事件：在窗体成为当前焦点时触发本事件事件：在窗体成为

33、当前焦点时触发本事件事件：在窗体失去当前焦点时触发本事件事件：在窗体失去当前焦点时触发本事件(卸载卸载)事件：当关闭窗体时，依事件：当关闭窗体时，依次触发卸载事件，将窗体从内存中卸载。当窗体被卸次触发卸载事件，将窗体从内存中卸载。当窗体被卸载后又重新装入，则窗体中所有控件都将重新初始化载后又重新装入，则窗体中所有控件都将重新初始化A学习对象的事件，主要是了解事件什么时机被触发，学习对象的事件，主要是了解事件什么时机被触发，从而有助于选择在哪一个事件过程中编写代码从而有助于选择在哪一个事件过程中编写代码了解和掌握窗体的事件触发时机和次序了解和掌握窗体的事件触发时机和次序例题例题3-5N实例演示实

34、例演示在运行一个在运行一个VB应用程序时，先发生启动窗体的应用程序时，先发生启动窗体的Initialize事件，紧跟着是事件，紧跟着是Load事件，将窗体装入内存事件，将窗体装入内存之后，窗体被激活时，之后，窗体被激活时，Activate事件发生。这三个事件事件发生。这三个事件是在一瞬间就完成的是在一瞬间就完成的对于窗体的对于窗体的Initialize和和Load事件都是发生在窗体被显事件都是发生在窗体被显示之前，所以经常在事件过程中放置一些命令语句来示之前，所以经常在事件过程中放置一些命令语句来初始化应用程序，但所用命令语句是有限的，例如：初始化应用程序，但所用命令语句是有限的，例如：“对象

35、名对象名.SetFocus”一类的语句就不能使用，而一类的语句就不能使用，而Print语语句仅当句仅当Form的的AutoReDraw属性值为真时，在属性值为真时，在Load事事件中才有效件中才有效 对于对于GotFocus事件，分两种不同情况：事件，分两种不同情况：如果窗体上没有能聚焦的控件，那么该窗体在如果窗体上没有能聚焦的控件，那么该窗体在Activate事件发生之后立即触发事件发生之后立即触发GotFocus事件事件如果窗体上有能聚焦的控件，那么该控件的如果窗体上有能聚焦的控件，那么该控件的GotFocus事件发生，而不是窗体事件发生，而不是窗体有时应用程序有多个窗体构成时，当有时应用

36、程序有多个窗体构成时，当Form1由当前窗体由当前窗体变成非当前窗体时，若窗体是焦点，会先引发变成非当前窗体时，若窗体是焦点，会先引发LostFocus事件，后引发事件，后引发Deactivate事件。当该窗体再次事件。当该窗体再次成为当前窗体时，只要该窗体加载完毕后，没有被卸成为当前窗体时，只要该窗体加载完毕后，没有被卸载，就不会触发载，就不会触发Load事件，但会触发事件，但会触发Activate事件事件VB程序在执行时会自动装载启动窗体，在使用程序在执行时会自动装载启动窗体，在使用Show方方法显示窗体时，也会自动将尚未载入内存的窗体装入法显示窗体时，也会自动将尚未载入内存的窗体装入内存

37、，并引发窗体的内存，并引发窗体的Load事件。若想将窗体事件。若想将窗体(或其他对或其他对象象)载入内存，但并不显示它，则可以使用装载语句载入内存，但并不显示它，则可以使用装载语句装载语句的格式：装载语句的格式：VB程序在调用程序在调用Hide方法，仅仅是将窗体暂时隐藏，这方法，仅仅是将窗体暂时隐藏，这不同于卸载。卸载将使该对象的所有属性重新恢复为不同于卸载。卸载将使该对象的所有属性重新恢复为设计态时设定的初始值；卸载还将引发对象的卸载事设计态时设定的初始值；卸载还将引发对象的卸载事件。如果卸载的对象是程序唯一的窗体，则将终止程件。如果卸载的对象是程序唯一的窗体，则将终止程序的运行。可以使用卸

38、载语句把窗体序的运行。可以使用卸载语句把窗体(或其他对象或其他对象)从内从内存卸载存卸载卸载语句的格式：卸载语句的格式：对象名可以是对象名可以是Me，表示当前窗体，表示当前窗体在在Windows下，用户可通过使用菜单中的下，用户可通过使用菜单中的“关闭关闭”命命令或单击应用程序窗口上的令或单击应用程序窗口上的“关闭关闭”按钮来关闭窗口，按钮来关闭窗口，并结束程序的运行。并结束程序的运行。由程序来控制其结束，而不是由用户的操作来控制时，由程序来控制其结束，而不是由用户的操作来控制时，在程序代码中可使用在程序代码中可使用End语句语句执行该语句将终止应用程序的执行，并从内存卸载执行该语句将终止应用

39、程序的执行，并从内存卸载所有窗体所有窗体文本控件主要用于显示文本信息文本控件主要用于显示文本信息标准控件标准控件标签标签文本框文本框主要用于在窗体上增加主要用于在窗体上增加标签控件在程序运行时标签控件在程序运行时，即标签内容，即标签内容只能通过只能通过Caption属性来设置或修改，不能由用户在属性来设置或修改，不能由用户在程序运行时直接编辑程序运行时直接编辑主要属性主要属性Name(名称名称)、Caption(标题属性即为标签所显示的文标题属性即为标签所显示的文本内容本内容)、Alignment(对齐属性对齐属性)、AutoSize(大小自适大小自适应属性应属性)、BackStyle(背景风

40、格属性背景风格属性)等等方法：方法：Refresh(刷新刷新)、Move(移动移动)事件：事件：Click(单击单击)、DblClick(双击双击)等等主要用于主要用于，或显示由程序提供的信息，或显示由程序提供的信息在程序运行中，具有良好的在程序运行中，具有良好的 主要属性主要属性主要方法主要方法主要事件主要事件主要属性主要属性(名称名称)：文本框名称：文本框名称(文本文本)：文本框不具有：文本框不具有Caption属性，用户从文属性，用户从文本框输入和编辑、修改的文本内容就保存在本框输入和编辑、修改的文本内容就保存在Text属属性中，常常性中，常常。Text属性的文本内容最多为属性的文本内容

41、最多为2048个字符，个字符，除非除非MultiLine属性属性True，则可输入多达，则可输入多达32KB的文的文本。本。：决定文本框是否可以被编辑修改，若取值：决定文本框是否可以被编辑修改，若取值为为True，表示此时文本框中的内容是只读的、不具，表示此时文本框中的内容是只读的、不具有交互性，类似于标签，经常用于有交互性，类似于标签，经常用于主要属性主要属性(最大长度最大长度)：缺省值是：缺省值是0，表示文本框可，表示文本框可接受任意个数的字符，否则，文本框只接受接受任意个数的字符，否则，文本框只接受MaxLength属性设定的字数。属性设定的字数。MM在在VB中字符的长中字符的长度以字为

42、单位，即一个西文字符与一个汉字都是一度以字为单位，即一个西文字符与一个汉字都是一个字，长度为个字，长度为1(口令口令) )：缺省值为空，表示正常显示：缺省值为空，表示正常显示输入的字符；如该属性的值为某个字符输入的字符；如该属性的值为某个字符(*)，则表示，则表示本文本框用于输入口令，用户输入的内容仍保存在本文本框用于输入口令，用户输入的内容仍保存在Text属性中，但输入的每个字符将被代换为属性中，但输入的每个字符将被代换为PasswordChar属性设定的字符显示在文本框中。属性设定的字符显示在文本框中。PasswordChar和和MaxLength属性配合，常用于属性配合，常用于 主要属性

43、主要属性(多行多行)：属性值为：属性值为“True”(真真)，则可输入，则可输入和显示多行文本；若为和显示多行文本；若为“False”(假假)，则只能输入一，则只能输入一行文本。该属性不能在程序中改变，当本属性为行文本。该属性不能在程序中改变，当本属性为“True”时，时，PasswordChar属性设置则无效属性设置则无效 (滚动条滚动条)：缺省值为：缺省值为“0”(无滚动条无滚动条)；若；若该属性设置为该属性设置为“1”，表示有水平滚动条；若为，表示有水平滚动条；若为“2”，表示有垂直滚动条；若为表示有垂直滚动条；若为“3”，表示水平与垂直滚，表示水平与垂直滚动条两者都有。本属性只有在动条

44、两者都有。本属性只有在MultiLine属性为属性为“True”时才有效时才有效 主要属性主要属性、和和属性：在程序运行中，属性：在程序运行中，用于控制文本框中的插入点和文本选定操作用于控制文本框中的插入点和文本选定操作SelStart属性决定选定文本的开始位置，属性决定选定文本的开始位置，第一个字第一个字符位置是符位置是0SelLength属性决定选定文本的长度属性决定选定文本的长度SelText属性设定或存放由前两个属性选定的文本属性设定或存放由前两个属性选定的文本内容内容JText1.SelStart = 1Text1.SelLength = 3Text2.Text = Text1.Se

45、lText主要方法主要方法：设置焦点，本方法可使指定的文本框：设置焦点，本方法可使指定的文本框(或或其他有聚焦能力的对象其他有聚焦能力的对象)成为成为焦点焦点，也就是当前文本，也就是当前文本框，成为焦点的文本框中具有闪动的光标框，成为焦点的文本框中具有闪动的光标：刷新：刷新主要事件主要事件：当用户按下或松开键盘上某个按键时，：当用户按下或松开键盘上某个按键时，发生本事件发生本事件：当文本框的：当文本框的Text属性，即文本的内容发生属性，即文本的内容发生变化时，就引发本事件变化时，就引发本事件：当文本框失去焦点时，引发本事件：当文本框失去焦点时，引发本事件M一般经常用以上三个事件过程中设置代码

46、，来实现对一般经常用以上三个事件过程中设置代码，来实现对输入文本框中的内容进行检查、验证和确认输入文本框中的内容进行检查、验证和确认：当文本框得到焦点时，引发本事件：当文本框得到焦点时，引发本事件例题例题3-6例题例题3-7程序运行时，通过用户输入，同步设置窗体的标题，即用程序运行时，通过用户输入，同步设置窗体的标题，即用户输入什么，窗体标题就同步显示什么户输入什么，窗体标题就同步显示什么&分析：分析：接收用户输入接收用户输入文本框文本框用户输入的内容保存在文本框的用户输入的内容保存在文本框的Text属性中属性中窗体的标题与文本框内容一致窗体的标题与文本框内容一致赋值将文本框内容赋值将

47、文本框内容Text赋予窗体的标题属性赋予窗体的标题属性Caption同步显示同步显示文本框文本框Change事件事件N实例演示实例演示Private Sub Text1_Change() Form1.Caption = Text1.TextEnd Sub一个简单的登陆窗口，要求输入学号一个简单的登陆窗口，要求输入学号(必须由必须由6位数字字符位数字字符构成构成)、口令、口令(studyvb6)，按回车键结束输入，若学号、口，按回车键结束输入，若学号、口令输入正确，显示正确登陆信息，并清空文本框，等待下令输入正确，显示正确登陆信息，并清空文本框，等待下一次登陆，否则，显示不正确信息，并自动选定文

48、本，等一次登陆，否则，显示不正确信息，并自动选定文本，等待用户重新输入待用户重新输入&分析：分析：接收用户输入接收用户输入文本框文本框用户输入的内容保存在文本框的用户输入的内容保存在文本框的Text属性中属性中验证输入文本框中的内容是否正确验证输入文本框中的内容是否正确文本框文本框事件事件清空文本框清空文本框Text属性设置为属性设置为自动选定文本自动选定文本、和和属性属性N实例演示实例演示命令按钮在命令按钮在VB应用程序中是使用最多的控件对象应用程序中是使用最多的控件对象之一，用户用鼠标之一，用户用鼠标命令按钮，用来启动、中断命令按钮，用来启动、中断或结束某个任务，它是用户和程序交互

49、最简单的方或结束某个任务，它是用户和程序交互最简单的方法。但具体产生的动作则由相应的单击事件过程中法。但具体产生的动作则由相应的单击事件过程中的程序代码决定的程序代码决定主要属性主要属性主要方法主要方法：设置焦点。设置为：设置焦点。设置为焦点的按钮在其表面有一个虚焦点的按钮在其表面有一个虚边框边框 主要事件主要事件主要属性主要属性(标题标题)：属性值是显示在按钮上的文字：属性值是显示在按钮上的文字J关闭关闭G创建命令按钮的创建命令按钮的访问键快捷方式访问键快捷方式： 运行时，同时按下运行时，同时按下，即可触发命令按钮即可触发命令按钮的单击事件的单击事件J&Close G若不创建访问键，

50、但需要在标题中包含若不创建访问键，但需要在标题中包含“&”连字符，连字符，则应则应设置设置连续的两个连字符连续的两个连字符JAdd&Minus主要属性主要属性(确定确定) )：每个窗体可选择一个每个窗体可选择一个命令按钮作为命令按钮作为默认的确认按钮，即不管窗体上目前哪个控件对象默认的确认按钮，即不管窗体上目前哪个控件对象具有焦点，只要用户具有焦点，只要用户按按“Enter”回车键，就等同于回车键，就等同于单击单击该命令按钮；指定该默认的确认按钮，只需将该命令按钮；指定该默认的确认按钮，只需将其其Default属性值设为属性值设为“True”(真真)( (取消取消) )：每个窗

51、体可选择一个每个窗体可选择一个命令按钮作为命令按钮作为默认的取消按钮，只需将这个命令按钮的默认的取消按钮，只需将这个命令按钮的Cancel属属性设为性设为“True”，则不管目前窗体的哪个控件对象具，则不管目前窗体的哪个控件对象具有焦点，有焦点，按按“Esc”键即等同于单击键即等同于单击本按钮本按钮( (活动活动) )：决定按钮：决定按钮是否响应是否响应用户或系统用户或系统事件事件N实例演示实例演示主要属性主要属性(风格风格)：缺省值为：缺省值为“0”，表明按钮的风格为标，表明按钮的风格为标准格式，即按钮表面显示准格式，即按钮表面显示Caption属性设置的文本；属性设置的文本；若设为若设为“

52、1”，则为图形风格，按钮上显示图形，则为图形风格，按钮上显示图形 (图片图片) ：设置按钮上显示的图形：设置按钮上显示的图形(.bmp或或.ico)G复选框和选项按钮控件也具有这两个属性复选框和选项按钮控件也具有这两个属性与与：分别用于设置按钮：分别用于设置按钮无效时与按钮处于按下状态时显示的图形无效时与按钮处于按下状态时显示的图形：在运行态，若将命令按钮的：在运行态，若将命令按钮的Value属性值由属性值由默认的默认的False设置为设置为True，则会触发命令按钮的单击，则会触发命令按钮的单击事件事件主要事件：最基本最重要的鼠标单击事件主要事件：最基本最重要的鼠标单击事件在实际编程时，常常

53、利用命令按钮的单击事件，编在实际编程时，常常利用命令按钮的单击事件，编写一些代码完成所需的具体操作，例如：计算、清写一些代码完成所需的具体操作，例如：计算、清除、关闭等除、关闭等在程序运行时在程序运行时命令按钮单击事件的情况命令按钮单击事件的情况用鼠标单击按钮用鼠标单击按钮按按Tab键或调用键或调用SetFocus方法，将焦点转移到按钮上，方法，将焦点转移到按钮上，然后按空格键或然后按空格键或Enter回车键回车键使用按钮的访问键使用按钮的访问键(Alt+访问键访问键) 命令按钮的命令按钮的Default属性为属性为True的情况下按的情况下按Enter回车回车键；命令按钮的键；命令按钮的Ca

54、ncel属性为属性为True的情况下按的情况下按Esc键键用代码设置命令按钮的用代码设置命令按钮的Value属性为属性为True 建立一个允许输入、剪切、建立一个允许输入、剪切、复制和粘贴的文本编辑程序复制和粘贴的文本编辑程序&分析：分析：选中文本内容选中文本内容(SelText )，才能进行剪切和复，才能进行剪切和复制制Enabled剪贴板中的内容可以被反剪贴板中的内容可以被反复粘贴复粘贴图片按钮图片按钮Style、Picture按钮的按钮的Click事件过程的编写事件过程的编写N实例演示实例演示能直接提供输入选项，方便用户选择录入能直接提供输入选项，方便用户选择录入标准控件标准控件

55、选项按钮、复选框选项按钮、复选框列表框、组合框列表框、组合框3.5.1 选项按钮选项按钮(OptionButton)、复选框、复选框(CheckBox)与框架与框架(Frame)选项按钮和复选框选项按钮和复选框显示选项，供用户从中选择显示选项，供用户从中选择选项按钮通常成组出现，供用户从中必须选项按钮通常成组出现，供用户从中必须选择其中选择其中之一且最多只能选取一项之一且最多只能选取一项，即当用户选中其中一个，即当用户选中其中一个选项时，同组其他选项会自动失效，就象选项时，同组其他选项会自动失效，就象单选题单选题复选框可以单个或多个成组出现，用户可以复选框可以单个或多个成组出现，用户可以选定任

56、选定任意数目的选项意数目的选项，也可以什么都不选，选项间无任何，也可以什么都不选，选项间无任何关联，就象关联，就象不定向选择题不定向选择题框架经常用于将其他控件对象按功能组织成一个可框架经常用于将其他控件对象按功能组织成一个可标识的组，同时让窗体界面更加整齐有序标识的组，同时让窗体界面更加整齐有序N实例演示实例演示3.5.1 选项按钮选项按钮(OptionButton)、复选框、复选框(CheckBox)与框架与框架(Frame)：设置选项按钮和复选框的文本注释内容；：设置选项按钮和复选框的文本注释内容；决定框架的标题名称，若为空，则形成封闭框架框决定框架的标题名称，若为空，则形成封闭框架框：

57、决定选项按钮和复选框的：决定选项按钮和复选框的的的Value的取值为的取值为True和和False，分别表示选，分别表示选中和未选中中和未选中的的Value的取值有三种：的取值有三种：0表示未选中，表示未选中，1表示表示选中，选中，2变灰表示暂时不能访问变灰表示暂时不能访问经常利用该属性值的判断和设置选中状态经常利用该属性值的判断和设置选中状态N实例演示实例演示3.5.1 选项按钮选项按钮(OptionButton)、复选框、复选框(CheckBox)与框架与框架(Frame)选项按钮、复选框和框架都能接收选项按钮、复选框和框架都能接收事件事件单击选项按钮或复选框时，会自动改变其选中状态单击选

58、项按钮或复选框时，会自动改变其选中状态选项按钮或复选框的选项按钮或复选框的事件事件例题例题3-9M利用框架将控件分组时，应首先创建利用框架将控件分组时，应首先创建Frame控件，然控件，然后后，否则无法真正，否则无法真正实现功能分组实现功能分组G在在Frame控件内部创建的控件和框架是一个整体，将随控件内部创建的控件和框架是一个整体，将随框架容器一起移动、显示、消失和屏蔽框架容器一起移动、显示、消失和屏蔽 编写一个简单的字体格式设置编写一个简单的字体格式设置程序程序&分析：分析：需要哪些控件对象：选项按钮、复选框、框架、标签需要哪些控件对象：选项按钮、复选框、框架、标签用户的选择改变标

59、签字体的变化用户的选择改变标签字体的变化选项按钮、复选框选项按钮、复选框的的Click事件编写代码事件编写代码 如何了解用户的选择如何了解用户的选择判断选项按钮、复选框的判断选项按钮、复选框的Value属性值属性值Private Sub Check1_Click() 粗体复选框的单击事件粗体复选框的单击事件 If Check1.Value = 1 Then 若粗体复选框选中若粗体复选框选中 Label1.FontBold = True 设置粗体设置粗体 ElseIf Check1.Value = 0 Then 若粗体复选框未选若粗体复选框未选 Label1.FontBold = False 取

60、消粗体取消粗体 End IfEnd Sub3.5.2 列表框列表框(ListBox)和组合框和组合框(Combol)列表框和组合框控件列表框和组合框控件通过通过多个多个项目，供用户选择，实现交互。当列表项目很多，项目，供用户选择，实现交互。当列表项目很多，无法全部显示，会自动出现垂直滚动条，方便用户无法全部显示，会自动出现垂直滚动条，方便用户浏览选择。浏览选择。列表框仅能为用户提供选择的列表，不能由用户直列表框仅能为用户提供选择的列表，不能由用户直接输入和修改其中的列表项内容接输入和修改其中的列表项内容组合框是文本框和列表框功能的组合控件，所以用组合框是文本框和列表框功能的组合控件，所以用户可以通过在其文本框中输入，来选择列表项户可以通过在其文