请问专家：split函数 如何以“?"为分隔符

Private Sub Command1_Click()
 a = "123?" & Chr(34) & "456?" & Chr(34) & "789"
 b = "123?""456?""789"
 c = Split(a, "?""")
 d = Split(b, "?""")
 Debug.Print a,c(0), c(1), c(2)
 Debug.Print b,d(0), d(1), d(2)
End Sub

[此贴子已经被作者于2018-5-17 17:12编辑过]