vb 删除相同字符

Question

a=0123456789 
b=346 
求c=? c应该等于0125789，就是在a中删除和b重复的数字，请问这个如何写
是不是可以用a&b把两个字符串结合到一块0123456789346然后在这个字符串里判断重复然后删除，我觉得这样简单点

Answer 1

Option ExplicitPrivate Sub Form_Load()
Dim a, b, c As String
Dim i As Integer
a = "0123456789"
b = "346"
For i = 1 To Len(b)
a = Replace(a, Mid(b, i, 1), "")
Next
c = a
MsgBox c
End Sub

Answer 2

Private Sub Form_Load()
Dim StrA As String
Dim StrB As String
Dim i As IntegerStrA = "0123456789"
StrB = "346 "For i = 1 To Len(StrB)
    StrA = Replace(StrA, Mid(StrB, i, 1), "")  '循环删除每个字符
NextDebug.Print StrA
End Sub