vb 删除相同字符

来源:百度知道 编辑:UC知道 时间:2024/09/21 08:22:45
a=0123456789
b=346
求c=? c应该等于0125789,就是在a中删除和b重复的数字,请问这个如何写

c = Replace(a, b, "")

老难了 继续关注

for i= 1 to len(a)-len(b)
a1=mid(a,1,i-1)
a2=mid(a,i+len(b),len(a)-len(b)-i)
a3=mid(a,i,len(b))
if a3=b then
a=cstr(a1)&cstr(a2)
end if
next i
试试看,大概就是这样啦

c = Replace(a, b, "") '支持一下
去掉A里与B相同的数 赋值与 C