Dieser Tipp zeigt, wie sich ein beliebiger HTML-Text, der bspw. dynamisch zur Laufzeit erzeugt wurde, im WebBrowser-Control anzeigen lässt, ohne dass der Text zuvor in einer HTML-Datei gespeichert werden muss. Eine gespeicherte Datei lässt sich bekanntlich über die Navigate-Methode des WebBrowser-Controls laden und anzeigen - was aber, wenn der Text direkt aus einer Stringvariable heraus im WebBrowser angezeigt werden soll? Wie das geht, zeigt nachfolgender Code. Zunächst muss eine leere Seite ohne Inhalt angezeigt werden: WebBrowser1.Navigate "about:blank" Dieses leere Dokument nutzen wir nun, um unseren HTML-Textstring direkt in das Body-Objekt zu schreiben: ' HTML-Textstring in das WebBrowser-Control schreiben WebBrowser1.Document.Body.InnerHTML = sHTML Das Ganze verpacken wir nun in eine kleine Funktion: ''' <summary> ''' Zeigt im WebBrowser-Control einen beliebigen HTML-Text dynamisch zur Laufzeit an ''' </summary> ''' <param name="WebBrowser">WebBrowser-Control</param> ''' <param name="HtmlText">HTML-Text, der angezeigt werden sol</param> Private Sub wbShowHTML(ByVal WebBrowser As WebBrowser, ByVal HtmlText As String) With WebBrowser If IsNothing(.Url) OrElse .Url.AbsoluteUri <> "about:blank" Then ' zunächst eine leere Seite laden .Navigate("about:blank") Application.DoEvents() End If ' HTML-Textstring in das WebBrowser-Control schreiben .Document.Body.InnerHtml = HtmlText End With End Sub Aufrufbeispiel: ' HTML-Text erstellen Dim sHTML As String = "<h1>HTML-Text im WebBrowser-Control</h1>" & _ "<p>Dieser Tipp zeigt, wie sich ein beliebiger HTML-Text, der bspw. dynamisch zur " & _ "Laufzeit erzeugt wurde, im WebBrowser-Control anzeigen lässt, ohne dass der " & _ "Text zuvor in einer HTML-Datei gespeichert werden muss.</p>" ' HTML-Text im WebBrowser anzeigen wbShowHTML(WebBrowser1, sHTML) Dieser Tipp wurde bereits 25.017 mal aufgerufen.
Anzeige
![]() ![]() ![]() (einschl. Beispielprojekt!) Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m. |
vb@rchiv CD Vol.6 ![]() ![]() Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. Tipp des Monats ![]() Dieter Otter Beliebige Zeichen am Anfang und Ende eines Strings entfernen Mit der Trim-Funktion lassen sich nicht nur Leerzeichen, sondern bei Bedarf auch beliebige Zeichen entfernen. Neu! sevEingabe 3.0 ![]() Einfach stark! Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox 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. |