vb如何把字符串 中的非数值去掉