Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) _ As Long 'Per esempio, per suonare il wave dello svuotamento del cestino, 'basta utilizzarla cosi': Dim Ret As Long Ret = sndPlaySound("EmptyRecycleBin", SND_ALIAS Or SND_SYNC) Si deve usare la funzione API sndPlaySound: questa e' la sua dichiarazione: |