《(完整word版)VBS函数大全-推荐文档.doc》由会员分享，可在线阅读，更多相关《(完整word版)VBS函数大全-推荐文档.doc（75页珍藏版）》请在金锄头文库上搜索。
1、Abs 函数3Array 函数3Asc 函数4Atn 函数4CBool 函数5CByte 函数5CCur 函数6CDate 函数7CDbl 函数7Chr 函数8CInt 函数8CLng 函数9Cos 函数10CreateObject 函数10CSng 函数12CStr 函数12Date 函数13DateAdd 函数14DateDiff 函数14DatePart 函数15DateSerial 函数17DateValue 函数18Day 函数18Eval 函数19Exp 函数20Filter 函数20FormatCurrency 函数22FormatDateTime 函数23FormatNumbe
2、r 函数24FormatPercent 函数25GetLocale 函数26GetObject 函数27GetRef 函数29Hex 函数30Hour 函数31InputBox 函数31InStr 函数32InStrRev 函数34Int、Fix 函数36IsArray 函数36IsDate 函数37IsEmpty 函数38IsNull 函数38IsNumeric 函数39IsObject 函数39Join 函数40LBound 函数41LCase 函数41Left 函数42Len 函数43LoadPicture 函数43Log 函数44LTrim、RTrim 和 Trim 函数44Mid 函
3、数45Minute46Month 函数46MonthName 函数46MsgBox 函数47Now49Oct50Replace 函数50RGB 函数52Right 函数53Rnd 函数53Round 函数54Microsoft(R) Visual Basic(R) Scripting Edition55ScriptEngineMajorVersion 函数56ScriptEngineMinorVersion 函数56Second 函数57SetLocale 函数57Sgn 函数58Sin 函数59Space 函数60Split 函数60Sqr 函数61StrComp 函数62String 函数
4、63StrReverse 函数64Tan 函数64Time 函数65Timer 函数65TimeSerial 函数65TimeValue66TypeName 函数67UBound 函数68UCase 函数69VarType 函数69Weekday 函数70WeekDayName 函数72Year 函数73VBS函数大全Abs 函数返回数字的绝对值。Abs(number)number 参数可以是任意有效的数值表达式。如果 number 包含 Null，则返回 Null；如果是未初始化变量，则返回 0。说明数字的绝对值是其无符号的数值大小。例如，Abs(-1) 和 Abs(1) 都返回 1。下面示
5、例利用 Abs 函数计算数字的绝对值： Dim MyNumberMyNumber = Abs(50.3 ) 返回 50.3。MyNumber = Abs(-50.3) 返回 50.3。 Array 函数返回包含数组的 Variant。 Array(arglist)arglist 参数是赋给包含在 Variant 中的数组元素的值的列表（用逗号分隔）。如果没有指定此参数，则将会创建零长度的数组。 说明用于引用数组元素的表示符，由跟随有括号的变量名组成，括号中包含指示所需元素的索引号。在下面的示例中，第一条语句创建名为 A 的变量。第二条语句将一个数组赋值给变量 A。最后一条语句将包含在第二个数组
6、元素中的值赋值给另一个变量。 Dim AA = Array(10,20,30)B = A(2) B is now 30。注意 未作为数组声明的变量仍可以包含数组。虽然包含数组的 Variant 变量与包含 Variant 元素的数组变量有概念上的不同，但访问数组元素的方法是相同的。Asc 函数返回与字符串的第一个字母对应的 ANSI 字符代码。Asc(string)string 参数是任意有效的字符串表达式。如果 string 参数未包含字符，则将发生运行时错误。 说明下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码: Dim MyNumberMyNumber = Asc(A
7、) 返回 65。MyNumber = Asc(a) 返回 97。MyNumber = Asc(Apple) 返回 65。注意AscB 函数和包含字节数据的字符串一起使用。 AscB 不是返回第一个字符的字符代码，而是返回首字节。 AscW 是为使用 Unicode 字符的 32 位平台提供的。 它返回 Unicode （宽型）字符代码，因此可以避免从 ANSI 到 Unicode 的代码转换。Atn 函数返回数值的反正切值。Atn(number)number 参数可以是任意有效的数值表达式。说明Atn 函数计算直角三角形两个边的比值 (number) 并返回对应角的弧度值。此比值是该角对边的长
8、度与邻边长度之比。 结果的范围是从 -pi/2 到 pi/2 弧度。弧度变换为角度的方法是将弧度乘以 pi/180。反之，角度变换为弧度的方法是将角度乘以180/pi 。下面的示例利用 Atn 来计算 pi 的值: Dim pipi = 4 * Atn(1) 计算 pi 的值。注意 Atn 是 Tan（将角作为参数返回直角三角形两边的比值）的反三角函数。不要混淆 Atn 与余切（正切的倒数 (1/tangent)）函数。CBool 函数返回表达式，此表达式已转换为 Boolean 子类型的 Variant。CBool(expression)expression 是任意有效的表达式。说明如果 e
9、xpression 是零，则返回 False；否则返回 True。如果 expression 不能解释为数值，则将发生运行时错误。 下面的示例使用 CBool 函数将一个表达式转变成 Boolean 类型。如果表达式所计算的值非零，则 CBool 函数返回 True；否则返回 False。 Dim A, B, CheckA = 5: B = 5 初始化变量。Check = CBool(A = B) 复选框设为 True 。A = 0 定义变量。 Check = CBool(A) 复选框设为 False 。CByte 函数返回表达式，此表达式已被转换为 Byte 子类型的 Variant。CBy
10、te(expression)expression 参数是任意有效的表达式。说明通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，在出现货币、单精度、双精度或整数运算的情况下，使用 CByte 强制执行字节运算。CByte 函数用于进行从其他数据类型到 Byte 子类型的的国际公认的格式转换。例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域设置。如果 expression 在 Byte 子类型可接受的范围之外，则发生错误。下面的示例利用 CByte 函数把 expression 转换为 byte: Dim MyDouble, My
11、ByteMyDouble = 125.5678 MyDouble 是一个双精度值。MyByte = CByte(MyDouble) MyByte 包含 126 。CCur 函数返回表达式，此表达式已被转换为 Currency 子类型的 Variant。CCur(expression)expression 参数是任意有效的表达式。说明通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结果应当被表达为特定的数据类型，而非默认的数据类型。例如在整数运算的情况下，使用 CCur 函数强制进行货币计算。CCur 函数用于进行从其他数据类型到 Currency 子类型的国际公认的格式转换。例如，
12、对十进制分隔符和千位分隔符的识别取决于系统的区域设置。下面的示例使用 CCur 函数将一个表达式转换成 Currency 类型: Dim MyDouble, MyCurrMyDouble = 543.214588 MyDouble 是双精度的。MyCurr = CCur(MyDouble * 2) 把 MyDouble * 2 (1086.429176) 的结果转换为 Currency (1086.4292)。CDate 函数返回表达式，此表达式已被转换为 Date 子类型的 Variant。CDate(date)date 参数是任意有效的日期表达式。说明IsDate 函数用于判断 date
13、是否可以被转换为日期或时间。CDate 识别日期文字和时间文字，以及一些在可接受的日期范围内的数字。在将数字转换为日期时，数字的整数部分被转换为日期，分数部分被转换为从午夜开始计算的时间。CDate 根据系统的区域设置识别日期格式。如果数据的格式不能被日期设置识别，则不能判断年、月、日的正确顺序。另外，如果长日期格式包含表示星期几的字符串，则不能被识别。 下面的示例使用 CDate 函数将字符串转换成日期类型。一般不推荐使用硬件译码日期和时间作为字符串（下面的例子已体现）。而使用时间和日期文字 (如 #10/19/1962#, #4:45:23 PM#)。 MyDate = October 1
14、9, 1962 定义日期。MyShortDate = CDate(MyDate) 转换为日期数据类型。MyTime = 4:35:47 PM 定义时间。MyShortTime = CDate(MyTime) 转换为日期数据类型。CDbl 函数返回表达式，此表达式已被转换为 Double 子类型的 Variant。CDbl(expression)expression 参数是任意有效的表达式。说明通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结果应当被表达为特定的数据类型，而非默认的数据类型。例如在出现货币或整数运算的情况下，使用 CDbl 或 CSng 函数强制进行双精度或单精度算术运算。CDbl 函数用于进行从其他数据类型到 Double 子类型的国际公认的格式转换。例如，十进制分隔符和千位分隔符的识别取决于系统的区域设置。 下面的示例利用 CDbl 函数把 expression 转换为 Double。 Dim MyCurr, MyD
