附录附录 A 常用系统函数

(1)

附录附录 A 常用系统函数

VB.net 提供大量的系统函数，可供用户直接调用。按功能可将系统函数分为输入输出函数、数学函数、字符串函数、日期函数等。

A.1 输入输出函数 1. MsgBox( ) 函数

格式一：MsgBox 提示信息 [,按钮] [,标题])

格式二：字符型变量＝MsgBox(提示信息 [,按钮] [,标题] [横坐标，纵坐标])

功能：在对话框中显示提示信息，等待用户单击按钮，并返回一个反映用户所选按钮的整数值。

说明：

①“提示信息”由字符串组成，作为显示在提示对话框中的信息。字符串的最大长度为 1024个字符，若其内容超过一行，可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车与换行符的组合 (Chr(13) & Chr(10)) 将各行分隔。

②“按钮”是可选项，其结果为三项数据之和，用于指定显示按钮的数目及形式、使用的图标样式。若省略该选项，则按钮的缺省值为 0。按钮参数设置及返回见表 3-6。

③“标题”是可选项，在对话框标题栏中显示的字符串。若省略标题，则将应用程序名放在标题栏中。

表 A-1 按钮参数设置值与返回结果

常量值描述

VbOKOnly 0 只显示“确定”按钮

VbOKCancel 1 显示“确定”及“取消”两个按钮

VbAbortRetryIgnore 2 显示 “终止(A)”、“重试(R)”、“忽略(I)”三个按钮 VbYesNoCancel 3 显示“是(Y)”、“否(N)”、“取消”三个按钮 VbYesNo 4 显示“是(Y)”、“否(N)”两个按钮

命令按钮类型

VbRetryCancel 5 显示“重试(R)”、“取消”两个按钮 VbCritical 16 显示 Critical Message 图标 VbQuestion 32 显示 Warning Query 图标 VbExclamation 48 显示 Warning Message 图标图标样式

VbInformation 64 显示 Information Message 图标 VbDefaultButton1 0 缺省焦点在第一个命令按钮上 VbDefaultButton2 256 缺省焦点在第二个命令按钮上焦点位置

VbDefaultButton3 512 缺省焦点在第三个命令按钮上

(2)

附录 A 常用系统函数 2 续表

常量值描述

VbOK 1 选择了“确定”按钮

VbCancel 2 选择了“取消”按钮 VbAbort 3 选择了“终止”按钮 VbRetry 4 选择了“重试”按钮 VbIgnore 5 选择了“忽略”按钮

VbYes 6 选择了“是”按钮

返回结果

VbNo 7 选择了“否”按钮

其中：

Critical Message 图标为：

Warning Query 图标为：

Warning Message图标为：

Information Message 图标为：

例 A-1 以下程序代码可得到图 A-1 所示的提示信息。

Private Sub Form_Load()

Msg = "语法错" ‘ 定义提示信息

Style = vbAbortRetryIgnore + vbExclamation + vbDefaultButton1 ‘ 定义按钮 Title = "MsgBox 函数应用" ‘ 定义标题

Response = MsgBox(Msg, Style, Title)

If Response = vbAbort Then ‘ 用户按下“终止”键

MyString = "vbAbort" ‘给字符变量 MyString 赋值为 "vbAbort"

Else

If Response = vbRetry Then ‘ 用户按下“重试”键

MyString = "vbRetry" ‘ 给字符变量 MyString 赋值为"vbRetry"

Else

MyString = "vbIgnore" ‘用户按下“忽略”键，

‘字符变量 MyString 赋值为"vbIgnore"

End If End If End Sub

图 A-1 MsgBox()函数的应用

由于常量 vbAbortRetryIgnore 的值为 2 ，常量 vbExclamation 的值为 48 ，常量 vbDefaultButton1的值为 0，故

Style = vbAbortRetryIgnore + vbExclamation + vbDefaultButton1 可用数字代替为：Style =2+48+0

(3)

附录 A 常用系统函数 3

2. InputBox( )

格式：字符型变量＝InputBox(提示信息[,标题] [,缺省值] [,横坐标][，纵坐标])

功能：显示一个带提示信息的输入对话框，接收并返回用户在文本框中输入的字符串。

说明：

①“提示信息”：同 MsgBox( )函数，显示在输入对话框内的提示信息。

②“标题”：同 MsgBox( )函数，显示在输入对话框标题栏的标题，若缺省则标题栏不显示字符。

③“缺省值”：当输入对话框无任何输入时，该缺省值作为输入内容。

④“横坐标”、“纵坐标”：数值表达式，成对出现，指定对话框左上角在屏幕上的坐标，

以 twip（缇）为单位。若缺省则输入对话框防止在水平居中，垂直 2/3 高度的位置。

⒂返回值为用户从键盘上输入的字符串。当用户没有任何输入时，返回［缺省值］给出的默认值。

例 A-2 以下程序代码可得到图 A-2 所示的提示信息。

Dim Message, Title, Default, MyValue Message = "请输入文件名" ' 设置提示信息。

Title = "InputBox的例子" ' 设置标题。

Default = "c:\vb\myfile" ' 设置缺省值。'在 100, 100 的位置显示对话框。

MyValue = InputBox(Message, Title, Default, 100, 100)

图 A-2 InputBox 函数的使用

其中，用 InputBox 函数可显示用户输入数据的不同用法。若单击“确定”按钮或按回车键后，变量 MyValue 将保存用户输入的数据；若单击“取消”按钮，则返回一个零长度的字符串。

A.2 数学函数

常用的数学函数及功能见表 A-2。

表 A-2 常用数学函数

函数名功能自变量类型函数值类型举例

Int(x) 得到不超过 X 的最大整数数值表达式整数 Int(3.9)=3 Int(-4.1)=-5 Sin(x) 计算角度 X 的正弦值

sin30°=sin(30*3.14/180)

数值表达式

X以弧度为单位 Double Sin(30*3.14/180)=0.5 Cos(x) 计算角度 X 的余弦值数值表达式

X以弧度为单位 Double 使用同 sin(x)

(4)

附录 A 常用系统函数 4 续表

Tan(x) 计算角度 x 的正切值数值表达式

x以弧度为单位 Double 使用同 sin(x) Atn(x) 计算 X 的反正切值 Double 函数值以弧

度为单位 Atn(0)=0

Log(x) 计算以 e 为底 x 的自然对数,ln10=log(10)

Double

x>0 Double log(10)=2.3 Exp(x) 计算 e 的 x 次幂 e³=exp(3) Double Double exp(3)=20.086 Abs(x) 取 x 的绝对值数值表达式与 X 的类型

相同

Abs(-6)=6 Abs(6)=6 Sqr(x) 计算 X 的算术平方根 Double ,x≧0 Double Sqr(4)=2

Sgn(x)

符号函数,用来指示 X 的符号：

X>0时返回 1 X=0时返回 0 X<0时返回-1

数值表达式整数

Sgn(6.9)=1 Sgn(-7.8)=-1 Sgn(0)=0 Rnd([x]) 得到 0～1 之间的伪随机数数值表达式 Single 参见说明(1) Fix(x) 得到 X 的整数部分数值表达式整数 Fix(6.8)=6

Fix(-4.9)=-4 说明：

1. 对于 Rnd([x]) 函数：

当 x<0，以 X 为种子，每次返回相同的随机数；

当 x>0，每次产生随机数序列中的下一个随机数；

当 x=0，得到最近产生的随机数；

不指定，同 X＞0

为了每次运行时产生不同序列的随机数，可执行 Randomize 语句。

例如：若 M 和 N 为整数，且 M＜N，则以下表达式可得到 M～N 之间的随机整数。

Int（（N-M+1）* Rnd+ M）

2. x^y,可表示为 log(y*exp(x))；也可表示为 x^y A.3 字符串函数

常用字符串函数见表 A-3。

表 A-3 字符串函数

Left$(x,n) 取 x 左边的 n 个字符 X As String

n As Long String Left$(“abcd”,2)=”ab”

Right$(x,n) 取 x 右边的 n 个字符 x As String String Right$(“abcd”,2)=”cd”

(5)

n As Long

续表

Mid$(x,m,n) 取 x 中从第 m 个字符开始的 n 个字符

x As String m As Long n As Long

String mid$(“abcde”,3,2)=”cd”

Len(x$) 得到 x$ 的长度(字符个

数) x As String Integer Len(“ab汉”)=4 (一个汉字占两个字符) Hex$(n) 返回数值 n 的十六进制

值的字符串 n As Long String Hex$(31)=”1F”

Oct$(n) 返回数值 n 的八进制值

的字符串 n As Long String Oct$(31)=”37”

Space$(n) 得到由 n 个空格组成的

字符串 n As Long String Space$(2)=” ”

Chr$(n) 得到 ASCII 代码为 n 的

那个字符 n As Long String Chr$(65)=“A”

Ucase$(x) 把 X 中的字母都转换为

大写 x As String String Ucase$(“abc2”)= “A BC2”

Lcase$(x) 把 X 中的字母都转换为

小写 x As String String Lcase$(“ABb2”)=“abb2”

Str$(x) 返回数值 X 的字符串表

示 x As Single String Str$(5.8)=“5.8”

Val(x) 返回在 X 中包含的数值 x As String Double Val(“3.2ab”)=3.2 String$(n,x) 将 x$ 中的第一个字符

重复 n 次

n As Long

x As String String String$(3,“abc”)=“aaa”

LTrim$(x) 去掉 X 左端的空格部分 x As String String Ltrim$(“ ab ”)=“ab ” RTrim$(x) 去掉 X 右端的空格部分 x As String String Rtrim$(“ ab ”)=“ ab”

Trim$(x) 去掉 X 左端和右端的空

格部分 x As String String Trim(“ ab ”)=“ab”

说明：

1. 对于定长字符串，由于用空格填充尾部多余的空间，所以在处理定长字符串时，一般先用 Trim 删除空格函数将多余的空格删除。

2. Chr函数能得到 ASCII 代码为 n 的那个字符，但对于控制字符，则执行对应的操作。如 Chr(13) 执行回车操作，^Chr(10)执行换行操作。

3. 要自动转换大小写，可利用 UCase$ 及 LCase$，但是要使用这两个函数，一定不能在 Key_Press 事件中使用，否则若输入“abc”，结果却变成“CBA”。这是由于当输入 a 之后，UCase$ 转换成 A，转换完成后，鼠标停在 A 的前面，继续输入 b，则变成 bA，UCase$

又转换为 BA，转换完后，鼠标停在 BA 的前面，继续输入 c，变成 cBA，UCase$ 又转换为

(6)

CBA。

在 Key_Press 中可利用 a 的 Asc 值是 97，A 的 Asc 值是 65，自动将小写转成大写，

程序代码如下：

Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii >= 97 And KeyAscii <= 122 Then KeyAscii = KeyAscii - 32

End If End Sub

A.4 日期时间函数

常用日期时间函数见表 A-4。

表 A-4 日期时间函数

Date$ String mmmm-mm－dd Print Date$

显示”2001-05-07”

Date

返回系统的当前日期

Variant mm－mm－dd Print Date 显示”01-5-7”

Time$ String hh:mm:ss Print Time$

显示”08:36:32”

Time

返回系统的当前时间

Variant hh:mm:ss Print Time 显示”8:36:32”

Year(x) 返回年序号 Variant 整数 Print Year(now),显示 2001 Month(x) 返回月份序号(1～12) Variant 整数 Print month(now), 显示 5 Day(x) 返回日期序号(1～31) Variant 整数 day(“2001,5,9”)=9

Weekday(x) 返回星期序号,1:星期日，

2:星期一... Variant 整数 Weekday (“2001,5,9”)=4 Hour(x) 返回小时数（0～23） Variant 整数 Hour(”11:36:32”)=11 Minute(x) 返回分钟数（0～59） Variant 整数 Minute(”11:36:32”)=36 Second(x) 返回秒数（0～59） Variant 整数 Second(”11:36:32”)=32

说明:

1. Now函数以日期型格式返回系统当前的日期时间。

2. 在 VB 中用一个双精度小数表示从公元 100 年 1 月 1 日至公元 9999 年 12 月 31 日之间的任何日期时间，该小数称为日期时间序列数。其整数部分代表日期，其小数部分代表时间。

整数部分为 0 时代表公元 1899 年 12 月 30 日，负整数代表 1899 年 12 月 30 日以前的日期。小数部分为 0.0 时代表午夜，为 0.5 时代表正中午。

(7)

A.5 类型转换函数和其它函数常用转换函数和其它函数见表 A-5。

表 A-5 转换函数和其它函数

Cint(x) 数值 X 按四舍五入的原则取

为整型数数值 Integer Cint(6.7)=7 Cint(-6.7)=-7

RGB(r,g,b) 得到由红、绿、蓝三原色混和后的颜色值

r As Integer g As Integer b As Integer

Long RGB(0,0,0)为黑色

Qbcolor(n)

得到按 Qbasic 方式设置的颜色值,n 为颜色号，取值范围在 0～15

n As Integer Long Qbcolor(0) 为黑色

LoadPicture (fn$)

为窗体、图片框或图像控件装

载图像，fn$为图像文件名字符串图形参见说明(3)

Len(x) 得到变量 X 的长度(存储变量

X所需字节数) Variant Integer 设 x 为双精度实型 Len(x)=8

TypeName(x) 得到变量 x 的类型名称 Variant String 设 x 为双精度实型 TypeName(x)=Double

Shell(fn$,[,w instyle])

执行一个可执行文件。Fn＄为可执行文件的文件名， winstyle是程序运行时窗口的样式

fn$ As String

winstyle As Integer

Double 参见说明(4)

DoEvents( ) 暂时放弃应用程序的执行，使

操作系统可以处理其他事件。无 Integer 参见说明(5)

IsNumeric (x)

如果能将表达式 x 转换成数值型，函数将返回 True;否则返回 False

Variant Boolean IsNumeric(79)=True IsNumeric(“A349”)=False

说明：

1. RGB 函数中，r，g，b 分别代表红、绿、蓝三种颜色，其取值范围在 0～255。表 A-6 是一些常见的标准颜色，以及这些颜色中含红、绿、蓝三种颜色值。

表 A-6 常见标准颜色

颜色红色值绿色值兰色值

黑色 0 0 0

兰色 0 0 255

绿色 0 255 0

青色 0 255 255

(8)

红色 255 0 0

洋红色 255 0 255

黄色 255 255 0

白色 255 255 255

⑵Qbcolor 参数设置见表 A-7。

表 A-7 Qbcolor 参数设置

颜色值颜色值

黑色 0 灰色 8

兰色 1 亮兰色 9

绿色 2 亮绿色 10

青色 3 亮青色 11

红色 4 亮红色 12

洋红色 5 亮洋红色 13

黄色 6 亮黄色 14

白色 7 亮白色 15

3. 若将图形加载作为窗体的背景图形，必须将 LoadPicture 的返回值赋给 Form 对象的 Picture属性。例如：

Set Form1.Picture = LoadPicture("PARTY.BMP")

4. 使用 Shell 函数时，执行一个可执行文件。如果 Shell 函数成功地执行了所要执行的文件，将返回程序的任务 ID。任务 ID 是一个唯一的数值，用来指明正在运行的程序。如果 Shell 函数不能打开指定的程序，将产生错误。

其中，窗口样式如下：

0――窗口被隐藏，且焦点移到隐式窗口。

1――窗口具有焦点，且还原到原来的大小和位置。

2――窗口以一个具有焦点的图标显示。

3――窗口是一个具有焦点的最大化窗口。

4――窗口被还原到最近使用的大小和位置，当前活动的窗口仍然保持活动。

6――窗口以一个图标显示，当前活动的的窗口仍然保持活动。

例如： Shell(“C:\WINDOWS\CALC.EXE”, 1) ‘运行计算器程序

（5）使用 DoEvents 函数可暂时放弃应用程序的执行，转让控制权，以便让操作系统处理其它的事件。DoEvents 返回打开的 VB 窗体个数。

例 A-3 当循环完成 1000 次时，将控制权交给操作系统。程序代码如下：

Dim I, OpenForms ' 创建一个变量来保存加载的窗体个数 For I = 1 To 150000 ' 循环开始

If I Mod 1000 = 0 Then ' 如果循环已完成了 1000 次 OpenForms = DoEvents ' 将控制权交给操作系统 End If

(9)

附录 A 常用系统函数 9 Next I '将循环计数器加一

A.6 格式输出函数

格式：Format$(表达式[,格式字符串])

功能：使数值、日期或字符串按指定的格式输出。

说明：

1. 表达式为要格式化的数值、日期或字符串类型的表达式。

2. 格式字符串用于指定输出表达式的格式。格式字符串必须用双引号括起。

格式字符串有二种类型：

①数值格式符（见表 A-8）

表 A-8 数值格式符

符号功能格式符举例

0 实际数字小于格式符位时，数字前后

加０ “0000.000” 445.2=0445.200

# 实际数字小于格式符位时,数字前后

不加０ “####.###” 445.2=445.2

. 加小数点 “000.00” 345=345.00

, 千分位 “#,000” 3456=3,456

% 数值乘 100,加百分号 “#####.##” 12.456=1245.6%

$ 在数字前强加＄ “$###.#” 12.36=$12.4

+ 在数字前强加＋ “+###.#” -12.36=+-12.36

－在数字前强加－ “-###.#” 12.36=-12.36

E+ 用指数表示 “0.00E+00” 12.36=1.24E+01

对于符号 0 与#，若要显示的数值表达式的整数部分多于格式符的位数，按实际数值显示，

而小数部分的位数多于格式符的位数时，按四舍五入显示。

②日期时间格式符（见表 A-9）

表 A-9 日期时间格式符

符号功能符号功能

D 显示日期(1～31),个位前不加 0 y 显示一年中的天数(1～366) Dd 显示日期(01～31),个位前加 0 yy 显示年份(00～99)

Ddd 显示星期缩写(Sun～Sat) yyyy 显示年份(0100～9999)

Dddd 显示星期全名 q 显示季度数(1～4)

Ddddd 显示完整日期(日、月、年) h 显示小时(0～23) W 星期为数字(1～7, 星期日为 1) hh 显示小时(00～23)

Ww 一年中的星期数(1～53) s 显示秒(0～9)

M 显示月份(1～12) ss 显示秒(00～9)

(10)

Mm 显示月份(01～12) tttt 显示完整时间(hh:mm:ss) Mmm 显示月份缩写(Jan～Dec)

Mmmm 显示月份全名 am/pm 显示 12 小时的时钟

中午前为 am, 中午后为 pm 例 A-4 用 Format 函数显示时间，程序代码如下：

Dim t1, t2 As Date

Private Sub Command1_Click() t1 = Now

End Sub

Private Sub Command2_Click() t2 = Now

Text1.Text = Format(t2 - t1, "hh:mm:ss") End Sub

程序运行界面如图 A-3 所示。

图 A-3 Format 格式显示

(11)

附录 B Visual Basic 窗体对象的属性

属性说明

对象在执行时以平面方式或立体方式显示 Appearance

0：平面方式；1：立体方式（默认值）

窗体被遮盖后，是否要自动重绘窗体上的内容 AutoRedraw

True：自动重绘；False：不重绘（默认值）

BackColor 对象在显示文本或图形时的背景颜色。

设定对象的边框样式

0-None：没有边框或与边框相关的元素，窗体不能被缩放或移动；

1-Fixed Single：固定的单边框，可以包含控制菜单、标题栏、最大化和最小化按钮，

窗体不能用鼠标拖动来缩放；

2-Sizable：可调整的边框（默认值）；

3-Fixed Dialog：固定对话框，可以包含控制菜单和标题栏，不能包含最大化按钮和最小化按钮，不能改变尺寸；

4-Fixed ToolWindow：固定工具窗口，不能改变尺寸，显示关闭按钮并用缩小的字体显示标题栏，窗体在 Windows 95 的任务栏中不显示；

BorderStyle

5-Sizable ToolWindow：可改变工具栏窗口，可改变大小，显示关闭按钮并用缩小的字体显示标题栏，窗体在 Windows 95 的任务栏中不显示；

Caption 标题

设定窗体的绘图方式，是否会在 Paint 事件中重新绘制整个对象 ClipControl

True：是（默认值）；False：否

ControlBox 设顶在执行时是否要显示窗体的控制菜单

设定窗体上绘图、Shape、Line…等控件的输出外观 13：Copy Pen（默认值）；

DrawMode

1～16：有 16 种外观供选择（参考联机说明）

设定绘图相关方法使用的直线样式 DrawStyle

0：实线；1～6：共有 7 种样式可供选择 DrawWidth 设定绘图相关方法使用的直线宽度

设定该对象是否会对于事件产生响应。如果设定为不响应，执行时对象将变为模糊

Enabled

True：响应（默认值）；False：不响应

FillColor 设定填入窗体上圆形、矩形等几何图形的内部颜色设定用来填入几何图形的样式

FillStyle

1：透明（默认值）；0～7：有 8 种选项（可查看属性窗口）

(12)

附录 B Visual Basic 窗体对象的属性 12 续表

属性说明

标题是否以粗体显示 FontBold

True：粗体；False：标准字体（默认值）

是否以斜体显示 FontItalic

True：斜体；False：标准字体（默认值）

FontName 字体名称（默认值为宋体）

FontSize 字体大小（默认值=9）

字体是否要加上删除线 FontStrikethru

True：加删除线；False：不加删除线（默认值）

字体是否要加一条下划线 FontUnderLine

True：加下划线；False：不加下划线（默认值）

Height 对象的高度

HelpContextID 对象说明主题编号的默认值，用于设定 Help 说明

Icon 执行时，窗体最小化后所呈现的图标

设定窗体上对象对于键盘的反映次序，若设定值为 True，用户按键盘时，窗体会先取得键盘事件的控制权，然后才轮到窗体上的其它控件

KeyPreview

True：窗体先取得控制权；False：控件先取得控制权（默认值）

Left 对象最左边与窗体左边界的距离

设定窗体与其它应用程序数据链接（DDE）的关系 0：无（默认值）

1：自动更新，链接数据更新时窗体数据也立即更新 2：手动更新，有链接的要求时窗体数据才更新 LinkMode

3：告知更新，链接数据更新时仅发出一个通告 LinkTopic 设定所链接的对象名称

设定窗体在执行时是否含有最大化的按钮 MaxButton

True：有（默认值）；False：没有

用来设定窗体是否含有另一个 MDI 子窗体 MDIChild

True：有；False：没有（默认值）

设定窗体在执行时是否含有最小化的按钮 MinButton

True：有（默认值）；False：没有

MouseIcon 当 MousePointer=99 时，设定一个自定义的鼠标图标设定鼠标指针通过对象上方时的图标

0：系统默认值（默认值）

1～15：VB 提供的 15 个样式供选择 MousePointer

99：自定义

(13)

附录 B Visual Basic 窗体对象的属性 13

续表

属性说明

设定窗体是否可以移动 Moveable

设定窗体是否可以将另一个对象的选单综合到自己的选单上 NegotiateMenus

True：可以（默认值）；False：否

Name 对象被定义的名称，该名称可以在程序中使用

设定对象是否能作为 OLE 对象拖放区 OLEDropMode

0：不接受；1：手动

Palette 当 PaletteMode=2 时，设定自定义调色板的文件名称设定窗体要使用何种形式的调色板

0：系统调色板（默认值）

1：最上层控件的调色板 PaletteMode

2：自定义调色板 Picture 设定对象所要显示的图片

设定文本的显示方向 RightToLeft

True：从右到左；False：从左到右（默认值）

窗体数据区的高度 ScaleHeight

数据区：可输出数据的区域，不包含窗体的外框

ScaleLeft 设定窗体数据区坐标起点（0，0）的位置，距离左上角的 X 轴距离，配合 ScaleTop 属性（Y 轴距离）的设定，可以更改窗体上的原点位置

设定窗体的度量单位

0：自定义；1：Twip（默认值）；2：磅；3：象素 ScaleMode

4：字符；5：英寸；6：毫米；7：厘米

ScaleTop 设定窗体数据区坐标起点（0，0）的位置，距离左上角的 Y 轴距离，配合 ScaleLeft 属性（X 轴距离）的设定，可以更改窗体上的原点位置

ScaleWidth 设定窗体可输出数据区的宽度

设定窗体或 MDI 窗体是否会出现在工具栏上 ShowInTaskBar

True：是（默认值）；False：否设定窗体第一次出现的位置 0：自定义

1：所属窗口中央 2：屏幕中央 StartUpPosition

3：系统默认值（默认值）

Tag 保存程序以外的数据

Top 对象上边界与窗体数据区上边界的距离

(14)

附录 B Visual Basic 窗体对象的属性 14

续表

属性说明

设定对象在执行时是否看得见或隐藏起来 Visiable

True：看得见（默认值）；False：隐藏

设定“这是什么？”按钮是否会出现在窗体的标题栏 WhatsThisButton

True：是；False：否（默认值）

设定窗体所使用的说明窗口类型 WhatsThisHelp True：是，使用 Win95 Help 窗口；

False：否（默认值），使用标准说明窗口

Width 对象的宽度

设定窗体在执行时的视觉状态 0：一般（Normal，默认值）

1：最小化（Minimized）

WindowsState

2：最大化（Maximized）

(15)

附录 C Visual Basic 标准控件对象的属性说明

一、命令按钮的属性说明

属性说明

Cancel 设定命令按钮是否为 Cancel Button

Cancel Button：表示在执行时按 ESC 键可以执行该按钮的功能 Caption 标题

设定命令按钮是否为窗体的默认按钮 Default

True：是不是 False（默认值）：否

DisablePicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象在静止状态中要显示的图片

DownPicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象被按下时要显示的图片该对象在拖动（Drag）过程中鼠标显示的图形

DragIcon None：一般的图形，如箭头（默认值）

Icon：以某图标文件作为鼠标拖放的图形表示拖动模式为手动或自动

手动表示只有在真正有拖动动作时才能拖动对象；自动表示只要用鼠标单击对象即可启动拖动的动作

DragMode

0：手动模式（默认值） 1：自动模式

设定该对象是否会对于事件（Event）产生响应。如果设定为不响应，执行时对象图标变为模糊

Enabled

True：响应（默认值）；False：不响应标题是否以粗体显示

FontBold

续表

(16)

附录 C Visual Basic 标准控件对象的属性说明 16

属性说明

Index 如果对象是对象数组中的一个成员，该属性值代表其在数组中的编号

MaskColor Style属性值为 1 时（命令按钮以图片为外观），按下时在透明状态显示的颜色 MouseIcon 设定一个自定义的鼠标图标

设定鼠标指针通过对象上方时的图标 0：系统默认值（默认值）

99：自定义

Picture Style属性为 1 时（命令按钮以图片作为外观）对象所显示的图片设定文本的显示方向

RightToLeft

设定是否以图片作为外观显示 Style

0：标准外观（默认值）；1：图片外观 TabIndex 对象在父窗体中的对象编号

TabStop 是否可用 Tab 键来选取（Focus）该对象 True：可以（默认值）；False：不可以

Tag 保存程序额外的数据

ToolTipText 鼠标停在该对象上方时要显示的文本

Style属性值为 1 时（命令按钮以图片为外观），设定是否以 MaskColr 中所指定的颜色作为透明区域的颜色

UseMaskColor

True：看得见（默认值）；False：隐藏 WhatsThisHelp 对应于该对象的说明主题

(17)

二、文本框的属性说明

属性说明

标明文本的对齐方式 Alignment

0：左对齐（默认值）；1：右对齐；2：居中对象在执行时以平面方式或立体方式显示 Appearance

设定对象的边框样式 BorderStyle

0-None：没有框线（默认值）；1：单线固定 DataField 设定对象所链接到数据库（表）的字段名称 DataSource 所链接到数据项（Data）的名称

对象在拖动（Drag）过程中鼠标所显示的图形 DragIcon None：一般的图形，如箭头（默认值）；

Icon：以某图标文件作为鼠标所显示的图形表示拖动模式为手动或自动

DragMode 手动表示只有在真正有拖动时才能拖动对象；自动表示只要用鼠标单击对象就可以开始拖动操作

设定该对象是否会对于事件（Event）产生响应。如果设定为不响应，执行时对象将变为模糊

Enabled

FontBold

设定 MaskEdBox 在没有停止驻点时，其选取范围是否要隐藏 HideSelection

True ：隐藏（默认值）；False：不隐藏 IMEMode 设定所使用输入法的应用模式（输入法）

Index 若对象是对象数组中的一个成员，这个编号代表其在数组中的编号

LinkItem 与另一个应用程序进行 DDE 联系时，传递给目的端的数据

(18)

附录 C Visual Basic 标准控件对象的属性说明 18 续表

属性说明

设定对象与其它应用程序数据链接（DDE）的关系 LinkMode

0：无（默认值）；1：自动更新；2：手动更新；3：告知更新 LinkTimeout 对象等待 DDE 响应时所能容许的时间

LinkTopic 设定所链接的对象名称 MouseIcon 设定一个自定义的鼠标图标

设定鼠标指针通过对象上方时的样式 0：系统默认值（默认值）

99：自定义

设定是否可以输入不只一行的文本字符串 MultiLine

True：多行；False：单行（默认值）

设定对象在做 OLE 对象拖放动作时，是否一定要通过程序控制，还是可以自动发生 OLEDragMode

0：手动（默认值）；1：自动

PasswordChar 将文本的显示全部该为在这里所输入的字符，可用于设定密码设定文本的显示方向为由右至左

RightToLeft

设定文本框边是否可以有滚动条

ScrollBars

0：没有滚动条（默认值）

1：水平滚动条 2：垂直滚动条 3：二者皆有

TabIndex 对象在父窗体中的对象编号

Text 显示在文本框上的字符串内容

ToolTipText 鼠标停在对象上方时所要显示的文本

True：看得见（默认值）；False：隐藏

设定“这是什么？”按钮是否会出现在窗体的标题栏 WhatsThisButton

WhatsThisHelpID 对应于对象的说明主题号

(19)

三、标签的属性说明

属性说明

对象大小是否随着标题的大小而自动变化 AutoSize

设定对象的背景为透明或不透明 BackStyle

0：透明；1：不透明（默认值）

0-None：没有框线（默认值）；1：单线固定 Caption 标题

DataField 设定对象所链接到数据库（表）的字段名称 DataSource 所链接到数据项（Data）的名称

手动表示只有在真正有拖动时才能拖动对象；自动表示只要用鼠标单击对象就可以开始拖动操作

DragMode

０：手动模式（默认值）；１：自动模式

Enabled

FontBold

(20)

属性说明

LinkItem 与另一个应用程序进行 DDE 联系时，传递给目的端的数据设定对象与其它应用程序数据链接（DDE）的关系 LinkMode

0：无（默认值）；1：自动更新；2：手动更新；3：告知更新 LinkTimeout 对象等待 DDE 响应时所能容许的时间

LinkTopic 设定所链接的对象名称 MouseIcon 设定一个自定义的鼠标图标

99：自定义

设定文本的显示方向为由右至左 RightToLeft

设定对象在执行时是显示或隐藏 UseMnemonic

True：显示（默认值）；False：隐藏设定对象在执行时是否看得见或隐藏起来 Visiable

True：看得见（默认值）；False：隐藏 WhatsThisHelpID 对应于对象的说明主题号

设定该对象是否会自动调整大小，以便完整地显示标题字符串 WordWrap

四、复选框的属性说明

(21)

属性说明

Caption 标题

DisablePicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象在静止状态中要显示的图片 DownPicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象被按下时要显示的图片

DragMode

Enabled

FontBold

ForeColor 前景颜色 Height 对象的高度

Index 若对象是对象数组中的一个成员，这个编号代表其在数组中的编号 Left 对象最左边与窗体左边界的距离

MaskColor Style属性值为１时（以图片作为外观），选中时在透明状态所显示的颜色

(22)

属性说明

MouseIcon 设定一个自定义的鼠标图标

99：自定义

Name 对象被定义的名称，该名称可以在程序中使用设定对象是否能作为 OLE 对象拖放区 OLEDropMode

Picture Style属性为 1 时（命令按钮以图片作为外观）对象所显示的图片设定文本的显示方向为由右至左

RightToLeft

设定对象的初值 Value

０：不复选；１：复选；２：灰色（复选，但用户不得修改）

Width 对象的宽度五、选项按钮的属性说明

属性说明

Caption 标题

(23)

属性说明

DisablePicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象在静止状态中要显示的图片 DownPicture 当 Style 属性值为 1 时（按钮以图片作为外观），该对象被按下时要显示的图片

DragMode

Enabled

FontBold

ForeColor 前景颜色 Height 对象的高度

Index 若对象是对象数组中的一个成员，这个编号代表其在数组中的编号 Left 对象最左边与窗体左边界的距离

MaskColor Style属性值为１时（以图片作为外观），选中时在透明状态所显示的颜色 MouseIcon 设定一个自定义的鼠标图标

99：自定义

(24)

属性说明

Picture Style属性为 1 时（命令按钮以图片作为外观）对象所显示的图片设定文本的显示方向为由右至左

RightToLeft

设定对象的初值 Value

０：不复选；１：复选；２：灰色（复选，但用户不得修改）

六、框架的属性说明

属性说明

0-None：没有框线（默认值）；1：单线固定 Caption 标题

设定是否会在 Paint 事件中重绘整个对象的外观，或是被遮盖的区域 ClipControls

True：会重绘；False：不会重绘

Icon：以某图标文件作为鼠标所显示的图形

(25)

属性说明

表示拖动模式为手动或自动

DragMode

Enabled

FontBold

ForeColor 前景颜色

99：自定义

(26)

属性说明

七、列表框/组合框的属性说明

属性说明

设定列表框的列表项若超过范围时，是用水平滚动条或用垂直滚动条 Columns

（组合框无） 0：使用垂直滚动条（默认值）；

1~n：使用水平滚动条，此时列表框内一次可显示的列数即 n 值。

对象在拖动（Drag）过程中鼠标所显示的图形 DragIcon

None：一般的图形，如箭头（默认值）；

DragMode

Enabled

FontBold

(27)

属性说明

HelpContextID 对象说明主题编号的默认值，用于设定 Help 说明 IMEMode 设定所使用输入法的应用模式（输入法）

Index 若对象是对象数组中的一个成员，这个编号代表其在数组中的编号 IntergralHeight 设定控件是否必须显示完整的工程

ItemData 返回或设定一个指定的数字代码，以识别 List 属性中定义的工程

List 设定“清单”列表的工程，该属性由列表项所形成的一个数组，可以直接在属性窗口中编缉，也可以在程序中添加或删除

ListCount 控件所显示列表项的总数，即 List（）数组元素的总数 ListIndex 鼠标最后选取的 List（）数组的中的编号

设定控件所使用的数据库是否以只读方式打开 Locked

（列表框无） True：只读；False：可读写（默认值）

99：自定义

设定是否允许用户多重选取对象的列表项 MultiSelect

（组合框无） 0：不能多重选取（默认值）

1：简易多重选取（一次只能选取一个）

2：高级多重选取（可用 Shift 或 Ctrl 键来选取列表项）

设定对象在做 OLE 对象拖放动作时，是否一定要通过程序控制，还是可以自动发生

OLEDragMode

设定列表项是否被选取的状态 Selected

（组合框无） True：被选取；False 不被选取（默认值）

(28)

属性说明

设定列表项是否按字母顺序排序 Sorted

（列表框无） True：是；False：否（默认值）

列表框：设定复选框是否会出现在列表框中 0：标准外观（默认值）；1：工程包含复选框 Style

组合框：设定控件的类型

0：组合下拉式（默认值）；1：组合式；2：下拉式列表框 TabIndex 对象在父窗体中的对象编号

Text

（列表框无）

目前所选取的列表项字符串

八、驱动器列表框/目录列表框/文件列表框的属性说明

属性说明

是否显示文本属性为保存（Archive）的文件 Archive

（仅文件列表框） True：显示（默认值）；False：不显示 BackColor 对象在显示文本或图形时的背景颜色。

DragMode 手动表示只有在真正有拖动时才能拖动对象；自动表示只要用鼠标单击对象就可以开始拖动操作

Drive（仅驱动器列表

框）指定驱动器的位置

(29)

属性说明

Enabled

True：响应（默认值）；False：不响应 FileName

（仅文件列表框）当前选中的文件名标题是否以粗体显示 FontBold

HelpContextID 对象说明主题编号的默认值，用于设定 Help 说明是否显示文件属性为隐藏（Hidden）的文件 Hidden（仅文件列表

框） True：显示；False 不显示（默认值）

IMEMode 设定所使用输入法的应用模式（输入法）

List 设定“清单”列表的工程，该属性由列表项所形成的一个数组，可以直接在属性窗口中编缉，也可以在程序中添加或删除

ListCount 控件所显示列表项的总数，即 List（）数组元素的总数 ListIndex 鼠标最后选取的 List（）数组的中的编号

99：自定义

设定是否允许用户多重选取对象的列表项 MultiSelect

（仅文件列表框）

0：不能多重选取（默认值）

1：简易多重选取（一次只能选取一个）

2：高级多重选取（可用 Shift 或 Ctrl 键来选取列表项）

(30)

属性说明

是否显示文件属性为一般（Normal）的文件 Normal

（仅文件列表框） True：显示（默认值）；False 不显示

OLEDragMode

0：不接受；1：手动 Path

（仅目录列表框）目前屏幕所显示目录列表所在目录位置（要输入路径全名）

Pattern

（仅文件列表框）设定文件列表中所能显示的文件名，默认值为*.*。

是否显示文件属性为只读（ReadOnly）的文件 ReadOnly

（仅文件列表框） True：显示（默认值）；False 不显示是否显示文件属性为系统（System）的文件 System

（仅文件列表框） True：显示；False 不显示（默认值）

Text 目前所选取的列表项字符串

Width

（目录列表框无）对象的宽度九、图像/图片框的属性说明

属性说明

Align 返回值确定对象是否可在窗体上以任意大小、在任意位置上显示，而且自动改变大小以适合窗体的宽度。

(31)

属性说明

AutoRedraw

（仅图片框）

返回或设置从图形方法到持久图形的输出

对象大小是否随着标题的大小而自动变化 AutoSize

（仅图片框） True：是；False：否（默认值）

BackColor

（仅图片框）

对象在显示文本或图形时的背景颜色

0-None：没有框线（默认值）；1：单线固定

设定对象的绘图方式，是否会在 Paint 事件中重新绘制整个对象 ClipControl

（仅图片框） True：是（默认值）；False：否 Container

（仅图片框）

返回或设置窗体上的容器，在设计时不能使用

Currentx

（仅图片框）

返回或设置下一次打印或绘图方法的水平坐标

Currenty

（仅图片框）

返回或设置下一次打印或绘图方法的垂直坐标

DataChanged

（仅图片框）

指出被绑定控件中的数据已被某进程改变，该进程不是从当前记录中检索数据的进程。在设计时不可用

DataField 设定对象所链接到数据表的字段名 DataSource 揽接到数据项（Data）的名称

对象在拖动（Drag）过程中鼠标所显示的图形 DragIcon

None：一般的图形，如箭头（默认值）；

DragMode

DrawMode

（仅图片框）

返回或设置一个值，确定在拖放操作中用手动还是自动拖放方式

DrawStyle

（仅图片框）

返回或设置一个值，以决定图形方法的线型样式

DrawWidth

（仅图片框）

返回或设置图形方法输出的线宽

Enabled

True：响应（默认值）；False：不响应 FillColor

（仅图片框）

设定填入对象上圆形、矩形等几何图形的内部颜色

(32)

属性说明

设定用来填入几何图形的样式 FillStyle

（仅图片框） 1：透明（默认值）；0～7：有 8 种选项（可查看属性窗口）

Font

（仅图片框）

返回一个 Font 对象

是否以粗体显示 FontBold

（仅图片框） True：粗体；False：标准字体（默认值）

（仅图片框） True：斜体；False：标准字体（默认值）

FontName

（仅图片框）

字体名称（默认值为宋体）

FontSize

（仅图片框）

字体大小（默认值=9）

（仅图片框） True：加删除线；False：不加删除线（默认值）

FontTransparent 决定是字体对象或 Printer 对象还是图片框控件上的背景文本和图形被显示在字符周围的空区

（仅图片框） True：加下划线；False：不加下划线（默认值）

ForeColor

（仅图片框）

前景颜色

HDc

（仅图片框）

返回一个句柄，该句柄是 Windows 运行环境提供给一个对象的设备描述体。

HelpContextID

（仅图片框）

对象说明主题编号的默认值，用于设定 Help 说明

hWnd

（仅图片框）

返回窗体或控件的句柄。OLE 控件不支持该属性

Image

（仅图片框）

返回持久图形的句柄，该句炳由 Windows 运行环境提供

Index

（仅图片框）

若对象是对象数组中的一个成员，这个编号代表其在数组中的编号

LinkItem

（仅图片框）

与另一个应用程序进行 DDE 联系时，传递给目的端的数据

(33)

属性说明

设定对象与其它应用程序数据链接（DDE）的关系 LinkMode

（仅图片框） 0：无（默认值）；1：自动更新；2：手动更新；3：告知更新 LinkTimeout

（仅图片框）

对象等待 DDE 响应时所能容许的时间

LinkTopic

（仅图片框）

设定所链接的对象名称

99：自定义

OLEDragMode

（仅图像框）

（仅图像框） 0：不接受；1：手动 Palette

（仅图片框）

当 PaletteMode=2 时，设定自定义调色板的文件名称

Picture Style属性值为 1 时（以图片作为外观）控件所显示的图片设定 Image 上的图片是否随控件的大小自动调整

Stretch

（仅图像框） True：是；False：按原图片大小显示（默认值）

数据区的高度 ScaleHeight

（仅图片框）数据区：可输出数据的区域，不包含对象的外框 ScaleLeft

（仅图片框）

设定数据区坐标起点（0，0）的位置，距离左上角的 X 轴距离，配合 ScaleTop 属性（Y 轴距离）的设定，可以更改原点位置

设定度量单位

0：自定义；1：Twip（默认值）；2：磅；3：象素 ScaleMode

（仅图片框）

4：字符；5：英寸；6：毫米；7：厘米 ScaleTop

（仅图片框）

设定数据区坐标起点（0，0）的位置，距离左上角的 Y 轴距离，配合 ScaleLeft 属性（X 轴距离）的设定，可以更改原点位置

ScaleWidth

（仅图片框）

设定可输出数据区的宽度

TabIndex

（仅图片框）

对象在父窗体中的对象编号

(34)

属性说明

TabStop

（仅图片框）

是否可用 Tab 键来选取（Focus）该对象 True：可以（默认值）；False：不可以

(35)

附录Ｄ Visual Basic 常用方法和事件

一、常用方法

方法功能

Add ControlTemplates集合：向窗体添加一个新的控件 MenuItems 集合：向窗体添加一个 MenuLine 对象

AddFile 把包含窗体或模块的文件添加到活动的工程中。不支持已经命名的参数 AddFormTemplate 向工程添加一个新的空窗体

AddItem 向 ListBox 或 ComboBox 控件添加一个条目，或向 Grid 控件添加一行。不支持已经命名的参数

AddMDIFormTemplate 向工程添加新的 MDIFrom 对象。不支持已经命名的参数 AddMenu 向 MenuItems 集合添加 Menu 对象。不支持已经合名的参数 AddMenuTemplate 向 From 对象添加菜单，不支持已经命名的参数

AddReference 向 Visual Basic 中指定类型库添加引用

AddToolbocProgID 向 Visual Basic 工具箱添加复合文档对象。不支持已经命名中的参数 AddToolboxTypelib 指定一个引用的类型库，并把对象从类型库放入 Visual Basic 工具箱。有支

持已经命名的参数

Arrange 在 MDIFrom 对象上安排窗口或图标。不支持已经命名的参数 Clear 清除 ListBox、ComboBox 或系统剪贴板的内容

Clear 清除 Err 对象的所有属性设置

Close 关闭一个对象并终止与提供该对象的应用程序联系

Cls 清除运行时在窗体、图像或图片面性框控件上生成的图像或文本 Copy 把在 OLE 容器控件的对象拷贝到系统剪贴板上

CreateEmbed 建立一个嵌入式对象

CreateLink 由某文件的内容建立一个链接式对象 Delete 删除指定的对象并释放该对象占用的内存 DoVerb 打开对象以便操作

Drag 开始、结束或取消对除了 Line、Menu、Shape 或 Timer 控件之外的所有控件的拖动操作。不支持已经命名的参数

EndDoc 结束发送到 Printer 对象的打印操作，释放送往打印设备的文档 FetchVerbs 更新对象所支持的动词列表

GetData 从 Clipboard 对象返回图像。不支持已经命名的参数

GetFormat 返回整数，指明 Clipboard 对象上的条目是否与指定的格式相匹配

附 录 附录 A 常用系统函数