Disable beep on enter keypress in textboxes 2

[ribsa3]

Hi,

I was wondering how I can disable the beep when enter is pressed within a textbox. I am currently handling the enter-event with the following snippet of code and would do well with squelching the bell in there:

Private Sub txtCustNo_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtCustNo.KeyPress

If (e.KeyChar = Microsoft.VisualBasic.ChrW(13)) Then

' Have fun here

End if

End Sub





--------------------------------------------------------------------
Do what you wish, as long as it harms no one. That includes yourself.

 

[Dimandja]

If (e.KeyChar = Microsoft.VisualBasic.ChrW(13)) Then
' Turn beep off
e.KeyChar = 0
End if

 

[ribsa3]

Thanks for the suggestion - I actually tried the same thing, but e.KeyChar is read-only so I can't assign a new value to it
:/

-B



--------------------------------------------------------------------
Do what you wish, as long as it harms no one. That includes yourself.

 

[chrissie1]

I would go for this

if Asc(e.KeyChar)= 13 then
   System.Windows.Forms.SendKeys.Send("{TAB}")
   e.Handled = True
endif

Christiaan Baes
Belgium

If you want to get an answer read this FAQ faq796-2540
There's no such thing as a winnable war - Sting

 

[JohnYingling]

Put it in KeyPress.
If (e.KeyChar = Convert.ToChar(13)) Then
e.Handled = True
End if

http://www.VBResizer.com

Forms/Controls Resizing/Tabbing

http://www.VBCompare.com

Compare Code

http://www.VBSortGen.com

Generate Sort Class in VB

http://www.Vbcompare.com/Check.Htm(1979

Check To MS)

 

[ribsa3]

Yay



--------------------------------------------------------------------
Do what you wish, as long as it harms no one. That includes yourself.

 

[dalvarezmtz]

Heeeelp!!!

There is a beep whenever i press enter at a textbox..
how can i get rid of it...

Here is my code.. hope anyone knows..

thanks in advance guys....

Private Sub txtfrecval_Keydown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtfrecval.KeyDown
If e.KeyCode = Keys.Enter Then
txtvalfrec.Focus()
e.Handled = True
End If
End Sub
Private Sub txtvalfrec_Keydown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtvalfrec.KeyDown
If e.KeyCode = Keys.Enter Then
Me.frecuencias()
txtfrecval.Clear()
txtvalfrec.Clear()
txtfrecval.Focus()
e.Handled = True
End If
End Sub

 

[chrissie1]

e.handled = true only works in the keypress event so transfer your code to there

Christiaan Baes
Belgium

If you want to get an answer read this FAQ faq796-2540
There's no such thing as a winnable war - Sting