How To Disable the ENTER Key BEEP in a VB Text Box (140882)


The information in this article applies to:

  • Microsoft Visual Basic Professional Edition, 16-bit, for Windows 4.0
  • Microsoft Visual Basic Professional Edition, 32-bit, for Windows 4.0
  • Microsoft Visual Basic for Applications 5.0
  • Microsoft Visual Basic for Applications 6.0
This article was previously published under Q140882

SUMMARY

In a Microsoft Visual Basic for Windows text box, the ENTER key causes a warning beep to sound only if the MultiLine property is set to False (the default) and the Warning Beep option is selected in the Sound dialog box of the Windows Control panel.

To disable the beep, in the KeyPress event procedure for the text box, set the value of KeyAscii (which is a parameter passed to KeyPress) equal to zero (0) when the user presses the ENTER key.

MORE INFORMATION

Specifically, use an IF statement to trap the ENTER key and the set KeyAscii to zero (0). Setting the value to zero before the event procedure ends prevents Windows from detecting that the ENTER key was pressed and prevents the warning beep. This behavior is by design and is due to the fact that a non-multiline text box is a Windows default class of edit box.

Example

The following code will prevent the beep: 
   ' (Set Multiline property to False).

   Private Sub Text1_KeyPress (KeyAscii as Integer)
      If KeyAscii=13 Then
         KeyAscii=0
      End If
   End Sub
Modification Type:MinorLast Reviewed:3/14/2005
Keywords:kbhowto KB140882
©2004 Microsoft Corporation. All rights reserved.