请VB高手帮下忙，感激不尽——替换菜单

来源：百度知道编辑：UC知道时间：2024/06/07 00:40:55

请高手帮忙设计，点击“替换”菜单，弹出对话框，这时候可以输入被替换的内容和替换后的内容，点击确定，将全文中的内容全部替换
对了，我用的是richtextbox，请高手把程序写下，谢谢

对话框很简单，代码更简单

rtf.Text = replace(rtf.Text,"查找字符串","替换成的字符")
自己替换 rtf是文本框查找字符串、替换成的字符分别为两个文本框

以下为替换部分内容：
If rtf.SelLength > 0 Then
rtf.SelText = "替换内容"
End If
以下为全文替换：
rtf.TextRTF="替换内容"