Como eliminar el sonido (beep) que emite vb cuando un objeto pierde el foco---

[vcavieres]

Hola tengo un pequeño problema con un beep que se emite cada vez que un objeto del mi proyecto pierde el foco ... es bastante molesto me gustaria saber como eliminar ese sonido

[rafapaskual]

Hola, no se exactamente a que te refieres. Yo solo conozco el beep que suena cuando cambio el foco con la instruccion SendKeys en un evento keypress, la manera de eliminar ese beep es poner KeyAscii=0
No sé si es este el problema, espero te sirva de algo.

Saludos!

[vcavieres]

HOLA GRACIAS .. POR TU RESPUESTA PERO NO LO HE PODIDO SOLUCIONAR
LO EXPLICO MEJOR ...
CADA VEZ QUE INICIO PROGRAMA .. YO LO HAGO ARRANCAR CON EL SETFOCUS EN EL TEXTO QUE CORRESPONDA .. LUEGO DE VALIDAR LA INFORMACION QUE SE ESCRIBIRA EN EL TEXTO (SOLO NUMEROS, SOLO LETRAS, SI EXISTE EN LA MDB... ECT) LE DOY EL SETFOCUS AL TEXTO QUE SIGUE SEGUN LA LOGICA DEL PROGRAMA Y ES AHI CUANDO EL TEXT2.TEXT RECIBE EL FOCO ES CUANDO SUENA EL ODIADO !!!TENN!!!

EJ
Private Sub Text1_KeyPress(KeyAscii As Integer)
If (KeyAscii = 32 And Len(Text1.Text) < 1) Then
KeyAscii = 0
End If
If (KeyAscii >= 97 And KeyAscii <= 122) Or (KeyAscii >= 65 And KeyAscii <= 90) Or KeyAscii = 8 Or KeyAscii = 32 Then
ElseIf KeyAscii = 13 Then
If Text1.Text <> Empty Then
Text2.SetFocus '''' AQUI SE PRODUCE EL SONIDO
Else
MsgBox "Debe ingresar los Nombres del cliente", vbExclamation, "Advertencia"
End If
Else
KeyAscii = 0
End If
End Sub

[rafapaskual]

Hola, pon el keyAscii a 0 justo antes de cambiar el focus.

...
if Text1.Text <> Empty Then
keyAscii=0
Text2.SetFocus '''' AQUI SE PRODUCE EL SONIDO
Else
...

Saludos

[vcavieres]

Hola de nuevo y gracias ,,, dio resultado POR FIN

AGRADECIDO....