當你在文本框(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] 鍵就再也不會聽到那難聽的聲音了。