vb 字符串转为数字 和判断字符串是否是数字字符串【转】
1 Val 函数
返回包含于字符串内的数字，字符串中是一个适当类型的数值。
语法
Val(string)
必要的 string 参数可以是任何有效的字符串表达式.
说明
当 Val 函数无法辨识构成数值的第一个字符时，在遇到第一个不可识别的字符之前停止读取输入字符串。而那些通常被视为数值组成部分的标点符号如美圆号与逗号都无法被 Val 函数辨识。然而该函数能够辨识八进制表示法 (&O) 和十六进制表示法 (&H)。同时这些空白字符以及换行与分隔符都被去除。
下面的返回值为 1615198：
Val(" 1615 198th Street N.E.")
在下面的代码中，Val 为所示的十六进制数值返回十进制数值 -1。
Val("&HFFFF")
Val 函数仅将句号（.）视为可用的小数点分隔符。在采用其他小数点分隔符的情况下，请考虑使用 CDbl 将字符串转换为数值。例如，在某些国际版本的应用程序中，请参考此方法进行操作。
Val 函数示例
本示例使用 Val 函数返回字符串中所含的数值。
定义变量 MyValue。
将Val函数应用于字符串 "2457" 将返回数值型结果。
当Val函数处理包含空格的字符串时（例如 " "），它仍会返回正确的数值。
若Val函数接收以'and'分隔的数值参数（如 " and "），则会提取第一个值。
调用IsNumeric函数用于判断。
返回 Boolean 值，指出表达式的运算结果是否为数。
语法
IsNumeric(expression)
该字段必须属于一种 Variant类型，并且能够包含数值或字符串类型的表达式。
说明
当全部expression的计算结果为数字时，则IsNumeric会返回True；否则返回False
如果 expression 是日期表达式，则 IsNumeric 返回 False。
该函数用于判断变量是否可转换为数值。
以下代码片段演示了如何利用 IsNumeric 函数来验证变量值是否为数字型数据。
var = 123;
if (IsNumeric(var)) {
echo "成功！";
} else {
echo "失败！";
}$
Dim MyVar, MyCheck
MyVar = "53" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 True。
MyVar = "459.95" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 True。
MyVar = "45 Help" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 False。
摘自：网络整理
相关文章参考：
※VB Send Message作为字符串信息，在其他程序窗口中作为消息内容传递出去的一个实例
_※ VB中字符串匹配的多种方式 _
转
转
vb字段转换为数值型
※ 查找替代字符串的函数 ****
_※ VB的MD5加密模块 _
※VB 字符串MD5加密函数
★ VB部分相关文章推荐：★
转
转
转
转
转
转
转
☆关于VB中的Shell及其执行方式的归纳与总结以及相关记录
☆[vb]On Error GoTo 0和On Error resume区别
做个笔记：在菜单中添加自绘图形的例子（VB6代码）
做个笔记：在菜单中添加自绘图形的例子（VB6代码）
☆VB抓图
通过VB技术实现配置信息直接存储在.exe文件内，并导致.exe文件成为一种能够执行恶意代码的木马程序载体
★在VB编程中使用Windows API时需要注意以下几点：相关资源库
在VB程序中开发IP地址、子网掩码、网络设备上的DNS服务器的配置调整[转]
精彩的作品
(注：以下为正文内容)