當你在文本框(Text Box)中輸入完信息然後按 [Enter] 鍵,你就會聽到計算機喇叭發出難聽的“嘀”聲。
你可以通過以下方法避免此聲:
假設文本框為 Text1,在 KeyPress 事件中輸入以下代碼:
Private Sub Text1_KeyPress(KeyAscii As Integer) 'Vb man 2001 'URL: http://goodvbman.yeah.net 'E-mail: [email protected] If KeyAscii = Asc(vbCr) Then KeyAscii = 0 '您要執行的程序內容。 End If End Sub
當你運行程序後,按 [Enter] 鍵就再也不會聽到那難聽的聲音了。