Con este código puedes poner un gif animado sin necesidad de ningún otro controlador.... OJo el gift no irá incluido en el ejecutable y tendrás que ponerlo en el mismo path de donde se ejecute o desde alguna carpeta determinada...
Private Sub Form_Load()
WebBrowser1.Navigate "about:<html><body scroll='no' topmargin='0' leftmargin='0' marginwidth='0' marginheight='0'><img src='" & App.Path & "/your.gif'></body></html>"
End Sub
Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)
End Sub
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
End Sub
Otra cosa como trabajará con un browser, tendrás que calcular el tamaño del gift con el del browser si no te saldrán los rolls, de todas formas es muy buena técnica...
Autor
En línea
