Wie verhindere ich einen automatischen Zeilenumbruch in einer RichTextBox?

Dazu muß die Eigenschaft RightMargin der RichTextBox auf einen hohen Wert gesetzt werden:

With RichText1
    .RightMargin = 32000
End With

Listing 1: Rand verschieben

Mit der obigen Anweisung wird der rechte Rand nach rechts verschoben, die Grenze liegt nun bei 32000 Twips.