VB帮忙 急啊

来源：百度知道 编辑：UC知道 时间：2024/05/21 00:17:42
、可以在查找文本框中输入查找文字；

、可以在替换为文本框中输入替换文字；

、单击“替换”按钮，对文本框Text1中与查找内容匹配的文字进行替换操作；

、文本框Text1可以多行显示文字；

关键的程序是怎么样的???如替换的趁许是什么??帮忙啊
显示多行文字是怎么样编的?

关键程序:
Private Sub command1_click()
Dim n%
n = InStr(Text1.Text, chazhao.Text)
If n <> 0 Then '不等于0表示找到
Text1.SetFocus
Text1.SelStart = n - 1
Text1.SelLength = Len(chazhao.Text)
Text1.SelText = tihuan.Text
End If
End Sub
text1的multiline属性为只读,要在设计时改,你把它改成true就好了...
希望对你有所帮助... ^_^b

replace("43256666","3","ddd")返回结果是4ddd256666

文本操作函数是有的 。