vb 怎么去掉电话号码中的字符 如（021-111111转为021111111，000-111111#12转为00011111112）

楼上的你知道str是VB的关键字之一吗？因此需要改为：
Dim yzf
dim hzf
yzf = "021-111111"
hzf = Replace(yzf, "-", "")
print yzf & " 转换为： " & hzf

Dim str
str = "021-111111"
str = Replace(str, "-", "")