vb怎么提取字符串中的字母vb怎么提取字符串中的字母

Question

vb怎么提取字符串中的字母，比如120v或13220u，我要提取v跟u，vb中有这种功能的函数没？ 

Answer 1

Private Sub TestReg()
    Dim strData As String
    Dim reg As Object
    Dim matchs As Object, match As Object    strData = "120v"  &  vbCrLf  & _
              "13220u"    Set reg = CreateObject("vbscript.regExp")
    reg.Global = True
    reg.IgnoreCase = True
    reg.MultiLine = True
    reg.Pattern = "[a-zA-Z]+"
    Set matchs = reg.Execute(strData)
    For Each match In matchs
        Debug.Print match.Value
    Next
End Sub

Answer 2

这也它复杂了吧！！我用replace可以但是觉得有点复杂，我是先用Val提出数字，再把字符串中数字替换成空字符串，有没有比这个简单点的思路？

Answer 3

其实很简单的啊。。 你用纯vb也可以 like语句 自己百度

Answer 4

like好像不行吧，只能返回true false

Answer 5

你的字母长度和位置确定吗？如果都像你的例子，用 Right 函数取就可以了。

Answer 6

不确定但是数字在左边，字母在右边，我用replace可以但是觉得有点复杂