ich möchte gerne animierte GIF-Dateien auf einer Userform darstellen und weiß
nicht wie, es sind z.B. zwei blinkende Lämpchen die je nach Wert in Textbox1
eingegeben wird auftauchen sollen.
Hätte da jemand ein Beispiel für mich?
Gruß
Ossi
'Funktioniert ab dem Internet-Explorer 4.0. Dazu muss die
'WebBrowser-ActiveX-Komponente in das Projekt eingebunden werden.
'Werkzeugsammlung links klichen, Zusätzliche Steuerelemente ...
'wählen und Microsoft Webbrowser markieren. Dieses Stuerelement
' 'WebBrowser1' verwenden.
Option Explicit
Const strImgPath As String = "C:\Temp\Pfeil.gif"
Private Sub UserForm_Initialize()
WebBrowser1.Navigate "about:<html><body scroll='no'>" & _
"<img src=" & strImgPath & "></img></bodyY></html>"
End Sub
Mit freundlichen Grüßen, GraFri