フォーム上に2つのリッチテキストボックスがあります(RichTextBox1とRichTextBox2)。それぞれに表示されている文字には文字の色や太さなどの属性もあります。
その2つのリッチテキストボックスの内容を繋げてRichTextBox1に表示しようと思って、
RichTextBox1.TextRTF = RichTextBox1.TextRTF & RichTextBox2.TextRTF
としたのですが、つながってくれませんでした。
RichTextBox1.Text = RichTextBox1.Text & RichTextBox2.Text
としたらつながるのですが、属性が全て解除された状態でつながってしまいます。
属性も残したままつなげるにはどうすればいいのでしょうか？ よろしくお願い致します。
これでどうでしょう。
RichTextBox1.SelStart = Len(RichTextBox1.Text)
RichTextBox1.SelRTF = RichTextBox2.TextRTF
魔界の仮面弁士さん、ありがとうございました。
明け方までずっと悩んでいて、半ばあきらめかけていたので、本当に感動です。
助けていただきましてありがとうございました。