Sie möchten den Text zwischen HTML-Tags in Ihrem Editor einfärben? Versuchen Sie es mal so: Sie benötigen ein RichTextBox-Control und einen CommandButton sowie diesenCode: Private Sub Command1_Click() Dim sPos As Long Dim ePos As Long With RichTextBox1 .Visible = False sPos = 0 Do sPos = .Find("<", sPos + 1) If sPos < 0 Then ePos = .Find("<", sPos + 1) If ePos < 0 Then .SelStart = sPos .SelLength = ePos - sPos + 1 .SelColor = vbBlue sPos = ePos + 1 End If End If Loop Until sPos < 1 .Visible = True End With End Sub Starten Sie Ihr Projekt, schreiben Sie Text in die RTF-Box, den Siezwischendurch mit den HTML-Tags "<" und ">" garnierenund klicken Sie auf den CommandButton. Diese Seite wurde bereits 6.628 mal aufgerufen. |
Neu! sevCommand 4.0 ![]() Professionelle Schaltflächen im modernen Design! Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. Buchempfehlung Tipp des Monats ![]() Dieter Otter PopUp-Menü wird nicht angezeigt :-( In diesem Tipp verraten wir Ihnen, wie Sie Probleme mit PopUp-Menüs umgehen können, wenn diese unter bestimmten Umständen einfach nicht angezeigt werden. vb@rchiv CD Vol.6 ![]() ![]() Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |