VB程序设计案例教程 第三章窗体和常用控件

（1）Cls方法
Cls方法可以清除屏幕上的文本、图形等所有的内容。使用它时不需要 给它任何的参数。 例 Cls使用方法 Private Sub Form_Paint() '窗体画图事件 Line (1000, 1000)-(2000, 1000) '画一条直线 Print "Cls实例" End Sub Private Sub Form_Click() '窗口点击事件 MsgBox “点击确定清除窗口中的内容" '弹出一个对话框 Cls '清屏方法 End Sub
窗体的常用方法 (Method)
方法是VB系统提供的，它隶属于对象，用来完成特定操作。窗 体常用的方法有： 1. Cls方法 Cls方法用来清除窗体上显示的正文和绘制的图形。 Cls方法的一般格式： [窗体名.]Cls 省略窗体名，则清除当前窗体上的正文和绘制的图形。例如： Form1.Cls 清除窗体1上显示的正文和绘制的图形。
'弹出一个对话框 '窗体单击事件 '隐藏窗体 '弹出一个对话框 '显示窗体
（3）Move方法
Move方法可以在程序中动态的移动窗口。Move方法需要有 参数，具体的语法格式如下： Object.Move Left,Top,Width,Height
其中Object表示窗口的对象名称。Object参数是可选的，如 果省略的话，那么就表示Move方法移动的是当前具有焦点的窗 体。Left表示窗体距屏幕左边的水平坐标。Left参数是必须有的 。Top表示窗体距屏幕上方的垂直坐标。Top参数是可选的。 Width表示窗体的新的宽度。Width参数是可选的，Height表示 窗体的新的高度。Height参数是可选的。
3. Click Click事件是当程序运行后，用鼠标单击窗体时触发的事 件。和前面两个事件比较，前面两个事件是自动触发的 事件，而Click事件是人为触发事件。一旦触发了Click 事件，便执行Click事件过程(如果有Click事件过程)。
4. DblClick DblClick事件是当程序运行后，用鼠标双击窗体时触发 的事 件。DblClick 事件是人为触发事件 。一旦触发了 DblClick 事 件 ， 便 执 行 DblClick 事 件 过 程 ( 如 果 有 DblClick事件过程)。
4. Print方法 Print方法用来输出文本或表达式的值。 Print方法的一般格式： [窗体名. ]Print [[输出列表][;|，]] 省略窗体名，则在当前窗体上输出。窗体名可以是其他对象 名称，如：图片框(PictureBox)、打印机(printer)、立即 窗口(Debug)等对象名。 [输出列表]是要输出的常量、变量或表达式，它们可以是 数值表达式、字符串表达式、关系表达式或逻辑表达式， 各输出项之间要用逗号或分号分割 。
注意： 虽然Caption属性与Name属性系统默认的名称是一样的，但 是Name属性表示的是窗口的标识对象的名称，而Caption属性只是表 示标题栏中或图标下的文字。在程序设计中，改变窗口的属性时，使 用的是Name属性的值而不是Caption属性的值。
注意：对于窗体name属性的命名，最好使用能代表一定意义的 英文单词，而且以frm开头，例如frmMain，frmlogin， frmregedit。
（2）BackColor属性
对于窗口的BackColor属性可以在程序中通过动态代码进行设置。 具体方法如下： Object.BackColor = Value 其中Object表示窗体对象的名称（必须的）Value表示颜色，通常 用RGB方法设置颜色。RGB共有三个参数第一个参数表示红色的值， 取值范围是0~255第二个参数表示绿色的值，取值范围是0~255第三 个参数表示蓝色的值，取值范围是0~255。 BackColor属性表示返回/设置窗口中文本、图像的背景颜色。设置 方法如图所示。
Move方法应用实例。
Private Sub Form_Load() Top = 0 Left = 0 ‘窗体的顶点在坐标0，0 Width = 2000 ‘窗体的宽为2000 Height = 1000 ‘窗体的高为1000 End Sub Private Sub Form_Click() Move 4000, 4000, 5000, 4000 ‘当单击窗体时，窗体的顶点将移动到 坐标4000，4000，并且窗体的宽度变 为500，高度变为4000 End Sub
2. Activate 在Load事件发生后，系统自动触发并执行Activate事件。 Load事件发生时窗体是不活动的，Activate事件发生时 窗体已是活动的。Activate事件是自动触发的事件，因 此执行程序后马上要做的事可以写在该事件过程中。 Deavtivate 事件：当另一个窗体或应用程序被激活，原窗 体对象不再是活动窗体时，就会发生该事件。
Print方法具有计算和显示的双重功能，不仅能显示变量的 值、计算表达式的值，还能显示字符串的值。例如： Form1.Print "*****"
在窗体Form1显示：*****
用Print显示计算结果的例子： Form1.Print 3 * 4 在窗体Form1显示：12
当[输出列表]中有多个输出项时，要使用分隔符。分 隔符有两种，分别是逗号“，”和分号“；”。因分隔符 不同，显示格式有分区格式和紧凑格式两种。 用逗号“，”作分隔符，则各个输出项按分区格式显示。 14列为一个分区，每个数据项占一个分区。 用分号“；”作分隔符，则为紧凑格式显示。当输出 项是字符数据时数据项之间不留空格；当输出是数值数据 时，数据前留一个前导空格或显示一个负号(当是负数时显 示负号)，每个数据项之后留一个尾随空格。 逗号和分号可以混合使用。
第2章 窗体和常用控 件
（时间：12学时）
第2章窗体和常用控件

教学提示：本章简要介绍Visual basic（以下简称VB）语 言。通过本章的学习，读者将了解VB程序设计语言的基 本特点、主要功能，同时初步认识了VB集成开发环境和 用VB开发应用程序的步骤。 教学目标：掌握集成开发环境中的标题栏、菜单栏、工 具栏、工具箱、窗体设计窗口、工程窗口、属性窗口的 作用。掌握建立VB应用程序中的用户界面设计、编写代 码、运行程序、保存程序的操作方法及生成可执行程序 的方法。
（3）BorderStyle属性
BorderStyle属性表示返回/设置窗口的 边框样式。它决定了窗体的主要特征。 在属性窗口中，可以对BorderStyle属性 的值进行设置。
（4）Caption属性
Caption属性表示返回/设置窗口的标题栏中或图标下 的文字。当创建一个窗体时，系统将自动为其赋值为 Form1，在工程中如果添加第二个窗体，系统将为其赋 值为Form2，以此类推。 对于窗体的Caption属性也可以在程序中通过动态代码 进行设置。具体方法如下： Object.Caption = Value Form1. Caption=“欢迎进入VB世界” 其中Object为窗口的对象名称，Value的值为字符串。
窗体的方法及其作用
2．Show方法 用于显示窗体。 语法：Object.Show 3．Hide方法 用于隐藏窗体，但不能将窗体卸载。 语法：Object.Hide
（2）Hide方法和Show方法
Hide方法可以隐藏窗口，Show方法可以显示窗口。这两种方法都不需 要参数。
Hide与Show实例 Private Sub Form_Load() MsgBox "当单击窗体时窗体将被隐藏" End Sub Private Sub Form_Click() Hide MsgBox "请单击确定显示窗体" Show End Sub
如果Print末尾加有分号，下一个Print输出的 内容将紧跟在当前Print输出内容的后面 例如： Form1.Print "面向对象"; Form1.Print "程序设计" 在窗体Form1显示：面向对象程序设计，占一行显 示，且中间无空格。
如果Print末尾加有逗号，则在同一行上跳到下一个显示 区段显示 例如： Form1.Print "100+50"; 100 + 50， Form1.Print "100*50"; 100 * 50 完全等效于： Form1.Print "100+50"; 100 + 50， "100*50"; 100 * 50 在窗体Form1显示：100+50 150 100*50 5000
如果只有Print关键字，无输出内容，则将 光标移到下一行，不输出任何内容 例如： Form1.Print "面向对象"; Form1.Print Form1.Print "程序设计" 在窗体Form1占两行显示：面向对象 程序设计 中间无空行。
又如： Form1.Print "面向对象" Form1.Print Form1.Print "程序设计" 在窗体Form1占三行显示：面向对象程序设计，中间空一行。
5. Resize Resize事件是当程序运行后，调出窗体或窗体的大小被 改变时触发的事件。不论是用鼠标改变了窗体的大小， 还是用代码改变了窗体的大小，都会触发Resize事件。 一旦触发了Resize事件，便执行Resize事件过程(如果有 Resize事件过程)。
6、Paint事件
画图事件。当窗体被移动或者放大之后，该窗体部分或 全部暴露时发生的事件。通常在Paint事件中画窗体中显 现的文字或图形。
例如： Form1.Print "100>50"; 100 > 50 在窗体Form1显示：100>50True，显示的字符串和 布尔值之间无空格。 下面是用Print显示用逗号分隔两个输出项的例子： Print "100>50"， 100 > 50 在窗体Form1显示：100>50 True，用1到14列显 示字符串，当字符串长度小于14时用空格填充，从 第15列开始显示布尔值。