Visual Basic - desactivar tecla o parar un wav

Life is soft - evento anual de software empresarial
   
Vista:

desactivar tecla o parar un wav

Publicado por Quiros (1 intervención) el 03/03/2010 12:00:16
Buenas estoy desarrollando una aplicción que llama un wav co una pulsacion de teclado numerico , lo hago asi

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Option Explicit

Private Sub Form_Keydown(KeyCode As Integer, Shift As Integer)

Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_LOOP = &H8
Const SND_NOSTOP = &H10

If KeyCode = vbKeyNumpad8 Then Call sndPlaySound("c:\1.wav", SND_ASYNC + SND_LOOP)

Todo funciona correctamente , el archivo 1.wav que ejecuto es una sola nota y se reproduce constantemente como deseo , el caso es que si sigo manteniendo la tecla pulsada (que lo hago) se produce un chasquido cada vez que empieza a reproducirse de nuevo el wav , mi intencion es que sonase sn chasquido , se me ocurre que tiene que haber una forma que ignore la tecla hasta que se pulse otra ,eso me serviria o que se anulase la tecla si ese wav se esta reproduciendo que tambien me serviria , el caso es que no se como hacer ninguna de estas cosas , tambien podria probrar con el reproducir con otro metodo distinto a este.

Un saludo y graciñas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Procesos
- Matrizes
- Iconos en los menús