Vba 替换文本框中的文本

文本框中是否有替换文本的方法，例如，请参见下文。我目前正在使用它，但在VBA中似乎工作得不好

If TextBox6.Text.Contains("<GTOL-PERP>") Then
    TextBox6.Text = TextBox6.Text.Replace("<GTOL-PERP>", "j")
End If

如果TextBox6.Text.包含（“”），则
TextBox6.Text=TextBox6.Text.Replace（“，“j”）
如果结束

。文本是VBA中的字符串属性。字符串不是VBA中的对象，因此在处理它们时需要使用字符串函数而不是方法。见下文：

If instr(TextBox6.Text, "<GTOL-PERP>") Then
TextBox6.Text = replace(TextBox6.Text, "<GTOL-PERP>", "j")
End If

如果指令（TextBox6.Text，”），则
TextBox6.Text=替换（TextBox6.Text，“，”j”）
如果结束

编辑实际上可以跳过IF，因为如果文本不在字符串中，replace（）不会引发错误