正则处理,把非数值的字符删除。
Dim str As String = chr(11) & "123abc你我他"msgbox(str)str = System.Text.RegularExpressions.Regex.replace(str, "[^0-9]", "")msgbox(str)