VBScript從字符串中移除字母

-5

你能寫我如何取出字符串並移除所有字母和符號，只留下7位數字嗎？例如：如果我得到abc1234567-d或a12c3f-45kj6％7ud-VBScript從字符串中移除字母

然後返回1234567 感謝

來源

2017-02-13 Gil Balbus

告訴我們你到目前爲止所嘗試過的，然後我們可以給出意見。這就是學習兄弟的方法。 –

請不要通過互聯網[廣播]（http://www.visualbasicscript.com/fb.ashx?m=108687）提出您的問題。謝謝。 –

[VBScript正則表達式查找數字模式]的可能的重複（http://stackoverflow.com/q/23544233/692942） – Lankymart

-1

Public Function ExtractNumber(Source as string) as string 
    dim result as string = string.empty 
    for each c as char in Source 
     if isnumeric(c) then result &= c 
    next 
    return result 
end function

來源

2017-02-13 21:04:15

這似乎是VB.net，而不是VBScript。 –

這將刪除所有，但0-9，.，並,因爲它們是數字的有效部位。

這就是着名的正則表達式。請參閱VBScript的幫助。

Set re = New RegExp 
re.Pattern = "[^0-9\.,]" 
re.Global = True 
re.IgnoreCase = True 
Sortkey = re.Replace(Sortkey, "")

來源

2017-02-13 21:31:20 Freddie

OP只想保留數字，所以'\ D'或'\ D +'將是一個更合適的表達式。 –

VBScript從字符串中移除字母

回答

相關問題