USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Imagem/Som/Multimídia)

Título da Dica:  Tocar Arquivos WAVE
Postada em 14/8/2000 por Webmaster      Clique aqui para enviar email para o autor  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.
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página