Oppure

Loading
30/04/09 15:55
al3x90
Ciao a tutti!
Esiste un modo per riprodurre suoni wav in visual basic 6?
Se si...Come faccio a far partire un suono, ad esempio quando clicco su una button?
Grazie =)
aaa
30/04/09 16:20
GrG
usa l'mmcontrol...(googla per info)
aaa
01/05/09 12:51
al3x90
Ho inserito questo codice in "(generale)":

Const SND_ASYNC = &H1
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal _
lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

E quest'altro nel form che m'interessa che il suono venga riprodotto:

Private Sub Form_Load()
PlayWAV ("c:\prova.wav";)
End Sub


Nel momento dell'esecuzione, quando carico il form mi esce il seguente errore:

Errore di compilazione:
Sub o function non definita



:d nn riesco a uscirne fuori :noway:
aaa
01/05/09 13:09
ruggy94
Postato originariamente da al3x90:

Ho inserito questo codice in "(generale)":

Const SND_ASYNC = &H1
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal _
lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

E quest'altro nel form che m'interessa che il suono venga riprodotto:

Private Sub Form_Load()
PlayWAV ("c:\prova.wav";)
End Sub


Nel momento dell'esecuzione, quando carico il form mi esce il seguente errore:

Errore di compilazione:
Sub o function non definita



:d nn riesco a uscirne fuori :noway:


Mi sembra logico. La sub PlayWAV non è dichiarata da nessuna parte. Credo che tu volessi scrivere PlaySound invece, quindi:
Private Sub Form_Load()
PlaySound("c:\prova.wav")
End Sub
aaa
01/05/09 13:24
al3x90
E tutto liscio mica poteva andare :D

Come carico il form in esecuzione mi da
"argomento non facoltativo"

:heehee:

E mi da errore in

Private Sub Form_Load()
Ultima modifica effettuata da al3x90 01/05/09 13:26
aaa
01/05/09 13:49
ruggy94
Postato originariamente da al3x90:

E tutto liscio mica poteva andare :D

Come carico il form in esecuzione mi da
"argomento non facoltativo"

:heehee:

E mi da errore in

Private Sub Form_Load()

Eh, si. Perchè mancano due parametri da fornire alla funzione.
Se guardi su questo link trovi la descrizione di tutti i possibili flags con la relativa funzione e anche qualche esempio
vbscuola.it/toolbox/…
aaa
01/05/09 14:20
al3x90
Ancora una domanda :)

Ho inserito questa parte di codice nel form_load

Call PlaySound("C:\prova.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC)

E il suono viene riprodotto! =)

Però.......Scusami ancora :) e scusa la mia pessima preparazione...Ma sono alle prime armi, e alcuni concetti mi sono chiari, altri no...
Io come in un precedente post (al quale hai risolto tu la mia domanda :) ) avevo chiesto come facevo a visualizzare un messaggio in una text, io ora però vorrei mandare in play il suono al posto della text.... SI quando apro il form (form2) ... Ma anche se viene soddisfatta una condizione...
Il codice da me realizzato è questo...

Private Sub Option22_Click()
If Option22 = True Then form2.Call PlaySound("C:\prova.wav", ByVal 0&, SND_FILENAME Or SND_ASYNC)

Dove sbaglio?!




:hail:
aaa
01/05/09 14:39
ruggy94
Postato originariamente da al3x90:
scusa la mia pessima preparazione

Non preoccuparti :k: Nessuno nasce imparato :rofl: :rofl:

Comunque tornando al problema, non ho capito molto bene. Vuoi che quando si clicca un Option parta la musica?
aaa