songzihui 发表于 2014-7-8 09:13:41

vb中字符串替换问题

一个字符串,我要把字符串中指定位子的字符替换掉,不管它是什么。(空格、字符、为空都包括) 替换成我想要的字符。用什么函数?要有例子代码。谢谢各位了。

八月的樱花 发表于 2014-7-8 09:13:51

Private Sub Command1_Click()
'第一步: 首先查找指定位子的字符是什么:
Dim A As Integer, B As String, C As String, D As String, X As String, M As String
X = "P"'这个替换字符也可以用文本框输入X = Text3.Text
B = Text1.Text
M = Text2.Text
A = Int(Val(M))
C = Len(B)
D = Right(B, C - A + 1)
D = Left(D, 1)
'第二步: 替换字符:
B = Replace(B, D, X)
Label1.Caption = B
'注意:可以替换查询到的所有字符
End Sub
页: [1]
查看完整版本: vb中字符串替换问题