VB中文本框换行--------急!!!

我本来是第一个回答的，为了把第二，三个问题也解决，修改答案后就成最下边一个了

1--------------------------------------------------------------

把Text4的MultiLine属性设置成True

复制下边的代码：

Private Sub Form_Load()

Text4Text = ""

End Sub

Private Sub Command1_Click()

Text4Text = Text4Text + Text1Text + Text2Text + Text3Text + vbCrLf

End Sub

'下边是为了保障Text4的焦点处于最后，试着去掉下边这三行，观察一下效果，你会发现这三行也很重要

Private Sub Text4_Change()

Text4SelStart = Len(Text4Text)

End Sub

2--------------------------------------------------------------

如果是用List也可以，下边就是双击复制该表项内容

Private Sub List1_DblClick()

ClipboardClear

ClipboardSetText List1List(List1ListIndex)

MsgBox "该项内容已经复制到剪贴板，请用Ctrl+V粘贴"

End Sub

3--------------------------------------------------------------

richtextbox比textbox好用，比如richtextbox还能每行字体颜色不同，显示等，不过你这里用不着它的这些复杂用法

首先点“工程”，“部件”，找到“Microsoft Rich textbox Contral 60”勾上，点“确定”，然后就可以在工具那里看到它了，在窗体上画RichTextBox1

RichTextBox1 就不用设置MultiLine了，代码的写法和用Text4差不多

复制下边的代码：

Private Sub Form_Load()

RichTextBox1 = ""

End Sub

Private Sub Command1_Click()

RichTextBox1Text = RichTextBox1Text + Text1Text + Text2Text + Text3Text + vbCrLf

End Sub

Private Sub RichTextBox1_Change()

RichTextBox1SelStart = Len(RichTextBox1Text)  '保障RichTextBox1的焦点处于最后

End Sub

上边的代码我都测试过了，完全直接可用！！ 看！

String txt=new File("文件地址")GetString()这个方法我记不住。。你自己看看 返回是string类型

然后richetextboxtext=txt就好了 soo easy！

SystemDrawingFont oldFont = richTextBox1SelectionFont;

if (!oldFontItalic)

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle | FontStyleItalic);

else

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle &~ FontStyleItalic);

richTextBox1Focus();

SystemDrawingFont oldFont = richTextBox1SelectionFont;

if (!oldFontUnderline)

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle| FontStyleUnderline);

else

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle & ~FontStyleUnderline);

richTextBox1Focus();

SystemDrawingFont oldFont = richTextBox1SelectionFont;

if (!oldFontUnderline)

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle| FontStyleUnderline);

else

richTextBox1SelectionFont = new Font(oldFont, oldFontStyle & ~FontStyleUnderline);

richTextBox1Focus();

这应该是用RichTextBox 控件结合窗体菜单的编写做成的界面。

RichTextBox 控件

RichTextBox 控件不仅允许输入和编辑文本，同时还提供了标准 TextBox

控件未具有的、更高级的功能。

        int start = 0;  //查找的起始位置

        private void textBox1_TextChanged(object sender, EventArgs e)

        {

            start = 0;  //textBox1内容改变说明将要查找新字符，此时初始化start

        }

        private void button1_Click(object sender, EventArgs e)

        {

            if (textBox1TextLength == 0) { return; }   //判断查找内容是否为空

            richTextBox1Focus();                                //设置焦点

            start = richTextBox1TextIndexOf(textBox1Text, start);    //本次查找位置

            if (start !=-1) //如果为-1表示未找到

            {

                richTextBox1Select(start, textBox1TextLength);    //选中文本

                start = richTextBox1TextIndexOf(textBox1Text, start) + textBox1TextLength;  //设置下次查找位置

            }

            else

            {

                MessageBoxShow("查找结束");    //start=-1 说明未找到字符或者已经查找到结尾

                start = 0;

            }

        }

以上就是关于VB中文本框换行--------急!!!全部的内容，包括:VB中文本框换行--------急!!!、怎么将讲txt文件里的内容显示到richtextbox里面、C#怎么将加载的图片放入图像集合编辑器等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！