1

我在尝试通过单击按钮来替换文本框中的文本时遇到问题。

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

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

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

4

1 回答 1

0

根据您提供的信息...

  • 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)

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

于 2013-05-23T02:12:21.783 回答