Visual Basic 6.0常用函数介绍
- 格式：pdf
- 大小：106.52 KB
- 文档页数：4
WeekDay(Now)
返回当前的星期。
Month(Now)
返回当前的月份。
Year(Now)
返回当前的年份。
（4）时间函数
函数名
功能
Hour(Now)
返回小时（0~23）。
Minute(Now)
返回分钟（0~59）。
Second(Now)
返回秒（0~59）。
1
（5）随机函数
Rnd(x) 产生一个 0~1 之间的单精度随机数
2
Cancel
vbAbort
3
Abort
vbRetry
4
Retry
vbIgnore
5
Ignore
vbYes
6ቤተ መጻሕፍቲ ባይዱ
Yes
vbNo 示例：
7
No
Dim Tmp as long Tmp=MsgBox（”是否退出程序。”,35,”退出”） Msgbox “你选择的按钮值是：”&Tmp
4
返回 n 个空格。 （6）字符串匹配函数 格式：InStr（[首字符位置，]字符串 1，字符串 2 [,n]）
在函数中“字符串 1”中查找“字符串 2”，如果找到了，则返回“字符串 2”的第一个
字符的位置。若为字符串首字符，则位置为 1。 说明：
①“字符串 2”的长度限于 65535 个字符内。
②“首字符位置”是可选项。如果含有“首字符位置”，则从该位置开始查找，否则从
Visual Basic 6.0 常用函数介绍
一、常用内部函数
在 VB 内部提供了大量函数。在这些函数中，有些是通用的。有些则与某种操作有关的。 大体分成五类，分别是：转换函数、数学函数、日期函数、时间函数和随机函数。
（1）转换函数
函数名
功能
Int(x)
返回不大于自变量的最大整数。
Fix(x)
去掉一个浮点数的小数部分,保留其整数部分。
④HelpFile、Context ： HelpFile 是一个字符串变量或字符串表达式，用来表示帮助文
件的名字，Context 是一个数值变量或表达式，用来表示相关帮助主题的帮助目录号。
MsgBox 函数的返回值是一个整数，这个整数与所选择的命令按钮相关。
返回值参数表：
常数
值
描述
vbOK
1
OK
vbCancel
Sgn(x)
返回自变量的符号。即： 值为负数时，函数返回-1
值为 0 时，函数返回 0
值为正数时，函数返回 1
Sqr(x)
返回自变量 x 的平方根，自变量必须大于或等于 0。
Exp(x)
返回以 e 为底数，以 x 为指数的值，即求 e 的 x 次方。
（3）日期函数
函数名
功能
Day(Now)
返回当前的日期。
CDbl(x)
把值转换为双精度数值。
CLng(x)
把值小数部分四舍五入转换为长整型数值。
CSng(x)
把值转换为单精度数值。
CVar(x)
把值转换为变体类型值。
（2）数学函数
函数名
功能
Sin(x)
返回正弦值。
Cos(x)
返回余弦值。
Tan(x)
返回正切值。
Atn(x)
返回反正切值。
Abs(x)
返回绝对值。
VbOKCancel
1
显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore
2
显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel
3
显示 Yes、No 及 Cancel 按钮。
VbYesNo
4
显示 Yes 及 No 按钮。
VbRetryCancel VbCritical VbQuestion VbExclamation VbInformation
①msg 是字符串类型，长度限制为 1024 字符。超出字符会被自动截取。
②type 是一个整数值或符号常量，用来控制在对话框内显示的按钮、图标的类型。参数 值由四类数值相加产生，这四类数值或符号常量分别表示按钮的类型、显示图标的种类、活
动按钮的位置及强制返回。
常数
值
描述
vbOKOnly
0
只显示 OK 按钮。
16=0+16+0 显示“确定”按钮（0）+“暂停”图标（16）+默认按钮为“确定”（0）
3
MsgBox”是否退出程序。”,35,”退出” Type 参数为 35 分解成： 35=3+32+0 显示“是、否、取消”3 个按钮（3）+“？”图标（32）+ 默认按钮（0）
③Title 是一个字符串，用来显示对话框的标题。
Hex(x)
把一个十进制数转换成为十六进制数。
Oct(x)
把一个十进制数转换成为八进制数。
Asc(x)
返回字符串中第一个字符的 ASCII 码。
Chr(x)
把值转换为相应的 ASCII 字符。
Str(x)
把值转换为一个字符串
Cint(x)
把小数部分四舍五入，转换为整数。
Ccur(x)
把值转换为货币类型，小数部分最多保留 4 位。
“字符串 1”的起始位置开始查找。“首字符位置”是一个长整数。
③函数的最后 n 是可选项，类型为整型数，用来指定字符串比较。取范围是：0、1、2。
为 0 使用二制进比较，区分字母的大小写；
为 1 比较时忽略大小写；
为 2 则基于数据库中包含的信息进行比较（限于 Access 数据库）。
（7）字母大小写转换
5
显示 Retry 及 Cancel 按钮。
16
显示 Critical Message 图标。
32
显示 Warning Query 图标。
48
显示 Warning Message 图标。
64
显示 Information Message 图标。
vbDefaultButton1 vbDefaultButton2 vbDefaultButton3 vbDefaultButton4
③右部截取
格式：Right（字符串，n） 返回字符串最后 n 个字符（n≥0）。 （3）字符串长度测试函数
格式：Len(字符串)
Len(变量名)
用 Len 函数可以测试字符串的长度，也可以测试变量的存储空间。
（4）String 函数
格式：String（n，ASCII 码）
String（n,字符串）
返回由 n 指定个数组成的字符串。第二个自变量可以使用 ASCII 码，也可以是字符串。 （5）空格函数 格式：Space（n）
vbMsgBoxHelpButton
16384 将 Help 按钮添加到消息框
VbMsgBoxSetForeground
65536 指定消息框窗口作为前景窗口
vbMsgBoxRight
524288 文本为右对齐
vbMsgBoxRtlReading
1048576 指定文本应为在希伯来和阿拉伯语系统中的从右 到左显示
Rnd 函数可以产生随机数，当一个应用程序不断地重复使用随机数时，同一序列的随机 数会反复出现，用 Randomize 语句可以消除这种情况。
二、字符串函数
（1）删除空白字符函数
函数名
功能
LTrim(字符串)
去掉“字符串”左边的空白字符；
RTrim(字符串)
去掉“字符串”右边的空白字符；
Trim(字符串)
vbSystemModal
4096
系统强制返回；全部应用程序都被挂起，直到用户 对消息框作出响应才继续工作。
Type 参数由上表的四类数值组成，原则是：从每一类中选择一个值（仅仅一个值，不
得重复），把这几个值加在一起就是 Type 参数的值（一般情况下，只需要使用前三类）。
示例：
MsgBox “是否暂停打印!”,16,”提示” Type 参数为 16 分解成：
格式：Ucase（字符串）’小写字母转大小字母。 Lcase（字符串）’大写字母转换为小写字母。
2
三、MsgBox 函数
MsgBox 函数的格式如下：
MsgBox（msg [，Type][，Title][，HelpFile，Context]）
①②
③
④
函数共有 5 个参数，除①参数外，其余都是可选参数。
0
第一个按钮是缺省值。
256
第二个按钮是缺省值。
512
第三个按钮是缺省值。
768
第四个按钮是缺省值。
vbApplicationModal
0
应用程序强制返回；应用程序一直被挂起，直到用
户对消息框作出响应才继续工作。
vbSystemModal
4096 系统强制返回；全部应用程序都被挂起，直到用户
对消息框作出响应才继续工作。
去掉“字符串”两边的空白字符；
（2）字符串截取函数
①左部截取
格式：Left（字符串，n） 返回字符串的前 n 个字符（n≥0）。 ②中部截取
格式：Mid（字符串，p，n） 从第 P 个字符开始，向后截取 n 个字符（P>0，n≥0）。函数的第三个自变量可以省略。 在省略的情况下，将从第二个自变量指定的位置向后截取到字符串的末尾。
