2016-09-20 46 views

回答

6

我会使用一个正则表达式:

s = "20B" 

Set re = New RegExp 
re.Pattern = "^\d+" 

For Each m In re.Execute(s) 
    num = CInt(m) 
Next 

WScript.Echo num 
+0

很好的解决方案。 在这种情况下真的需要一个循环吗?怎么样 - 'S = “20B” 集重新=新的RegExp re.Pattern = “^ \ d +” 设置一致= re.Execute(S) WScript.Echo CINT(匹配(0).value的)' –

+4

这不是必需的,但它也是处理不匹配的最简单方法(即字符串不以数字开头的情况)。在这些情况下,您的代码会引发错误。 –