gpt4 book ai didi

vb.net 自动创建结束标签

转载 作者:行者123 更新时间:2023-12-04 16:23:27 27 4
gpt4 key购买 nike

我想在 vb.net 中创建一个 WYSIWIG html edditor 并有一个丰富的文本框控件我试图为每个创建的打开标签自动创建结束标签但不知道如何去做?

例如,如果用户键入 htmy edditor 将自动放置在它的正下方

        Dim startingPoint As Integer = -1
Do
startingPoint = RichTextBox1.Find("<Body>", startingPoint + 1, RichTextBoxFinds.None)
If (startingPoint >= 0) Then
RichTextBox1.SelectionStart = startingPoint
RichTextBox1.SelectionLength = "<Body>".Length
RichTextBox1.SelectionColor = Color.Blue

RichTextBox1.AppendText(Environment.NewLine & Environment.NewLine & "</Body>")

End If
Loop Until startingPoint < 0

最佳答案

我只是给你一个想法,当然你必须修改它,但我认为这会给你一个开始。

private void richTextBox1_TextChanged(object sender, EventArgs e)
{
string Text = richTextBox1.Text.Trim();
int LastltIndex = Text.LastIndexOf('<');
int LastgtIndex = Text.LastIndexOf('>');

if ((LastltIndex < LastgtIndex) & LastltIndex != -1)
{
string Tag = Text.Substring(LastltIndex, (LastgtIndex - LastltIndex) + 1);
richTextBox1.Text = richTextBox1.Text.Trim() + "\n" + Tag;
richTextBox1.Select(richTextBox1.Text.Length, richTextBox1.Text.Length);
}
}

关于vb.net 自动创建结束标签,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/22320372/

27 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com