Question

只需点击一下按钮，我就无法尝试替换文本框中的文字。

我想用我的选择改变让我们说“354”。我不能正常使用

TextBox.Text = Replace(TextBox.Text, "354", "my text")

因为引号内的数字354并不总是相同。

Answer 1

根据您提供的信息......

txt_search是一个文本框，其中包含要查找和替换的所需字符串
txt_replace_with是您要将字符串更改为的文本框。

然后您只需要：

TextBox.Text = Replace(TextBox.Text,txt_search.text,txt_replace_with)

如果您愿意，还可以使用inputbox（）消息框从用户处获取这两个字符串。 ...我没有VS在我面前检查语法，但这是输入框：

dim str_search = inputbox("What do you want to search for?")
dim str_replace = inputbox("... And replace that with what?")
TextBox.Text = Replace(TextBox.Text,str_search,str_replace)

对不起，如果输入框上的任何语法错误。

编辑：

dim _loc  = instr(TextBox.Text,"<iframe width=")+15
dim _len = _loc - (instr(TextBox.Text,"height=")-2)
dim str_search = TextBox.Text.substring(_loc,_len)

_loc  = instr(TextBox.Text,"height=")+8
_len = _loc - (instr(TextBox.Text," src=")-1)

dim str_replace = TextBox.Text.substring(_loc,_len)

TextBox.Text = Replace(TextBox.Text,str_search,str_replace)

我可能稍微偏离了偏移量，但你可以一步一步地找到它。

如何替换“”或{}中的文本框文本

1 个答案: