行を削除するには？ (ID:86809)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 リッチテキストボックスを使用していています。 勝手に文章が流れて行く(色付き)ので、100行以上になったら最初の1行だけ削除したいのですが、 現状ではこのようなコードにしています。 RichTextBox1.SelStart = 0 RichTextBox1.SelLength = InStr(RichTextBox1.Text, vbCrLf) + 1 RichTextBox1.SelText = "" これでもできるといえばできるのですが、何故か途中から色が一色になってしまいます。 他に1行だけ削除する方法は無いでしょうか。