Question

vbs脚本里面， 如何使原本属于字符串类型的数字格式，转变为数值型格式

vbs脚本里面， 如何使原本属于字符串类型的数字格式，转变为数值型格式，例如在VBS里面判断两个变量str1 str2大小，当str1变量抓取到的值为100，而 str2抓取到的值为80时， 脚本自动会判断100小于80. 这应该是字符串类型造成的吧，想问下，怎么是字符串变量转换成数值型变量。
str1和str2 两个变量是从两个txt文本中抓取到的字段。
下午搞定了，用了一个简单的命令,之前没有成功的原因可能是在loop没有完直接插入Cint的问题
后来等Loop语句后面加了
Dim b
b=(str1)
Dim c
c=(str2)

Answer 1

用int命令。比如你得到的值分别为str1，str2，那么这样写：
str1 = int(str1)
str2 = int(str2)
但是这样写，只适合获得的是整数，对于小数，运算后会去掉小数位。

还有一个方法比较合理，不会去掉小数，那就是在你想加前加一个0，这样：0+str1
下面给你一个例子：
Dim fso
Set fso = WScript.CreateObject("Scripting.Filesystemobject")
Set red = fso.OpenTextFile(CreateObject("wscript.shell").specialfolders("desktop") &"\123.txt",1)
str1 = 0 + red.ReadLine
red.close

Set res = fso.OpenTextFile(CreateObject("wscript.shell").specialfolders("desktop") &"\122.txt",1)
str2 = 0 + res.ReadLine
red.close

If str1 > str2 Then MsgBox str1 &">"& str2
If str1 < str2 Then MsgBox str1 &"<"& str2

其中，桌面123.txt里面的第一行存的是100，122.txt里面存的是80，最后比较的结果是100>80
希望对你有帮助。。。

Answer 2

字符串-->数值 转换函数： Val
字符串-->整数类型转换函数：Cint

字符串-->长整型：Clng

Answer 3

dim n1 as Long
if IsNumeric(str1) then n1=Clng(str1)
'如果确定是数值可以直接转，否则先判断是否为数字，然后转换成long，有空格会认为是字符串，可用Trim()

Answer 4

val(str1)>val(str2) 返回TURE则证明str1>str2，FALSE则证明str1不大于str2

Answer 5

Integer.parseInt（str1）