主题：还是字符串操作的问题

小白弱弱的问一下，怎么只取字符串里的数字和字母，把其他字符一律移除？

1、不排除标点符号（英文的标点符号）

 

Dim s As String = "这是数字123:89+7-5=这是小写英文abc,d:rejgkb这是大写英文?ACU,FGNK.GNFK"
Dim s2,s3 As String
For I As Integer = 0 To Len(s)-1
    s2 = s.SubString(i,1)
    If Asc(s2) > 0
        s3 = s3 & s2
    End If
Next
Output.show(s3)

 

2、排除标点符号：

 

Dim s As String = "这是数字123:89+7-5=这是小写英文abc,d:rejgkb这是大写英文?ACU,FGNK.GNFK"
Dim s2,s3 As String
For I As Integer = 0 To Len(s)-1
    s2 = s.SubString(i,1)
    If Asc(s2) > 47 And Asc(s2) < 58 OrElse Asc(s2) > 64 And Asc(s2) < 91 OrElse Asc(s2) > 96 And Asc(s2) < 123
        s3 = s3 & s2
    End If
Next
Output.show(s3)

 

 

 具体问题，才有具体操作，说说你要达到的效果，举例说明。

正则

程版的第二种方案是我想要的效果；看来取此类字符通过比较ASCII 的值比较方便；谢谢了；