Ciao a tutti, premesso che non conosco molto bene VB, ho un piccolo problema da risolvere.
Ho creato una form di partenza, da cui, tramite un pulsante, devo lanciare un filmato MPEG. Il filmato viene aperto, ma rimane "iconizzato", non viene cioè aperto alla dimensione effettiva. Come devo fare???
Siccome ho necessità di risolvere il problema al più presto, vi allego (anche per vedere se il mio metodo sia corretto o meno) il codice del PGM che ho realizzato con VB 6.0 :
Grazie a tutti
Private Sub Dakar_Click()
On Error Resume Next
Dim Name_MPG As Long
Name_MPG = Shell(App.Path & "\mplayer2.exe Dakar.mpg")
Hide
Do
AppActivate Name_MPG, True
If Err <> 0 Then Exit Do
Loop
Show
End Sub
Fabio
