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从字符串中移除字母

回答

相关问题