获取RichTextBox格式并将其用于替换函数

时间:2013-09-30 18:01:42

标签: vb.net richtextbox

我刚开始学习VB并尝试制作一个WYSIWYG-HTML编辑器。为此,我已经创建了一个RichTextBox,用户可以在其中更改颜色,字体大小等等。现在我想添加例如<b> -Tag之前和</b> -Tag之后的单词以粗体显示,将其保存在字符串中,并在第二个只读文本框中返回新字符串。

最好的方法是什么?

1 个答案:

答案 0 :(得分:-1)

所以你想将只读文本框的文本设置为richtextbox的文本,然后用其他字符串替换某些字符串?

如果是这样,这里是我编写的一些代码。它可能不是最好的但它有效。

TextBox1.Text = RichTextBox1.Text 'Copies the text form the richtextbox to the normal textbox

    If TextBox1.Text.Contains("<b>") Then 'Checks to see if Textbox1 contains the string "<b>"
        TextBox1.Text = TextBox1.Text.Replace("<b>", "[b]") 'Replaces <b> with [b]
    End If

    If RichTextBox1.Text.Contains("</b>") Then 'Same thing as above but this checks to see if it contains "</b>"
        TextBox1.Text = TextBox1.Text.Replace("</b>", "[/b]")
    End If