VB窗体的设计 文本框和标签

参数列表形式：变量名[As类型]，[变量名[As类型]]···
在函数体内至少对函数名赋值一次
2.函数过程的调用
形式：函数过程名（[参数列表]）
注：由于函数过程名返回一个值，帮函数过程不能作为单独的语句加以调淫，必须作为表达式或表达式中的一部分，再配以其他的语法成分构成语句。
（2）利用代码窗口直接定义
自定义函数过程的形式如下：
[Static][Public|Private] Function函数过程名（[参数列表]）[As类型]
局部变量或常数定义
<语句块>函数过程体
函数名＝返回值
<语句块>
End Function
其中：
函数过程名：命名规则与变量命名规则相同
As类型：函数返回值的类型，默认返回变体型
Tab(n)函数：输出表达式定位于第n列（从对象界面最左端第1列开始计算的第n列）
表达式列表：要输出的数字或字符串表达式，若省略则输出一个空行，多个表达式之间用空格，逗号，分号分隔。开始打印的位置是由对象的Current X和Current Y属性决定的，默认为打印对象的左上角（0，0）
；（分号）：表示光标定位在上一个显示的字符后
2．标签控件的属性、方法和事件。
教学过程：
第1节文本框和标签
一、文本框控件（Textbox）
1．介绍文本框在VB中的用途。
2．掌握以下9个文本框的主要属性
（1）Text、（2）MaxLength（3）MultiLine（4）ScrollBars（5）Locked（6）SelStart（7）SelLength（8）SelText（9）PasswordChar
其中Loadpicture是一个函数，filename是该文件的完整路径。Object可以是窗体、图片框和图像框等。
三．Autoredraw属性
返回或设置从图形方法到持久图形的输出。
图形方法有：Circle. Cls. Line Print等。
持久图形：指存储在内存中的图形方法的输出。其值为Ture时，所绘制的图形是持久的
InStatus=Getuser Status
If intstatus=1 Then
frmMain.Show
Else
frmPassword.Show
End If
End Sub
△过程～（方法）
Sub过程：不返回值
Function过程：返回值
Property过程：返回并指定值，以及设置对象引用
（一）子过程～Sub过程
Private Sub Form_Click()
From i= 1 To 5
Print Tab(i) ; String(6-i,“”);_
Spc(6);String(I,“”)
NextI
End Sub
4.2多重窗体
一．设置启动窗体
在缺省情况下，应用程序中的第一个窗体被指定为启动窗体。如果想在应用程序启动时显示另外的窗体，那么就得改变启动对象。
[教案]
(四）窗体的设计
授课方式：讲授法
授课学时：1学时
教学目的：
通过本次课的学习，学生应该掌握窗体的常用属性、事件和方法，掌握多种窗体的建立方法，学会设置启动窗体和启动工程。
教学重点和难点：
1．窗体的常用属性、常用事件பைடு நூலகம்及窗体的五种方法；
2．多重窗体的建立
教学过程：
4.1窗体的属性、事件和方法
一、窗体的常用属性
Dim t
t=x
x=y
y=t
End Sub
主程序调用Swap子过程
Private Sub Form_Click()
Dim a,b
a=10 : b=20
Swap a,b
Print“a=”;a,“b=”;b
End Sub
程序运行后显示：a=20,b=10
3.子过程的调用
有两种形式：
形式一：Call子过程名[（实参列表）]
（2）掌握触发事件的条件
学生作业：
上机实验三：文本框和标签
[讲稿]
（四）窗体的设计
4.1窗体的属性、事件和方法
4.1.1窗体的属性
一．Name（名称）属性
是所创建对象的名称。首次在工程中添加窗体时，窗体的名称被缺省为Form1.第二个为Form2.
在给某一个窗体命名时，最好给Name属性设置一个有实际意义的名称，一般加一个前缀frm..
2.Deactivate事件
仅当一个对象不再是活动窗口时发生
4.1.3窗体的方法
一．Cls方法
Cls方法用清除运行时在窗体或图形柱中显示的文本或图形。形式如下：
[对象．] Cls
其中：“对象”为窗体或图形框，省略对象时为窗体
例1.
Picture1.Cls’清除图形柱内显示的图形或方本
Cls’清除窗体上显示的文本
3．掌握文本框的一个主要方法——SetFocus方法
（1）本方法的应用情况
（2）它的语法格式：[对象．] SetFocus
4．掌握文本框的4个主要事件
——Chang事件、KeyPress事件、LostFocus事件和GotFocus事件
（1）掌握事件的应用情况
（2）掌握触发事件的条件
5．举例说明
讲解一道利用文本框来实现复制、剪贴和粘贴功能的例题，通过此例题的讲解使学生更加熟练的掌握有关文本框控件的常用属性、方法和事件。
2.DdlCick事件
当用户在一个对象上双击鼠标左键时触发Dbl Click事件。
对于一个Form而言，当双击窗体的空白区或被禁用的控件时，Dbl Click事件发生。
三．Mouse Move, Mouse Down和Mouse Up事件
1.MouseMove事件
由用户在窗体内移支鼠标的操作触发。
当鼠标位置在对象的边界范围内时，该对象就接收Mouse Move事件。
Name属性用于在编写你码时代表该窗体，它在运行时是只读的、
Name属性的命名规则与标识符的类似，详见52页。
二．Picture属性
设置在窗体中显示的背景图片，可以静态设置，也可动态设置（即写代码）
在代码中设置属性的值的格式为
〔Object.〕Picture=LoadPicture(“filename”)
Sub过程是在响应事件时执行的代码块。子过程的语法是：
[Private|Public][Static]Sub过程名（变量）
语句块
End Sub
可将子过程放入标准模块，类模块或窗体模块中。
1.通用过程：
告诉应用程序如何完成一项指定的任务。一旦确定了通用过程，就必须专由应用程序来调用。
2.事件过程：
当VB中的对象一个事件的发生做出认定时，便自动用相应事件的名字调用该事件过程。
四．Print方法
1.Print方法的作用
在对象上输出信息
2.Print方法的形式
[对象．] Print[{Spc(n)|Tab(n)}[表达式列表][:|,]
其中：
对象：可以是Form, Picture Box或Pinter，或省略了对象，则在Form上输出
Spc(n)函数：输出时从当前打印位置起插入n个空格
形式二：子过程名[实参列表]
若实参要获得子过程的返回值，则实参只能是变量，不能是常量，表达式及控件名。
（二）函数过程见明126页
1.函数过程的定义（有两种方法）
（1）利用“工具”菜单下的“添加过程”命令定义
操作如下：
在窗体或模块的代码窗口中选择“工具”菜单 “添加过程”命令” “添加过程”对话框；
在“名称”中输入函数过程名（不许有空格）。
2.MouseDown和Mouse Up事件
在按下(Mouse Down)或释放(Mouse Up)鼠标按钮时发生
四．Key Press, Key Down和Key UP事件
1.KeyPress事件
当用户按下和松开一个ANSI键时发生的事件，用户以通过键盘操作触发该事件。
2.KeyDown和KeyUp事件
因为名字在对象和代码之间建立了联系，所以说事件过程是附加在窗体和控件上的
一个控件的事件过程由控件的实际名字（Noune属性），下划线和事件名组合起来。
一个窗体事件过程将词汇“Form”，下划线和事件名组合起来。
[例]编写一个两个数交换的过程，并供主程序调用
解：Swap (x,y)子过程的定义
Public Sub Swap(x,y)
当一个对象具有焦点时，按下（Key Down）或松开（Key Up）一个键时发生的事件。
举例说明：教材62页例12
五．Resize事件
当一个对象第一次显示或当一个对象的大小改变时发生的事件，用于重新调整其中对象的位置和尺寸。
六．Activate事件与Deactivate事件
1.Activate事件
仅当一个对象成为活动窗口时发生
格式：[对象.] Hide
2.Show方法
用于显示窗体对象
格式：[对象.] Show
三．Move方法
用于移动窗体或控件，并可改变其大小
形式如下：
[对象．] Move左边距离[,上边距离,宽度[,高度]]
其中：
对象：可以是窗体及除时钟，菜单外的所有控件，省略对象时为窗件。
左边距离，上边距离，宽度，高度：数值表达式。如果对象是窗体，则“左边距离”和上边距离“以屏慕左边界和上边界为准，否则以窗体的左边界为准，给出宽度和高度表示可改变其大小。
介绍窗体的Name属性、Picture属性和AutoRedraw属性
二、窗体的常用事件
通过例题来详细讲解窗体的以下几种常用事件
——Load事件与Unload事件；Click事件与DblClick事件；KeyPress事件、KeyDown事件和KeyUp事件；MouseMove事件、MouseDown事件和MouseUp事件；Resize事件；Activeate事件与Deactivate事件