[转]，VB之Val()函数的使用

Val()函数是Visual Basic中一个非常常用的函数，用于将一个字符串转换成一个数值类型的值。在VB中，字符串和数值类型的值是不同的数据类型，通过Val()函数可以将一个字符串转换成与之对应的数值类型的值。

Val()函数的语法如下：

Val(字符串)

其中，字符串是要转换的字符串值。

Val()函数的使用非常简单，只需要将要转换的字符串作为参数传入函数即可。函数会返回一个对应的数值类型的值。

下面是一个示例，演示了Val()函数的使用：

Dim str As String

str = "123"

Dim num As Double

num = Val(str)

在上面的示例中，我们定义了一个字符串变量str，并赋值为"123"，然后将str作为参数传递给Val()函数，并将返回值赋给一个数值类型的变量num。通过这种方式，我们将字符串"123"转换成数值类型的值。

Val()函数的工作原理是从字符串的第一个字符开始，依次检查每个字符，直到遇到一个无效的字符为止。如果字符串的第一个字符是无效的字符（例如字母），那么函数将返回0。如果字符串中有有效的数字字符，函数将读取这些数字字符并将其转换成对应的数值类型的值。

下面是一些使用Val()函数的示例：

Dim str1 As String

str1 = "123abc"

Dim num1 As Double

num1 = Val(str1)

'结果为123

Dim str2 As String

str2 = "456.78"

Dim num2 As Double

num2 = Val(str2)

'结果为456.78

Dim str3 As String

str3 = "$789"

Dim num3 As Double

num3 = Val(str3)

'结果为0

可以看到，在第一个示例中，字符串"123abc"中包含了一个无效字符（字母a），因此Val()函数从字符串的开头开始读取并转换数字字符，直到遇到无效字符为止。因此返回值为123。

在第二个示例中，字符串"456.78"中包含了一个小数点，Val()函数也可以正确地将字符串转换成对应的数值类型的值。

在第三个示例中，字符串"$789"中的"$"是一个无效字符，因此Val()函数会返回0。

需要注意的是，Val()函数只能将字符串转换成数值类型的值，不能用于将字符串转换成其他类型的值，例如日期、布尔值等。

另外，Val()函数在转换字符串时，如果字符串的格式不符合数值类型的格式要求，函数将返回0。因此在使用Val()函数时，最好先检查字符串的格式是否符合要求，避免出现错误。

总之，Val()函数是VB中一个非常实用的函数，用于将字符串转换成数值类型的值。在处理字符串数据时，特别是需要进行数值计算或比较时，Val()函数可以帮助我们快速将字符串转换成正确的数值类型的值，方便后续的操作。在实际开发中，我们经常会用到Val()函数，因此了解和掌握Val()函数的使用是非常重要的。