Rich text box print output missing lines

[David RH]

Hello

I have a rich text box that I print the contents of using the following code

Private Sub cmdPrint_Click()

Printer.Font.Name = "Courier New"
Printer.Font.Size = 6
Printer.Print RichTextBox1.Text

Printer.EndDoc

End Sub

The problem that I'm having is that randonly there is a line that is blank. The text that should be on that line is just gone with a blank line where it should be.
The line in question is a line of dashes that I use as a separator. There is one of these every 7th line. The missing lines are not at a page break and appear to be competely random. Sometimes there will be none for several pages then up it pops.

Any ideas?

Thanks

David