按键精灵函数介绍 下载本文

.

按字母顺序排列::::: [A]

=========================================================================== Abs 函数 返回参数的绝对值,其类型和参数相同。 语法 Abs(number) 必要的 number 参数是任何有效的数值表达式,如果 number 包含 Null,则返回 Null,如果 number 是未初始化的变量,则返回 0。 说明 一个数的绝对值是将正负号去掉以后的值。例

ABS(-1)

ABS(1)

1

-------------------------------------------------------------------------- Abs 函数示例 本示例使用 Abs 函数计算数的绝对值。 Dim MyNumber MyNumber = Abs(50.3) ' 返回 50.3。 MyNumber =

Abs(-50.3)

'

50.3

=========================================================================== Array 函数 返回一个包含数组的 Variant。 语法 Array(arglist) 所需的 arglist 参数是一个用逗号隔开的值表,这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数,则创建一个长度为 0 的数组。 说明 用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中,第一条语句创建一个 Variant 的变量 A。 第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。 Dim A A = Array(10,20,30) B = A(2) 使用 Array 函数创建的数组的下界受 Option Base 语句指定的下界的决定, 除非 Array 是由类型库(例如 VBA.Array )名称限定。如果是由 类型库名称限定,则 Array 不受 Option Base 的影响。 注意 没有作为数组声明的 Variant 也可以表示数组。除了长度固定的字符串以及用户定义类型之外,Variant 变量可以表示任何类型的数组 。尽管一个包含数组的 Variant 和一个元素为 Variant 类型的数组在概念上有所不同,但对数组元素的访问方式是相同的。 -------------------------------------------------------------------------- Array 函数示例 该示例使用

.

.

Array 函数来返回一个包含 Variant 的数组。 Dim MyWeek, MyDay MyWeek = Array(\返回值假设下界的设置为 1(使用 Option Base ' 语句)。 MyDay = MyWeek(2) 'MyDay 的值为 \。 MyDay = MyWeek(4) 'MyDay

\

=========================================================================== Asc 函数 返回一个 Integer,代表字符串中首字母的字符代码。 语法 Asc(string) 必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误。 说明 在非 DBCS 系统下,返回值范围为 0 – 255 。在 DBCS 系统下,则为 -32768 – 32767。 注意 AscB 函数作用于包含在字符串中的字节数据,AscB 返回第一个字节的字符代码,而非字符的字符代码。AscW 函数返回 Unicode 字 符代码,若平台不支持 Unicode,则与 Asc 函数功能相同。 -------------------------------------------------------------------------- Asc 函数示例 本示例使用 Asc 函数返回字符串首字母的字符值(ASCII 值)。 Dim MyNumber MyNumber = Asc(\返回 65。 MyNumber = Asc(\' 返回 97。 MyNumber = Asc(\' 返回 65。 =========================================================================== Atn 函数 返回一个 Double,指定一个数的反正切值。 语法 Atn(number) 必要的 number 参数是一个 Double或任何有效的数值表达式。 说明 Atn 函数的参数值 (number) 为直角三角形两边的比值并返回以弧度为单位的角。这个比值是角的对边长度除以角的邻边长度之商。 值的范围在 -pi/2 和 pi/2 弧度之间。 为了将角度转换为弧度,请将角度乘以 pi/180。为了将弧度转换为角度,请将弧度乘以 180/pi。 注意 Atn 是 Tan 的反三角函数,Tan 的参数值为角度,返回直角三角形的两条边的比值。不要将 Atn 和余切函数混淆,余切函数值是正切 函数值的倒数,cotangent = (1/tangent)。

.

.

-------------------------------------------------------------------------- Atn 函数示例 本示例使用 Atn 函数计算圆周率。 Dim pi pi = 4 * Atn(1) ' 计算圆周率。 按

:::::

[C]

=========================================================================== CBool 函数 描述 返回表达式,此表达式已转换为 Boolean 子类型的 Variant。 语法 CBool(expression) expression 是任意有效的表达式。 说明 如果 expression 是零,则返回 False;否则返回 True。如果 expression 不能解释为数值,则将发生运行时错误。 下面的示例使用 CBool 函数将一个表达式转变成 Boolean 类型。如果表达式所计算的值非零,则

CBool

函数返回

True;否则返回

False。

-------------------------------------------------------------------------- 示例: Dim A, B, Check A = 5: B = 5 ' 初始化变量。 Check = CBool(A = B) '复选框设为 True 。 A = 0 '定义变量。 Check = CBool(A)

'

False

=========================================================================== CByte 函数 描述 返回表达式,此表达式已被转换为 Byte 子类型的 Variant。 语法 CByte(expression) expression 参数是任意有效的表达式。 说明 通常,可以使用子类型转换函数书写代码,以显示某些操作的结果应被表示为特定的数据类型,而不是默认类型。例如,在出现货币、单精度、双精度或整数运算的情况下,使用 CByte 强制执行字节

.