VB 6: come inserire GIF animate in un pro

ciao a tutti sono nuovo, quindi se per caso l'argomento da me richiesto nel tread fosse già stato presentato da qualche altro utente vi prego di scusarmi e reindirizzarmi subito là! [img]smileys/smiley9.gif[/img]

io ho provato a inserire in un mio piccolo progettino delle GIF animate per dare un tocco di simpatia in +, ma, curiosamente, una volta in esecuzione le GIF sono trattate come semplici immagini senza alcuna animazione... [img]smileys/smiley5.gif[/img]
quindi che mi costruisco (o cerco sul web) a fare coloratissime GIF animate se poi non si vedono le mini-animazioni??? [img]smileys/smiley19.gif[/img]

quale potrebbe essere il problema? forse ci vogliono librerie o controlli specifici? oppure VB 6 non supporta animazioni? scusate ma non sono espertissimo, quindi anche se magari la risposta è semplicissima io non so che fare!

questo è la riga di codice con la quale il CommandButton dovrebbe mostrarmi la GIF, ma in effetti mostra solo il primo "fotogramma", statico!

Private Sub CBSP_Click()
PictureSP.Picture = LoadPicture(App.Path & "\SpaceMarine.gif")
End Sub

grazie anticipate!

Sei troppo simpatico!!! prova così

Private Sub CBSP_Click()
set PictureSP.Picture = LoadPicture(App.Path & "\SpaceMarine.gif")

poi se non va, in questo punto aggiungi comandi del tipo
<PictureSP.Play> o <PictureSP. ??? >(Effettivamente dipende dal componete che stai usando, x alcuni è sufficiente il primo comando)
End Sub

P.S. era una vita che non ridevo così

<<<oppure VB 6 non supporta animazioni?>>>
non te la prendere però questa frase mi ha fatto troppo sbellicare.............................

Ciao Budino Simpatico

Ha però mi era sfuggita una cosa:

<ma in effetti mostra solo il primo "fotogramma", statico!>

forse allora devi aggiugere davvero un secondo comando

oppure guarda nelle proprietà se si può attivare opzioni come: Autoplay o altro
Se hai il nome del componente sarebbe meglio.
In uno dei miei parte così:

'***********************************
gif1.FileName = App.Path & "\MyTasto.gif"
'***********************************
gif1.Play
'***********************************
usare <LoadPicture> non sò se sia giusto ,io lo uso per le immagini,icone...