寻高打！如何将几个RichText文档同并为一个RichText文档？？？急急！

[创业码农]

使用RichTextBox控件！！！

[创业码农]

老兄！这个方法不可行的，我早试过了。
每个TextRTF都有自己的文件头的。。。
不过，谢谢你了只是不能给你分了！
对了你可VBA，引用WORD来解决问题！

[prefix]

richtextbox1.loadfile "c:\1.rtf"
richtextbox2.loadfile "c:\2.rtf"
RichTextBox1.SelStart = Len(RichTextBox1.Text)
RichTextBox1.SelRTF = RichTextBox2.TextRTF

[prefix]

RichTextBox1.LoadFile ("C:\Abc1.Rtf")
RichTextBox2.LoadFile ("C:\Abc2.Rtf")
RichTextBox1.SelStart=len(RichTextBox1.text)
RichTextBox1.Selrtf=RichTextBox2.TextRtf
这样该行了吧。

[FrankWang]

我有一个例子，主要是用虚拟键盘完成！需要的请给我E-Mail:
[e-mail]

[shines77]

Private Sub Form_Load()
'首先读入几个RTF文档
RichTextBox1.LoadFile ("C:\Abc1.Rtf")
RichTextBox2.LoadFile ("C:\Abc2.Rtf")
RichTextBox3.LoadFile ("C:\Abc3.Rtf")
'合并几个RichText
RichTextBox1.TextRTF = RichTextBox1.TextRTF + RichTextBox2.TextRTF + RichTextBox2.TextRTF
End Sub