二级VB程序设计教程

1、VB程序设计教程,主讲老师：韩维良,2005.3,第二章,对象及其操作,第一节 对 象 一、对象属性的设置 设置对象属性的两种途径： (1) 在设计用户界面时用属性窗口设置对象的属性。 (2) 在程序运行中更改对象的属性，用赋值语句： 对象名.属性名 属性值 在程序代码中，对象属性的设置如： 例如：Text1.Text = “循序渐进学习Visual Basic 5.0,二、属性窗口 打开属性窗口的方法：选择“视图”菜单中的“属性窗口”菜单项，或者右击对象选“属性窗口”或 按 F4 键 ； 设置属性的方法 ：选择欲设置属性的对象，单击属性列表左侧的属性名，输入或选择相应的属性。,第二节 窗 体

2、 一、窗体的结构与属性 窗体：是用于创建应用程序的用户界面或对话框，是包容各种控件对象的容器。 由标题栏和窗体主体两部分组成。 标题栏的组成 ：控制菜单图标，应用程序标题，最小化按钮、还原按钮和关闭按钮。,二、窗体属性 1、Caption 属性 标题栏上显示的内容； 2、（名称） Name 属性 命名前缀为：FRM，一个窗体的内部标识，供系统识别引用。,3、Left 和 Top 属性 用于精确的指定窗体在屏幕中的位置。单位为缇，屏幕宽 9600 缇，高 7200 缇。 Left 指定了窗体左边缘与屏幕左边界的距离，而 Top 则指定了窗体上边缘与屏幕上边界的距离。 4、Height 和 Wid

3、th 属性 分别用来指定窗体的高度和宽度。,例：将窗体的长和宽设置为屏幕的一半，并使其显示在屏幕的中央，可以用下面的程序段： Private Sub from_load() Form1.Width=Screen.Width/2 Form1.Height=Screen.Height/2 Form1.Left=(Screen.Width-Form1.width)/2 Form1.Top=(Screen.Height-Form1.height)/2 End Sub,5、颜色属性 BackColor 属性：用来设定窗体以及其上控件的背景颜色 。 ForeColor ：用来设定显示的文本和图形的前景颜色

4、。 FillColor ：用来设定在背景色上填充文本和图形的颜色，它能被能够调用 Circle 和 Line 图形方法的窗体、图像和打印机使用。,在 Windows 中，颜色由R、G、B三个介于0到255之间的数值表示（R、G、B表示红、绿、蓝三种基色：三原色），常用十六进制表示； 用户可以在调色板选择需要的颜色。 激活调色板有两种方法 ： 、双击属性窗口中的颜色属性，然后选择调色板 ； 、单击属性窗口中颜色属性设定值框中的箭头按钮。,6、Font 属性 用于设置或返回屏幕或打印机所使用的字体 。 它包括多个子属性：字体、字体样式、字号、删除线、下划线。 在属性窗口的字体对话框中设置； 在程序

5、代码中设置时，需要知道每一个属性的名称： 字体名称属性 (FontName) 字号属性 (FontSize) 粗体属性 (FontBold),斜体属性 (FontItalic) 下划线属性 (FontUnderline) 删除线属性 (FontStrikethru) 。 字体名称属性的设置方法如：LblText.FontName= “隶书” 字号属性设置为一个阿拉伯数值 ，其他属性均设置为 True 或 False 。如： LblText.FontSize=4 LblText.FontBold=True LblText.FontItalic=True,7、BorderStyle 属性 用来设置

6、窗口和对话框的边界，实为控制窗体如何调整大小。 说明：各种窗口和对话框的功能不同，它们所具有的边界属性也相应的不同，主要决定是否显示控制菜单图标，任务栏上是否显示，大小是否可变等。,- None 0 无边框与标题条，且窗体无法移动与调整大小。 - Fixed Single 1 包含控制菜单图标，标题，关闭按钮，主要用于设计大小保持不变的窗口。 一般不调整其窗口大小。 - Sizable 2 BorderStyle的缺省值，窗体大小与位置均可调整。,- Fixed Dialog 3 主要用于设计对话框，窗体可移动，但不能调整大小。 - Fixed ToolWindow 4 主要用于设计固定工具窗

7、口，不能改变大小。 - Sizable ToolWindow 5 主要用于设计可变尺寸工具窗口，可以改变大小。 后三种窗体，运行时不在任务栏上显示其图标。,8、Visible属性 用于确定窗体在实际运行中是否可见（True、False）。 实用于窗口切换。 9、ControlBox 属性 决定是否显示控制菜单图标。 为 TRUE 显示，为 FLASE 不显示； 仅在程序运行时才有效，与 BorderStyle 属性有关。 10、图标属性（ Icon ） 用于设置控制菜单图标图形，即图标文件。,在程序运行时期可用 LoadPicture 语句装载图标文件。如： Form1.Icon=LoadPi

8、cture(c:tempHelp.ico) 11、控制按钮属性（ MaxButton 和 MinButton ） 决定是否显示最大化和最小化按钮。 12、背景图形属性（ Picture ） 用于设置窗体背景图形。,13、状态属性（ WindowState ） 设置窗体在启动时以何种状态显示； 0 （ vbNormal ）表示窗口的正常状态；它是系统的缺省值； 1 （ VbMinimized ）代表窗体最小化状态，最小化为任务条上的一个图标； 2 （ VbMaximized ）代表窗体的最大化状态，扩大到窗体的最大尺寸即整个屏幕。,14、自动重画属性（ AutoRedraw ） 用于在多窗口程序

9、中，当此属性设置为 True 时，这个窗口被其他窗口遮住后重新显示时将会自动重画窗口上的所有图形，如果此属性设置为 False ，则窗口不重画。,（二）主要事件 1、Load 事件初始化装载事件 在窗体被装载时自动地被触发，窗体控件的默认事件。 2、Unload 事件窗体卸载事件 当窗体被卸载关闭时自动被触发。 3、鼠标事件 Click 事件鼠标单击事件 DbClick 事件鼠标双击事件,4、Activate 事件激活事件 当窗体变为当前窗口时，自动地触发该事件； 5、Deactivate 事件取消激活事件 当窗体由当前窗口变成后台窗口时（到后台运行），自动地触发该事件。 6、Paint 事件

10、窗体绘制事件 在程序运行过程中，当移动，改变、放大、缩小或清除一个窗体后，会自动调用 Paint 事件。,（三）主要方法 1、装入与卸载窗体 装入窗体（Load 语句） 装入一个指定的窗体，即将指定的窗体装载到内存中； 调用方法：Load 窗体名称 卸载窗体（Unload 语句） Unload 语句功能与 Load 语句的功能相反，用来将指定的窗体从内存中卸载；实为关闭一个窗体。 调用方法：Unload 窗体名称,两个特殊应用： 、Unload Me 关闭当前窗口本身 、End 关闭所有窗口，结束运行。执行该语句将终止应用程序的执行，并从内存卸载所有窗体。,2、显示与隐藏窗体 显示窗体（Sho

11、w 方法） 用来在屏幕上显示指定的窗体。 调用方法：窗体名称 . Show Style style 为 0，则是无模式窗体，多窗口可以切换，是缺省值。 style 为 1，则是模式窗体，即对话框式的窗体，完全占有应用程序控制权，在被关闭前，不允许切换到本程序的其它窗口中。如 WORD 中字体对话框等。,隐藏窗体（Hide 方法） 用来隐藏屏幕上指定的窗体，直到以后使用 Show 方法重新显示窗体。 调用方法：窗体名称 . Hide 应用特例：Me.Hide 隐藏自身。,例如：建立一个用户登录界面。 包含两个窗口，一个是提示窗口，另一个是登录窗口； 在提示窗口中单击【登录】按钮就弹出登录窗口让用

12、户输入“用户名”和“密码” 。,Private Sub Form_Load() Lblresult.Caption = 请单击【登录】按钮进行登录 End Sub Private Sub CMDLogin_Click() frmLogin.Show 1 End Sub Private Sub cmdquit_Click() End End Sub,Private Sub cmdCancel_Click() Unload frmLogin frmstart.Lblresult.Caption = 登录失败 End Sub Private Sub cmdOK_Click() If txtUserN

13、ame = guest And txtPassword = 123456 Then Unload frmLogin frmstart.Lblresult.Caption = 登录成功 Else MsgBox 无效的用户名和密码，再试一次！ , 48, 登录 txtUserName.SetFocus End If End Sub,第三节 控 件 一、控件的分类 在Visual Basic里对象主要分为两类：Form和Control。 Form:窗体对象或称表单，其实指的就是window。 Control:控件对象，指的是各种按钮、标签等等，是窗口中具有属性、方法和事件的对象。,控件有三种： 内部

14、控件：存在于工具箱中，包含在Visual Basic的可执行文件里，如命令按钮（CommandButton）、标签控件（Label）、正文框等。 ActiveX控件（活动控件）：它们是扩展名为.ocx的文件，如DBGrid、DBCombo、DBList等，除了Visual Basic提供的ActiveX控件，也可以使用第三方提供的控件，另外用户可以编写自己的ActiveX控件。 可插入的对象：在Visual Basic中可以将Word文档、Excel工作表等放在工具箱中，再和使用其它控件一样使用它们。,三、控件的命名和控件值 1、命名 任何一个在VB环境中的对象都有一个NAME属性，用于在程序

15、设计的过程中，标识引用该对象。 不同的对象在习惯上有一个约定的命名引导符（命名前缀）。,复选框：CHK 组合框：CBO 命令按钮：CMD 目录列表框：DIR 驱动器列表框：DRV 文件列表框：FIL 窗体：FRM 框架：FRA 栅格：GRD 图像：IMG 标签：LBL 直线：LIN 列表框：LST 菜单：MNU 单选框：OPT 图片框：PIC 几何形状：SHP 文本框：TXT 计时器：TMR 水平滚动条：HSB 垂直滚动条：VSB,2、控件值 一般情况下，控件的属性值是通过“控件名属性名”的方法进行设置，如： Text1.text=”Hello!” 但对每一个控件而言都有一个常用属性，对于这个

16、属性，不必写出属性名，只写出其控件名即可，如：Text1 =”Hello!”。 这时，将这个属性的值称为控件值。,第四节 控件的画法和基本操作 一、控件画法 方法1：单击工具箱中的控件按钮，在窗体上拖动鼠标画出控件。 特例：连续画多个同一类控件Ctrl+单击控件。 方法2：双击工具箱中的控件按钮，即可在窗体的中央画出默认大小的控件。,二、控件的基本操作 1.选定多个控件 在窗体的空白区域用鼠标左键拖动画出一个矩形框，凡被矩形框围住的控件都选中。 先按住Shift键，再用鼠标单击所要选中的控件。,2.控件的缩放和移动 移动：选定控件，直接用鼠标拖动控件到合适的位置。 用键盘微调：选定控件，“Ct

17、rl”+光标移动键 缩放：选定控件，用鼠标拖动控件的尺寸控点。 用键盘微调：选定控件，“Shift”+光标移动键,3.控件的复制删除 复制：选中控件，执行“复制”命令，再执行“粘贴”命令，在“是否创建控件数组”对话框中，单击“否”。 删除：只需选中控件后按Del键或单击工具栏上的“删除”按钮。,4.对齐子菜单 通过“格式”菜单的“对齐”子菜单中的命令，实现多控件的各种对齐方式。 方法：选定对象，执行相应的对齐命令。 左对齐：所选对象的水平位置对齐，其左边界以最后选择的对象的左边界为基准对齐。 居中对齐：所选对象的水平位置对齐，其中心位置以最后选择的对象的中心位置为基准对齐。 右对齐：所选对象的

18、水平位置对齐，其右边界以最后选择的对象的右边界为基准对齐。,顶端对齐：所选对象的垂直位置对齐，其顶端位置以最后选择的对象的顶端位置为基准对齐。 中间对齐：所选对象的垂直位置对齐，其中心位置以最后选择的对象的中心位置为基准对齐。 底端对齐：所选对象的垂直位置对齐，其底端位置以最后选择的对象的底端位置为基准对齐。 对齐到网格：所选对象的左上角与最靠近的网格对齐。,5.按相同大小制作子菜单 通过“格式”菜单中的“统一尺寸”命令，可以自动调整控件的大小，使其具有统一的尺寸。 宽度相同：以最后选择的对象为基准，使其他被选定的控件与其具有相同的宽度。 高度相同：以最后选择的对象为基准，使其他被选定的控件与其具有相同的高度。 两者都相同：以最后选择的对象为基准，使其他被选定的控件与其具有相同的宽度和高度。,6.水平间距和垂直间距子菜单 利用“格式”菜单中的“水平间距”和“垂直间距”子菜单，可以调整控件之间的间距。 相同间距：被选定的控