2016-09-20 75 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

這不是必需的,但它也是處理不匹配的最簡單方法(即字符串不以數字開頭的情況)。在這些情況下,您的代碼會引發錯誤。 –