《按键精灵函数介绍（2020年10月整理）.pptx》由会员分享，可在线阅读，更多相关《按键精灵函数介绍（2020年10月整理）.pptx（17页珍藏版）》请在金锄头文库上搜索。
1、按字母顺序排列: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)
2、 返 回 50.3 。 = = Array 函数 返回一个包含数组的 Variant。 语法 Array(arglist) 所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包 含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。 说明 用来表示 数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中， 第一条语句创建一个 Variant 的变量 A。 第二条语句将一个数组赋给变量 A。最后一条 语句将该数组的第二个元素的值赋给另一个变量。 Dim A A = Array(10,20,30) B = A(2) 使用 Ar
3、ray 函数创建的数组的下界受 Option Base 语句指定的下界的决定, 除非 Array 是由类型库（例如 VBA.Array )名称限定。如果是由 类型库名称限定，则 Array 不受 Option Base 的影响。 注意 没有作为数组声明的 Variant 也可以表示数组。除了长度固 定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组 。尽管一个包 含数组的 Variant 和一个元素为 Variant 类型的数组在概念上有所不同，但对数组元素的 访问方式是相同的。,1,- Array 函数示例 该示例使用 Array 函数来返回一个包含 Variant
4、的数组。 Dim MyWeek, MyDay MyWeek = Array(Mon, Tue, Wed, Thu, Fri, Sat, Sun) 返回值假设下界的设 置为 1（使用 Option Base 语句）。 MyDay = MyWeek(2) MyDay 的值为 Tue。 MyDay = MyWeek(4) MyDay 的 值 为Thu 。 = = Asc 函数 返回一个 Integer，代表字符串中首字母 的字符代码。 语法 Asc(string) 必要的 string 参数可以是任何有效的字符串表达式。如 果 string 中没有包含任何字符，则会产生运行时错误。 说明 在非 DB
5、CS 系统下，返回 值范围为 0 255 。在 DBCS 系统下，则为 -32768 32767。 注意 AscB 函数作用 于包含在字符串中的字节数据，AscB 返回第一个字节的字符代码，而非字符的字符代码。 AscW 函数返回 Unicode 字 符代码，若平台不支持 Unicode，则与 Asc 函数功能相同。 - Asc 函数示例 本示例使用 Asc 函数返回字符串首字母的字符值（ ASCII 值）。 Dim MyNumber MyNumber = Asc(A) 返回 65。 MyNumber = Asc(a) 返回 97。 MyNumber = Asc(Apple)返回65。 = =
6、 Atn 函数 返回一个 Double，指定一个数的反正切 值。语法 Atn(number) 必要的 number 参数是一个 Double 或任何有效的数值表达式。 说明 Atn 函数的参数值 (number) 为直角三角形两边的比值并返回以弧度为单位的角。 这个比值是角的对边长度除以角的邻边长度之商。 值的范围在 -pi/2 和 pi/2 弧度之间。 为了将角度转换为弧度，请将角度乘以 pi/180。为了将弧度转换为角度，请将弧度乘以,2,3,180/pi。 注意 Atn 是 Tan 的反三角函数，Tan 的参数值为角度，返回直角三角形的两条 边的比值。不要将 Atn 和余切函数混淆，余切
7、函数值是正切 函数值的倒数，cotangent = (1/tangent) 。 - Atn 函数示例 本示例使用 Atn 函数计算圆周率。 Dim pi pi = 4 * Atn(1) 计算圆周率。,按字母顺序排列:C = = CBool 函数 描述 返回表达式，此表达式已转换为 Boolean 子类型的 Variant。 语法 CBool(expression) expression 是任意有效的表达 式。 说明 如果 expression 是零，则返回 False；否则返回 True。如果 expression 不 能解释为数值，则将发生运行时错误。 下面的示例使用 CBool 函数将一个
8、表达式转变成 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 参数是任意有效的表达,4,式。 说明 通常，可以使用子类型
9、转换函数书写代码，以显示某些操作的结果应被表示为特 定的数据类型，而不是默认类型。例如，在出现货币、单精度、双精度或整数运算的情况下， 使用 CByte 强制执行字节运算。 CByte 函数用于进行从其他数据类型到 Byte 子类型的 的国际公认的格式转换。例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域 设置。 如果 expression 在 Byte 子类型可接受的范围之外，则发生错误。下面的示例利 用CByte函数把expression转换为byte: -示 例 :Dim MyDouble, MyByte MyDouble = 125.5678 MyDouble 是一个双精度值
10、。 MyByte = CByte(MyDouble)MyByte包含126。 = = CCur 函数 描述 返回表达式，此表达式已被转换为 Currency 子类型的 Variant。 语法 CCur(expression) expression 参数是任意有效的表 达式。 说明 通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结果应当 被表达为特定的数据类型，而非默认的数据类型。例如在整数运算的情况下，使用 CCur 函 数强制进行货币计算。 CCur 函数用于进行从其他数据类型到 Currency 子类型的国际公 认的格式转换。例如，对十进制分隔符和千位分隔符的识别取决于系统的
11、区域设置。 下面 的 示 例 使 用 CCur 函 数 将 一 个 表 达 式 转 换 成 Currency 类 型 : -示 例 :Dim MyDouble, MyCurr MyDouble = 543.214588 MyDouble 是 双 精 度 的 。 MyCurr = CCur(MyDouble * 2) 把 MyDouble * 2 (1086.429176) 的 结 果 转 换 为 Currency (1086.4292)。 =,5,= CDate 函数 描述 返回表达式，此表达式已被转换为 Date 子类型的 Variant。 语法 CDate(date) date 参数是任意
12、有效的日期表达式。 说明 IsDate 函数用于判断 date 是否可以被转换为日期或时间。CDate 识别日期文字和时间文 字，以及一些在可接受的日期范围内的数字。在将数字转换为日期时，数字的整数部分被转 换为日期，分数部分被转换为从午夜开始计算的时间。 CDate 根据系统的区域设置识别日 期格式。如果数据的格式不能被日期设置识别，则不能判断年、月、日的正确顺序。另外， 如果长日期格式包含表示星期几的字符串，则不能被识别。 下面的示例使用 CDate 函数 将字符串转换成日期类型。一般不推荐使用硬件译码日期和时间作为字符串（下面的例子已 体 现 ）。 而 使 用 时 间 和 日 期 文 字 ( 如 #10/19/1962#, #4:45:23 PM#) 。 - 示例: MyDate = October 19, 1962 定义日期。 MyShortDate = CDate(MyDate) 转换为日期数据 类型。 MyTime = 4:35:47 PM 定义时间。 MyShortTime = CDate(MyTime) 转换 为日期数据类型。 =
