Private Sub Command1_Click()
Dim zhanghao As String
zhanghao = Text1.Text
Replace (zhanghao," ","%20")


End Sub
我想把text1的 空格变成%20 等等 把帐号字符串中的特殊符号全部替换掉  不知道应该怎么写

zhanghao = Text1.Text
zhanghao = Replace (zhanghao," ","%20")                'Replace 是一个函数，所以需要使用它的返回值。它返回一个字符串。

灰常感谢啊 我是一个VB新手

zhanghao = Replace(zhanghao, """, "%22")
那如果把“转换成  %22就不行了

"""   这里错了。要么写成 4个引号。好像是
最好是使用 chr(?) 来生成引号。这个不容易错。