[VB6] Inserire suono durante l'esecuzione del form

[lomiz]

Come faccio ad inserire un suono durante l'esecuzione del form?
Grazie

[mardok30]

Prova con:

Declare Function PlaySound Lib "winmm.dll" (ByVal szSound As Char(), ByVal hMod As IntPtr, ByVal flags As PlaySoundFlags) As Integer

<Flags()> Public Enum PlaySoundFlags
        SND_SYNC = &H0
        SND_ASYNC = &H1
        SND_NODEFAULT = &H2
        SND_MEMORY = &H4
        SND_LOOP = &H8
        SND_NOSTOP = &H10
        SND_NOWAIT = &H2000
        SND_ALIAS = &H10000
        SND_ALIAS_ID = &H110000
        SND_FILENAME = &H20000
        SND_RESOURCE = &H40004
    End Enum

PlaySound(FILE_NAME, IntPtr.Zero, PlaySoundFlags.SND_LOOP)

[lomiz]

Grazie!

[lomiz]

Scusami ma con questo codice mi da 4 errori:
-Declare Function...
-<Flags()>...
-Playsound...(che ho pensato di cambiare in a=playsound)
-File_Name



code:


Declare Function PlaySound Lib "winmm.dll" (ByVal szSound As Char(), ByVal hMod As IntPtr, ByVal flags As PlaySoundFlags) As Integer

<Flags()> Public Enum PlaySoundFlags
SND_SYNC = &H0
SND_ASYNC = &H1
SND_NODEFAULT = &H2
SND_MEMORY = &H4
SND_LOOP = &H8
SND_NOSTOP = &H10
SND_NOWAIT = &H2000
SND_ALIAS = &H10000
SND_ALIAS_ID = &H110000
SND_FILENAME = &H20000
SND_RESOURCE = &H40004
End Enum

PlaySound(FILE_NAME, IntPtr.Zero, PlaySoundFlags.SND_LOOP)




Non so proprio come fare!!!!!!
help me!

[LMondi]

lomiz, sei capace di usare il file di risorse?
Se si, o se decidi di usarlo (ti consiglio in tal senso) ti posto il codice per riprodurre un suono caricandolo dal predetto file.
Fammi sapere.

[ranza!!!123]

sbaglio o nel file risorse puoi mettere file molto piccoli?!?
ditemi voi...nn ricordo bene....

[mardok30]

Scusami ma con questo codice mi da 4 errori:
-Declare Function...
-<Flags()>...
-Playsound...(che ho pensato di cambiare in a=playsound)
-File_Name

Scusami tu perché il metodo che ti ho postato può essere usato così com'è in Vb.Net, per usarlo in VB6 bisogna fare qualche piccola modifica. Comunque segui questo sito:
http://www.visual-basic.it/articoli/fddAudio.htm

[LMondi]

ranza!!!123,
MSDN NON dà riferimenti in tal senso e poi non credo che si voglia suonare un'intera sinfonia, sich ... VVoVe: