Rubrik: TextBox, ListBox & ComboBox | 15.07.02 |
Farbiger Text in der RichTextBox VB-Version: VB5, VB6 | ||
Views: 20.110 |
Immer wieder wird gefragt: Wie bekomme ich den Text in einer RichTextBox mehrfarbig? Dies erreichen Sie über die SelColor-Eigenschaft.
Codebeispiel 1: Der Text befindet sich bereits in der RTF-Box
With RichTextBox1 .Text = "rot blau" ' Zeile nachträglich einfärben .SelStart = 0 .SelLength = 3 .SelColor = vbRed .SelStart = 4 .SelLength = 4 .SelColor = vbBlue End With
Codebeispiel 2: Der Text soll während des Einfügens gefärbt werden
With RichTextBox1 .SelColor = vbRed .SelText = "rot " .SelColor = vbBlue .SelText = "blau" End With
Codebeispiel 3: Der Anwender soll sich die Farbe selbst aussuchen und seinen Text einfärben wie er will. Hierzu wird dasCommonDialog-Steuerelement benötigt.
CommonDialog1.ShowColor RichTextBox1.SelColor = CommonDialog1.Color