如何拆分一个字符串

Question

有这样一个字符串:
sf=bellxm=11110000ps=12345678bf=c:\test\te.txt想把其中的sf、xm、ps、bf后面的字符串提取出来，就是把=后面的字符串取出来，放到变量里，这个字符串的长度会发生变化，但格式不变，请诸位教我。

Answer 1

用=slit
用left去掉后两个字符

Answer 2

viena() 说得太正确了，用=来Split，然后用Left或Mid函数去掉最后两位Private Sub Command1_Click()
    Dim strTmp As String, arrData() As String, i As Long
    strTmp = "sf=bellxm=11110000ps=12345678bf=c:\test\te.txt"
    arrData = Split(strTmp, "=")
    For i = 1 To UBound(arrData) - 1
        arrData(i) = VBA.Left(arrData(i), Len(arrData(i)) - 2)
        Debug.Print arrData(i)
    Next
    Debug.Print arrData(UBound(arrData))
End Sub

Answer 3

REPLACE 也可以Private Sub Command1_Click()
Dim x As String, b As String, i As Integer
x = "sf=bellxm=11110000ps=12345678bf=c:\test\te.txt"
b = "sf、xm、ps、bf"
For i = 0 To 3
x = Replace(x, Mid(b, i * 3 + 1, 2) & "=", vbCrLf)
Next
MsgBox x
End Sub