VB中的常用函数.doc

1 VB中常用的函数和语句 一、Val 函数 返回包含于字符串内的数字，字符串中是一个适当类型的数值。 语法 Val(string) 必要的 string 参数可以是任何有效的字符串表达式. 说明 Val 函数，在它不能识别为数字的第一个字符上，停止读入字符串。那些被认为是数值的一部分的符号和字符，例如美圆号与逗号，都不能被识别。但是函数可以识别进位制符号 O（八进制）和 H（十六进制）。空白、制表符和换行符都从参数中被去掉。 下面的返回值为 1615198： Val( 1615 198th Street N.E.) 在下面的代码中，Val 为所示的十六进制数值返回十进制数值 -1。 Val(HFFFF) 注意 Val 函数只会将句点（.）当成一个可用的小数点分隔符。当使用不同的小数点分隔符时，如在国际版应用程序中，代之以 CDbl 来把字符串转换为数字。 ===================================== Val 函数示例 本示例使用 Val 函数返回字符串中所含的数值。 Dim MyValue MyValue = Val(2457) 返回 2457。 MyValue = Val( 2 45 7) 返回 2457。 MyValue = Val(24 and 57) 返回 24。 参考资料：MSDN VB参考 二、Str 函数 返回代表一数值的 Variant (String)。 语法 Str(number) 必要的 number 参数为一 Long，其中可包含任何有效的数值表达式。 说明 当一数字转成字符串时，总会在前头保留一空位来表示正负。如果 number 为正，返回的字符串包含一前导空格暗示有一正号。 使用 Format 函数可将数值转成必要的格式，如日期、时间、货币或其他用户自定义格式。与 Str 不同的是，Format 函数不包含前导空格来放置 number 的正负号。 注意 Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点（例如，国际性的应用程序），可使用 CStr 将数字转成字符串。 for example:Str 函数示例 本示例使用 Str 函数来将一个数字转成字符串。当数字转成字符串时，字符串的第一个位一定是空格或是正负号。Dim MyStringMyString = Str(459) \ 返回 459。MyString = Str(-459.65) \ 返回 -459.65。MyString = Str(459.001) \ 返回 459.001。 三、CStr 函数 说明 传回一个转换为 String 资料型态的运算式。 语法 CStr(expression) 引数 expression 可以是任何有效的运算式。 注解 通常，您可以使用资料型态转换函数，以特定的资料型态，取代预设的资料型态来进行运算。例如，使用 CStr 来强制将执行结果以 String 资料型态表示。 您可以使用 CStr 函数而非 Str 函数，在任何语言的版本中，让任何一个资料型态转换至 String 资料型态。例如，不同的小数点分隔符号，会依据您系统的国别设定来做适当的确认。 引数 expression 将决定函数传回值为何，请叁考下表： 若 expression 内容为 传回值 Boolean 包含 True 或 False 的字串。 Date 包含一个日期的字串，其格式为您系统的简短日期格式。 Null 产生执行时期错误。 Empty 一个长度为 0 的 字串 ()。 Error 包含一个英文字 Error 以及一个错误代码的字串。 其他数值 包含这个数值的字串。 （一）类型转换类函数 1. CType(X) [格式]： P=CBool(X) 将X转换为“布尔”（Boolean）类型 P=CByte(X) 将X转换为“字节”（Byte）类型 P=CCur(X) 将X转换为“金额”（Currency）类型 P=CDate(X) 将X转换为“日期”（Date）类型 P=CDbl(X) 将X转换为“双精度”（Double）类型 P=CInt(X) 将X转换为“整型”（Integer）类型 P=CLng(X) 将X转换为“长整型”（Long）类型 P=CSng(X) 将X转换为“单精度”（Single）类型 P=CStr(X) 将X转换为“字符串”（String）类型 P=Cvar(X) 将X转换为“变体型”（Variant）类型 P=CVErr(X) 将X转换为Error值 [ 范例 ]： (1). CStr(13)+CStr(23) 数值转换成字符串后，用+号连接， 结果：