新编-第7讲VB编程基础-精品课件.ppt

1、1/106Visual Basic程序设计基础程序设计基础 Visual Basic 编程入门编程入门 Visual Basic 语言基础语言基础 Visual Basic 窗体及控件窗体及控件2/106Visual Basic 编程入门编程入门工具箱工具箱窗体设计窗体设计器窗口器窗口代码编辑代码编辑器窗口器窗口标题栏标题栏工具栏工具栏菜单栏菜单栏工程资工程资源编辑源编辑器窗口器窗口窗体布窗体布局窗口局窗口属性窗口属性窗口3/106Visual Basic 编程入门编程入门属性窗口属性窗口对象下拉列表框对象下拉列表框选项卡选项卡属性说明属性说明属性列表框属性列表框属性值属性值4/106Visu

2、al Basic 编程入门编程入门代码编辑器窗口代码编辑器窗口对象下拉对象下拉列表框列表框事件过程下事件过程下拉列表框拉列表框自动列出自动列出成员特性成员特性代码窗口代码窗口5/106Visual Basic 编程入门编程入门创建创建VB程序的步骤程序的步骤建立文件夹并创建工程建立文件夹并创建工程设计界面设计界面设置对象属性设置对象属性编写编写代码代码保存程序保存程序运行程序运行程序生成可执行文件生成可执行文件6/106Visual Basic 编程入门编程入门1.建立文件夹并创建工程建立文件夹并创建工程 工程是组成一个应用程序的文件集合工程是组成一个应用程序的文件集合(.vbp)，最常用，最

3、常用的是标准的是标准EXE类型的工程。该工程所需要的各个文件存放类型的工程。该工程所需要的各个文件存放在创建的文件夹中。在创建的文件夹中。2.设计应用程序界面设计应用程序界面 使用工具箱中的各种控件，在窗体设计器上使用工具箱中的各种控件，在窗体设计器上“画画”界界面。面。7/106Visual Basic 编程入门编程入门3.设置对象属性设置对象属性 属性是一个对象的特性，不同的对象有不同的属性。属性是一个对象的特性，不同的对象有不同的属性。常见的属性：常见的属性：标题标题(Caption)名称名称(Name)颜色颜色(Color)字体字体(Font)是否可见是否可见(Visible)格式：格

4、式：.=例如，例如，Label1.Caption=VB程序设计示例程序设计示例 8/106Visual Basic 编程入门编程入门3.设置对象属性设置对象属性对象名称对象名称属性名称属性名称设置值设置值Label1CaptionFont宋体、四号宋体、四号Command1Caption白色窗体白色窗体Font楷体、小四楷体、小四Command2Caption红色文本红色文本Font楷体、小四楷体、小四Command3Caption退出程序退出程序Font楷体、小四楷体、小四9/106Visual Basic 编程入门编程入门4.编写程序代码编写程序代码(事件响应代码事件响应代码)事件是预先设

5、置好的、能够被对象识别和响应的动作。事件是预先设置好的、能够被对象识别和响应的动作。在在VB中，系统为每一对象预先定义好一系列的事件，如：中，系统为每一对象预先定义好一系列的事件，如：单击单击(Click)双击双击(DblClick)装入事件装入事件(Load)改变事件改变事件(Change)鼠标移动事件鼠标移动事件(MouseMove)获取焦点事件获取焦点事件(GotFocus)事件过程的一般格式事件过程的一般格式:Private Sub _()End Sub例例:Private Sub Command1_Click()Form1.BackColor=vbRedEnd Sub10/106Vi

6、sual Basic 编程入门编程入门4.编写程序代码编写程序代码(事件响应代码事件响应代码)11/106Visual Basic 编程入门编程入门4.编写程序代码编写程序代码(事件响应代码事件响应代码)方法是一种特殊的过程和函数方法是一种特殊的过程和函数,可供用户直接调用。如可供用户直接调用。如:打印打印(Print)方法方法显示窗体显示窗体(Show)方法方法清除清除(Cls)方法方法移动移动(Move)方法方法格式：格式：.例如：例如：Form2.Show12/106Visual Basic 编程入门编程入门5.保存程序保存程序 在指定的文件夹中保存各种文件在指定的文件夹中保存各种文件1

7、3/106Visual Basic 编程入门编程入门6.运行程序运行程序“运行运行启动启动”或或7.生成可执行文件生成可执行文件 生成能够脱离生成能够脱离VB集成环境运行的集成环境运行的exe文件文件14/106Visual Basic程序设计基础程序设计基础 Visual Basic 编程入门编程入门 Visual Basic 语言基础语言基础 Visual Basic 窗体及控件窗体及控件15/106Visual Basic 语言基础语言基础例例2 2：单击窗体输出交换前后的变量：单击窗体输出交换前后的变量a a和变量和变量b b的值。的值。Private Sub Form_Click()

8、Private Sub Form_Click()Dim a As Integer,b As Integer,Temp As Integer Dim a As Integer,b As Integer,Temp As Integer 声明变量声明变量a=10 a=10 变量赋值变量赋值b=20b=20Print Print 变量变量a a和变量和变量b b交换前：交换前：;a;b;a;b 变量交换变量交换Temp=aTemp=aa=ba=bb=Tempb=TempPrint Print 变量变量a a和变量和变量b b交换后：交换后：;a;b;a;bEnd SubEnd Sub16/106Vis

9、ual Basic 语言基础语言基础n 语句输入时不区分大小写，一条语句通常写在一行中。语句输入时不区分大小写，一条语句通常写在一行中。n 一行中若输入多条语句，需用一行中若输入多条语句，需用“:”分隔。例如，分隔。例如，Temp=a:a=b:b=Temp n 长语句可通过续行符长语句可通过续行符“_”(空格后加下划线空格后加下划线)分行。例如，分行。例如，Print a变量和变量和b变量内容交换前：变量内容交换前：;a;b可分成以下两行输入：可分成以下两行输入：Print a变量和变量和b变量内容交换前：变量内容交换前：;_a;bn 单引号后面的内容为注释，可放在一行语句的最后，或单单引号后

10、面的内容为注释，可放在一行语句的最后，或单独占据一行。独占据一行。n 数值前加上前缀数值前加上前缀&H和和&O分别表示十六进制和八进制数。分别表示十六进制和八进制数。17/106Visual Basic 语言基础语言基础标识符：变量、过程、函数以及其它对象的名字。标识符：变量、过程、函数以及其它对象的名字。命名规则：命名规则：n 由字母、汉字、数字或下划线组成，第一个字符必须是字由字母、汉字、数字或下划线组成，第一个字符必须是字母或汉字。母或汉字。n 长度不超过长度不超过255个字符。其中，窗体、控件和模块的标识个字符。其中，窗体、控件和模块的标识符长度不能超过符长度不能超过40个字符。个字符

11、。n 不要与不要与VB中的关键字同名中的关键字同名n“见名知义见名知义”18/106Visual Basic 语言基础语言基础赋值语句语法格式：赋值语句语法格式：变量名变量名=表达式表达式 作用：变量赋值或设置对象属性。例如：作用：变量赋值或设置对象属性。例如：Pi=3.1415926strTemp=“Hello!”Form1.Caption=“VB程序设计示例程序设计示例”Form1.BackColor=vbWhite说明：说明：只有当表达式的类型与变量的数据类型兼容时，该表达式的值才只有当表达式的类型与变量的数据类型兼容时，该表达式的值才可以赋给相应的变量或属性。可以赋给相应的变量或属性。

12、不管表达式是什么类型，都可以赋给不管表达式是什么类型，都可以赋给Variant(变体类型变体类型)变量。变量。19/106Visual Basic 语言基础语言基础 P270类型类型类型名类型名后缀后缀存储空间存储空间整型整型Integer%2长整型长整型Long&4单精度实型单精度实型Single！4双精度实型双精度实型Double#8字节型字节型Byte1货币型货币型Currency8字符串型：变长字符串型：变长 定长定长StringString*Size$1/每个字符每个字符Size逻辑型逻辑型Boolean2日期型日期型Date8可变类型可变类型(数值数值)Variant16可变类型可

13、变类型(字符字符)变长变长20/106Visual Basic 语言基础语言基础l字符串型字符串型(String)VB字符串是由字符串是由双引号双引号括起来的一串字符括起来的一串字符不含任何字符不含任何字符(长度为长度为0)的字符串称为的字符串称为空串空串String型变量有变长和定长之分型变量有变长和定长之分例例:Dim NameA As String 声明变长字符串变量声明变长字符串变量 Dim NameB As String*20 声明定长字符串变量声明定长字符串变量 l逻辑型逻辑型(Boolean)逻辑型数据的取值：逻辑型数据的取值：True或或False 例：例：Dim BoolR

14、As Boolean BoolR=68 Print BoolR 输出：输出：False21/106Visual Basic 语言基础语言基础l日期型日期型(Date)日期型变量可存放日期和时间日期型变量可存放日期和时间日期型常数的表现形式：日期型常数的表现形式：#mm/dd/yyyy hh:mm:ss#mm/dd/yyyy hh:mm:ss 日期型数据的输出格式取决于系统的区域设置日期型数据的输出格式取决于系统的区域设置例：例：Dim D As Date声明日期型变量声明日期型变量D D=#10/5/2019#日期型变量赋值日期型变量赋值 Print D输出日期型变量的值输出日期型变量的值22

15、/106Visual Basic 语言基础语言基础l对象型对象型(Object)声明对象变量后，用声明对象变量后，用Set语句指定实际引用的对象语句指定实际引用的对象例：窗体上有命令按钮例：窗体上有命令按钮Command1，执行如下语句，可，执行如下语句，可将该按钮的显示文字改为将该按钮的显示文字改为OKDim a As Object声明声明a为对象型变量为对象型变量Set a=Command1指定指定a引用引用Command1命令按钮命令按钮a.Caption=OK 与与Command1.Caption等价等价l变体型变体型(Variant)变体：在程序运行期间可存放不同类型的数据。变体：在

16、程序运行期间可存放不同类型的数据。例：例：Dim XX缺省为缺省为 Variant类型类型 X=17X被赋予字符串被赋予字符串 17 X=X 2X被赋予数值被赋予数值15 X=A&XX被赋予字符串被赋予字符串 A15 23/106Visual Basic 语言基础语言基础l自定义数据类型自定义数据类型 在模块的在模块的“通用通用”声明段声明声明段声明 Private|Public Type 数据类型名数据类型名 元素名元素名1 As 类型名类型名 元素名元素名2 As 类型名类型名 End Type Public：声明的类型在工程中所有模块的任何过程中可用：声明的类型在工程中所有模块的任何过程

17、中可用Private：声明的类型只能在当前模块中使用：声明的类型只能在当前模块中使用 声明自定义数据类型后，可使用该类型。例声明自定义数据类型后，可使用该类型。例 Dim studTemp As student 声明为声明为student类型变量类型变量访问自定义数据类型的变量：变量名访问自定义数据类型的变量：变量名.成员名，如：成员名，如：studTemp.id=030005 studTemp.xm=李斌李斌24/106Visual Basic 语言基础语言基础常量常量Form1.BackColor=vbBlue vbBlue是表示蓝色的内部常量是表示蓝色的内部常量内部常量：由系统提供。内部

18、常量：由系统提供。25/106Visual Basic 语言基础语言基础常量常量声明格式：声明格式：Public|Private Const 常量名常量名As 类型类型=表达式表达式 符号常量：自定义常量。符号常量：自定义常量。例：例：Const conMax As Integer=9声明声明Integer型常量型常量 Const conDate=#10/5/2019#声明声明Date型常量型常量 Const CodeName=ASCII 声明声明String型常量型常量26/106Visual Basic 语言基础语言基础变量变量VB变量的命名规则：变量的命名规则：不区分字母的大小写，第一个

19、字符必须是字母不区分字母的大小写，第一个字符必须是字母 长度不超过长度不超过255个字符。个字符。不可以包含小数点或者内嵌的类型声明字符。不可以包含小数点或者内嵌的类型声明字符。不能使用关键字。不能使用关键字。不能与过程名或符号常量同名。不能与过程名或符号常量同名。Dim|Private|Static|Public As 27/106Visual Basic 语言基础语言基础变量变量数据类型数据类型整型整型长整型长整型 单精度单精度 双精度双精度 货币型货币型 字符型字符型类型符类型符%&！#$S&=10 声明声明S为长整型变量为长整型变量通过类型符号：直接在变量名后面加上类型符号通过类型符号

20、：直接在变量名后面加上类型符号使用声明语句使用声明语句 Dim 变量名变量名 As 类型类型Dim 变量名变量名 类型符类型符例如，下面两条声明语句的效果相同：例如，下面两条声明语句的效果相同：Dim a As Integer,b As Long,c As Single,d As Double Dim a%,b&,c！,d#若省略类型说明，被声明的变量为若省略类型说明，被声明的变量为Variant型。型。28/106优先级优先级运算符运算符运算运算1乘方乘方2-取负取负3*乘法乘法/浮点除法浮点除法4整数除法整数除法5Mod取模取模6+加法加法-减法减法Visual Basic 语言基础语言基

21、础运算符与表达式运算符与表达式29/106Visual Basic 语言基础语言基础运算符与表达式运算符与表达式字符串运算符：字符串运算符：“&”、“+”作用：将两个字符串连接合并成一个新的字符串。作用：将两个字符串连接合并成一个新的字符串。“+”运算符两边的操作数应均为字符串，如果都为数值型，则运算符两边的操作数应均为字符串，如果都为数值型，则进行算术运算，如果有一个为字符串，另一个为数值型，进行算术运算，如果有一个为字符串，另一个为数值型，则出错；则出错；“&运算符两边的操作数不论是数值型的还是运算符两边的操作数不论是数值型的还是字符串型，都进行字符串的连接运算，系统先将数值型操字符串型，

22、都进行字符串的连接运算，系统先将数值型操作数转换为字符串，然后再进行连接运算。作数转换为字符串，然后再进行连接运算。例如：例如：“Hello”&“World”结果为结果为“Hello World”“Check”&123结果为结果为“Checkl23”“Check”+123错误错误30/106Visual Basic 语言基础语言基础运算符与表达式运算符与表达式关系运算符关系运算符运运 算算运算符运算符举举 例例结结 果果 等于等于=Hello=helloFalse 不等于不等于 Hello helloTrue 大于大于 Hello helloFalse 大于等于大于等于=45+10=55Tru

23、e 小于小于 a abTrue 小于等于小于等于=45+10=55True 比较对象变量比较对象变量 Is 字符串匹配字符串匹配 Like F Like A-ZTrue31/106Visual Basic 语言基础语言基础运算符与表达式运算符与表达式逻辑运算符逻辑运算符XYNot YX And YX Or Y False False True False False False True False False True True False True False True True True False True True32/106Visual Basic 语言基础语言基础常用内部函数常用

24、内部函数内部函数分内部函数分5类类:数学函数数学函数 字符串函数字符串函数 随机函数、格式输出函数随机函数、格式输出函数 转换函数转换函数 日期和时间函数日期和时间函数见教材见教材P27327533/106Visual Basic 语言基础语言基础Print方法方法 格式：格式：对象对象.Print 输出项输出项 ,|;对象对象缺省为当前窗体，缺省为当前窗体，输出项输出项缺省则打印一空白行缺省则打印一空白行输出项之间可用分号或逗号分隔：使用分号，其后的输出项紧接输出项之间可用分号或逗号分隔：使用分号，其后的输出项紧接着前一个输出项输出；使用逗号，其后的输出项在下一个输出区着前一个输出项输出；使

25、用逗号，其后的输出项在下一个输出区输出。输出。两个输出区默认相隔两个输出区默认相隔1414列列 各输出项表示要打印的表达式，组成各输出项表示要打印的表达式，组成 Spc(n)|Tab(n)表达式表达式 Spc(n)：指定在输出之前插入：指定在输出之前插入n个空白字符个空白字符 Tab(n)：指定在第：指定在第n列上输出列上输出34/106Visual Basic 语言基础语言基础Print方法方法 例例3：Private Sub Form_Click()Form1.Cls PrintPrint Tab(15);*“Print Tab(13);*;Spc(1);*;Spc(1);*End Sub

26、若在若在Form_Load()Form_Load()中使中使用该方法，需要在第一用该方法，需要在第一句加入句加入Form1.ShowForm1.Show或将或将Form1Form1的的AutoredrawAutoredraw属属性设置为性设置为TrueTrue35/106Visual Basic 语言基础语言基础输入框函数输入框函数(InputBox)InputBox函数产生一个对话框，作为输入数据的界面，函数产生一个对话框，作为输入数据的界面，等待用户输入正文或按下按钮，并返回所输入的内容。等待用户输入正文或按下按钮，并返回所输入的内容。格式格式:InputBox(,)例如：值存储在例如：值

27、存储在MyStr中。中。MyStr=InputBox(提示提示&vbCrLf&信息信息,对话框对话框标题标题,aaaaaa)36/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)MsgBox函数产生一个消息框，提示用户进行选择，系函数产生一个消息框，提示用户进行选择，系统根据选择确定其后的操作。统根据选择确定其后的操作。格式格式:MsgBox(,)：用于指定显示在对话框中的信息。：用于指定显示在对话框中的信息。：用来指定对话框中出现的按钮和图标的种：用来指定对话框中出现的按钮和图标的种类、数量及默认按钮。类、数量及默认按钮。：用来显示在对话框的标题。：用来显

28、示在对话框的标题。37/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)分类分类按钮值按钮值系统定义符号常量系统定义符号常量含义含义按钮类型按钮类型0vbOKOnly只显示只显示“确定确定”按钮按钮1vbOKCancel显示显示“确定确定”、“取消取消”按钮按钮 2vbAbortRetryIgnore显示显示“终止终止”、“重试重试”、“忽略忽略”按按钮钮 3vbYesNoCancel显示显示“是是”、“否否”、“取消取消”按钮按钮 4vbYesNo显示显示“是是”、“否否”按钮按钮 5vbRetryCancel显示显示“重试重试”、“取消取消”按钮按钮 图

29、标类型图标类型16vbCritical显示停止图标显示停止图标 x 32vbQuestion显示询问图标显示询问图标?48vbExclamation显示警告图标显示警告图标！64vbInformation显示信息图标显示信息图标i 默认按钮默认按钮0vbDefaultButton1第一个按钮是默认按钮第一个按钮是默认按钮 256vbDefaultButton2第二个按钮是默认按钮第二个按钮是默认按钮 512vbDefaultButton3第三个按钮是默认按钮第三个按钮是默认按钮 38/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)系统符号常量系统符号常量返

30、回值返回值按键按键vbOK1确定确定vbCancel2取消取消vbAbort3终止终止vbRetry4重试重试vbIgnore5忽略忽略vbYes6是是vbNo7否否39/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)Private Sub Form_Click()a=MsgBox(提示信息提示信息)End SubPrivate Sub Form_Click()a=MsgBox(提示信息提示信息&Chr(13)&换行显示换行显示)End Sub只显示只显示“提示信息提示信息”提示信息换行提示信息换行例例4:将六种类型分别设计到六个按扭的将六种类型分别设计到

31、六个按扭的单击事件当中。单击事件当中。40/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)Private Sub Form_Click()a=MsgBox(提示信息提示信息,标题标题)End Sub省略第二个参数省略第二个参数“按钮类按钮类型型”,但逗号不能省略但逗号不能省略Private Sub Form_Click()a=MsgBox(提示信息提示信息,1,标题标题)End Sub显示显示“确定确定”、“取消取消”按按钮钮41/106Visual Basic 语言基础语言基础消息框函数消息框函数(MsgBox)Private Sub Command1_

32、Click()a=MsgBox(提示信息提示信息,1+16,标题标题)End SubPrivate Sub Command1_Click()a=MsgBox(提示信息提示信息,2+32+0,标题标题)End Sub显示停止图标显示停止图标设第一按钮是设第一按钮是默认按钮默认按钮42/106Visual Basic 语言基础语言基础顺序结构顺序结构 VB采用事件驱动方法，但仍需要结构化程序设计方法，采用事件驱动方法，但仍需要结构化程序设计方法，用控制结构控制程序执行的流程。用控制结构控制程序执行的流程。程序流程有三种最基本的结构：顺序、选择、循环。程序流程有三种最基本的结构：顺序、选择、循环。例

33、例5：使用文本框输入圆的半径，计算圆的面积并用标签：使用文本框输入圆的半径，计算圆的面积并用标签输出。运行界面如下图所示：输出。运行界面如下图所示：Private Sub Command1_Click()Dim r As Double,s As Double Const pi=3.1415926 r=Val(Text1.Text)s=pi*r*r Label1.Caption=圆的面积：圆的面积：&sEnd Sub43/106Visual Basic 语言基础语言基础选择结构选择结构nIf Then语句语句 格式格式1：If 条件条件 Then 语句序列语句序列 格式格式2：If 条件条件 T

34、hen 语句序列语句序列End If nIf Then Else语句语句 格式：格式：If Then语句序列语句序列1Else语句序列语句序列2End If 44/106Visual Basic 语言基础语言基础选择结构选择结构n嵌套的嵌套的If语句语句 If 条件条件1 Then语句序列语句序列1ElseIf 条件条件2 Then语句序列语句序列2ElseIf 条件条件3 Then语句序列语句序列3ElseIf 条件条件n 语句序列语句序列nEnd If n多分支选择控制语句多分支选择控制语句 Select Case 表达式表达式Case 值值1,值值2,语句序列语句序列1Case 值值3

35、to 值值4语句序列语句序列2Case Is 比较表达式比较表达式语句序列语句序列3Case Else语句序列语句序列nEnd Select45/106Visual Basic 语言基础语言基础循环结构循环结构nForNext循环语句循环语句For=To Step Exit ForNext 46/106Visual Basic 语言基础语言基础循环结构循环结构nDoLoop循环语句循环语句格式一格式一:前测式当型循环前测式当型循环格式二格式二:前测式直到型循环前测式直到型循环Do While Do Until Exit Do Exit Do LoopLoop格式三格式三:后测式当型循环后测式当

36、型循环格式四格式四:后测式直到型循环后测式直到型循环Do Do Exit Do Exit Do Loop While Loop Until 47/106Visual Basic 语言基础语言基础循环结构循环结构nWhileWend循环语句循环语句While Wend48/106Visual Basic 语言基础语言基础循环结构循环结构例例6：打印九九乘法口诀表：打印九九乘法口诀表Private Sub Form_Click()Dim i As Integer,j As IntegerFor i=1 To 9 For j=1 To i Print i;*;j;=;Format(i*j,);Nex

37、t j PrintNext iEnd Sub占位格式符占位格式符49/106Visual Basic 语言基础语言基础数组数组数组的定义数组的定义Dim 数组名数组名(下界下界 To 上界上界)As 数据类型数据类型 例如例如:Dim Data(1 To 40)As Integeru数组元素的初值：数值型数组各元素为数组元素的初值：数值型数组各元素为0，逻辑型数组各元素为，逻辑型数组各元素为False，字符串数组各元素为空串字符串数组各元素为空串()。u可同时声明几个数组，用逗号分隔，例如可同时声明几个数组，用逗号分隔，例如 Dim A%(10 To 100),B(800)As Long u定

38、义数组时，下标的下界和上界值只能是常量或常量表达式，且数组定义数组时，下标的下界和上界值只能是常量或常量表达式，且数组的上界值不得小于下界值，也不得超出长整型范围。的上界值不得小于下界值，也不得超出长整型范围。u可以使用可以使用ReDim语句动态声明数组语句动态声明数组50/106Visual Basic程序设计基础程序设计基础 Visual Basic 编程入门编程入门 Visual Basic 语言基础语言基础 Visual Basic 窗体及控件窗体及控件51/106Visual Basic 窗体及控件窗体及控件常用的窗体属性常用的窗体属性Name窗体名称窗体名称BackColor窗体的

39、背景颜色窗体的背景颜色BorderStyle窗体边框样式窗体边框样式Caption标题栏显示的内容标题栏显示的内容ControlBox决定窗体是否具有控制菜单决定窗体是否具有控制菜单Font输出字符的字体、大小、颜色等输出字符的字体、大小、颜色等Icon决定窗体运行时处于最小化时所显示的图标决定窗体运行时处于最小化时所显示的图标MaxButton 决定窗体标题栏中是否具有最大化按钮决定窗体标题栏中是否具有最大化按钮Moveable决定窗体是否能移动决定窗体是否能移动Picture设置在窗体上显示的图片设置在窗体上显示的图片WindowState决定运行时窗体是正常、最小化还是最大化决定运行时窗

40、体是正常、最小化还是最大化Height窗体高度窗体高度Width窗体的宽度窗体的宽度Left窗体的最左端与包含它的容器的最左端之间的距离窗体的最左端与包含它的容器的最左端之间的距离Top窗体的最上端与包含它的容器的最上端之间的距离窗体的最上端与包含它的容器的最上端之间的距离52/106Visual Basic 窗体及控件窗体及控件常用的窗体事件常用的窗体事件Click(单击单击)事件事件单击窗体的空白区单击窗体的空白区DblClick(双击双击)事件事件双击窗体的空白区双击窗体的空白区Load(装入装入)事件事件当窗体被装入工作区时当窗体被装入工作区时Activate(活动活动)事件事件当窗体

41、变为活动窗口时当窗体变为活动窗口时Unload(卸载卸载)事件事件当从内存中卸载窗体时当从内存中卸载窗体时QueryUnload 事件事件当从内存中卸载窗体之前时当从内存中卸载窗体之前时Resize事件事件当窗体首次显示在屏幕上或窗体大小改变当窗体首次显示在屏幕上或窗体大小改变KeyPress/KeyDown/KeyUp当敲击当敲击/按下按下/松开键盘的某个键时松开键盘的某个键时MouseDown/MouseUp/MouseOver当鼠标按下当鼠标按下/松开松开/移动时移动时事件需要被外在条件激活，是被动的；事件需要被外在条件激活，是被动的；事件中要写代码，如果不写代码，那么这个事事件中要写代

42、码，如果不写代码，那么这个事件就和没发生一样。件就和没发生一样。53/106Visual Basic 窗体及控件窗体及控件常用的窗体方法常用的窗体方法Load装载窗体到内存，但不显示窗体装载窗体到内存，但不显示窗体Show显示窗体显示窗体 Hide隐藏窗体隐藏窗体 Print在窗体上显示信息在窗体上显示信息Cls清除窗体上的信息和用绘图方法生成的图形清除窗体上的信息和用绘图方法生成的图形Move移动并改变窗体的位置和大小移动并改变窗体的位置和大小方法要由我们主动的在代码中写出在什么地方调用；方法要由我们主动的在代码中写出在什么地方调用；方法中的代码由系统自己内部定义，不需要自己修改，方法中的代

43、码由系统自己内部定义，不需要自己修改，但可通过传送参数，改变方法执行的效果，但可通过传送参数，改变方法执行的效果，54/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性Name属性属性 Name属性在代码中用于标识窗体、控件或数据访问属性在代码中用于标识窗体、控件或数据访问对象的名称。对象的名称。当建立一个新控件时，当建立一个新控件时，VB为其建立一个缺省名称，为其建立一个缺省名称，用户可更改缺省名，但必须以字母开始，包括字母、数用户可更改缺省名，但必须以字母开始，包括字母、数字和下划线，不能包括标点符号或空格，最长字和下划线，不能包括标点符号或空格，最长40个

44、字符。个字符。如果为同类型的控件取相同的如果为同类型的控件取相同的Name属性，可以创属性，可以创建控件数组。建控件数组。55/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性Caption属性属性 Caption属性用于确定对象的标题。对于窗体，该属属性用于确定对象的标题。对于窗体，该属性表示要显示在标题栏中的文本。当创建一个新的对象性表示要显示在标题栏中的文本。当创建一个新的对象时，缺省标题与缺省的时，缺省标题与缺省的Name属性值相同。属性值相同。在设置在设置Caption属性时，可在要指定为访问键的字符属性时，可在要指定为访问键的字符前加一个前加一个“&

45、”符号。运行时，同时按下符号。运行时，同时按下Alt键和带下划线键和带下划线的字符相当于单击相应的控件。的字符相当于单击相应的控件。56/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性Enabled属性属性 用来确定一个窗体或控件是否能够对用户产生的事用来确定一个窗体或控件是否能够对用户产生的事件作出响应。若设置为件作出响应。若设置为True(缺省值缺省值)，则控件有效，允许，则控件有效，允许控件对事件作出响应；若设置为控件对事件作出响应；若设置为False，则控件无效，阻，则控件无效，阻止控件对事件作出响应。止控件对事件作出响应。运行时，可以根据应用程序的当

46、前状态，决定使某运行时，可以根据应用程序的当前状态，决定使某些控件无效或有效。控件的些控件无效或有效。控件的Enabled属性设置为属性设置为False时，时，控件呈暗灰色显示。控件呈暗灰色显示。57/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性Visible属性属性 用来确定一个窗体或控件是否可见。若将控件的用来确定一个窗体或控件是否可见。若将控件的Visible属性设置为属性设置为True(缺值缺值)，则控件在运行时可见；若，则控件在运行时可见；若将控件的将控件的Visible属性设置为属性设置为False，则控件在运行时不可见。，则控件在运行时不可见。

47、对窗体用对窗体用Show或或Hide方法，分别和在代码中将窗体的方法，分别和在代码中将窗体的Visible属性设置为属性设置为True或或False的果是一样的。的果是一样的。58/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性Left、Top、Height、Width属性属性 Left、Top、Height和和Width属性用于设置或返回控属性用于设置或返回控件的位置或尺寸。其中件的位置或尺寸。其中Left属性表示控件内部的左边与它属性表示控件内部的左边与它的容器的左边之间的距离，的容器的左边之间的距离，Top属性表示控件的内顶部和属性表示控件的内顶部和它的

48、容器的顶边之间的距离，它的容器的顶边之间的距离，Height属性表示控件高度，属性表示控件高度，Width属性表示控件宽度。属性表示控件宽度。BackColor、ForeColor属性属性 BackColor属性用来返回或设置控件的背景颜色。属性用来返回或设置控件的背景颜色。ForeColor属性用来返回或设置在控件里显示图片和文本属性用来返回或设置在控件里显示图片和文本时的前景颜色。时的前景颜色。59/106Visual Basic 窗体及控件窗体及控件控件的公共属性控件的公共属性FontName、FontSize、FontBold、FontItalic、FontStrikethru、Fon

49、tUnderline属性属性FontName：在控件中显示的文本所用的字体。：在控件中显示的文本所用的字体。FontSize：在控件中显示的文本所用的字体大小。：在控件中显示的文本所用的字体大小。FontBold：在控件中显示的文本是否为粗体样式。：在控件中显示的文本是否为粗体样式。Fontltalic：在控件中显示的文本是否为斜体样式。：在控件中显示的文本是否为斜体样式。FontStrikethru：在控件中显示的文本是否带有删除线。：在控件中显示的文本是否带有删除线。FontUndedine：在控件中显示的文本是否带有下划线。：在控件中显示的文本是否带有下划线。60/106Visual B

50、asic 窗体及控件窗体及控件命令按钮命令按钮CommandButton61/106Visual Basic 窗体及控件窗体及控件命令按钮命令按钮CommandButton例例7：62/106Visual Basic 窗体及控件窗体及控件命令按钮命令按钮CommandButtonDefault属性：设置缺省的命令按钮。若设置为属性：设置缺省的命令按钮。若设置为True，按回车键相当于单击该按钮。按回车键相当于单击该按钮。Cancel属性属性：设置缺省的取消按钮。若设置为：设置缺省的取消按钮。若设置为True，按按Esc键相当于单击该按钮。键相当于单击该按钮。Index属性：设置按钮在控件数组中