例如将(中华人民共和国-北京/*上海ABX) 变成 中华人民共和国北京上海ABX

解决方案 »

  1.   

    replace(sStringSource,"(","")
    replace(sStringSource,")","")
      

  2.   

    这样不是要用几十个Replace
    我是要去掉标点符号数字,只留中文和字母,还有没有什么快捷的办法
      

  3.   

    Dim s As String, s1 As String
    Dim i As Long
    s = "(中华人民共和国-北京/*上海ABX)"For i = 1 To Len(s)
        If StrConv(Mid(s, i, 1), vbWide) = Mid(s, i, 1) And StrConv(Mid(s, i, 1), vbNarrow) = Mid(s, i, 1) Then
            s1 = s1 & Mid(s, i, 1)
        ElseIf (Asc(Mid(s, i, 1)) >= 65 And Asc(Mid(s, i, 1)) <= 90) Or (Asc(Mid(s, i, 1)) >= 97 And Asc(Mid(s, i, 1)) <= 122) Then
            s1 = s1 & Mid(s, i, 1)
        End If
    Next
    Debug.Print s1
      

  4.   

    扫描每一个字符,判断它的ASCII码所在区间
      

  5.   

    Dim s As String, s1 As String
    Dim i As Long
    s = "(中华人民共和国-北京/*上海ABX)"
      For i = 1 To Len(s)
       if  Mid(s, i, 1) ="(" or ")" then ......
       使用or或者case去掉里面的不要的字符!]
     在vb里面我在一些书上看到一个汉字也是一个字符,一个西文字也是一个字符
     可是在一些地方我也看到了一个汉字是2个字符,具体怎么也不晓得,请相关人员帮我看看!