🚀 go-pugleaf

"Andreij" <andreijlontanoff(hai visto mai?)@katamail.com> ha scritto nel
messaggio news:HJxgc.70288$hc5.3058313@news3.tin.it...
> Ciao, sto tentando di creare un piccolo gioco per mio figlio. Ho messo una
> serie (tre)di image che raffigurano animali. Vorrei che quando ci passa su
> con il mouse (o ci clicca) fosse possibile ascoltare la voce di
> quell'animale (file wav che ho nella cartella C:\documenti\suoni).
>
> Qualcuno pu� indirizzarmi almeno?
>
> Ciao e grazie
>
> Andreij
>
>
Un'altra soluzione potrebbe essere, dopo aver inserito il componente
Microsoft Multimedia Control dall'elenco dei componenti:
'**** imposta questa sub su generale dichiarazioni della Form1
Sub play_wav(nfile As String)
Form1.MMControl1.FileName = nfile & ".wav"
Form1.MMControl1.Command = "close"
Form1.MMControl1.Command = "open"
Form1.MMControl1.Command = "Play"
End Sub

Private Sub Picture1_Click()
'*** il comando richiama l'esecuzione del file.wav dal nome "cane.wav"
Form1.play_wav ("cane")
End Sub

Private Sub Form_Load()
'*** questa istruzione, nascondel'oggetto mmcontrol all'avvio
Form1.MMControl1.Visible = False
End Sub