|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Imagem/Som/Multimídia)
|
|
 |
Título da Dica: Tocar Arquivos WAVE
|
 |
|
|
|
Postada em 14/8/2000 por Webmaster
webmaster@vbweb.com.br
Public Declare Function sndPlaySound Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As _
String, ByVal uFlags As Long) As Long
Public Enum SndPlayFlags
SND_SYNC = &H0
SND_ASYNC = &H1
SND_NODEFAULT = &H2
SND_MEMORY = &H4
SND_LOOP = &H8
SND_NOSTOP = &H10
End Enum
Public Sub PlaySound(File As String, Optional Flags _
As SndPlayFlags)
If File = "" Then
Call sndPlaySound(0&, 0)
Else
Call sndPlaySound(File, Flags)
End If
End Sub
'P/ tocar o som, utilize:
PlaySound "C:\Som.WAV"
'P/ parar o som, utilize:
PlaySound ""
P.S.: Quando for tocar um som, você pode passar alguma opção no parâmetro Flags. As opções são:
* SND_SYNC => Toca o WAVE sincronizado (default).
* SND_ASYNC => Toca o WAVE sem sincronismo.
* SND_NODEFAULT => Não usa o som padrão.
* SND_MEMORY => Direciona o IpszSoundName para o lugar de um arquivo na memória.
* SND_LOOP => Toca o WAVE em looping. Até q você mande-o parar.
* SND_NOSTOP => Não para o som que estiver tocando.
|
|
|
|
|
