string的问题

Question

举例说明:
a="bk 00006"
b=right(a,len(a)-instr(a," "))
那么b="00006"
明白了吗?呵呵

Answer 1

这样可以替换掉所有的空格：
str = "Text1 345kjf 435 fg"
str = Replace(str, " ", "")这样可以只取得字符串中的数字：
str = "Text1 345kjf 435 fg"
For i = 1 To Len(str)
    des = des & IIf(IsNumeric(Mid(str, i, 1)), Mid(str, i, 1), "")
Next i
Debug.Print des