热心网友
如果是一个控件,比如文本框之类的,只需要在它的KEYPRESS事件中输入代码:Private Sub text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then‘在此输入你要的反应End IfEnd Sub如果是想一个按钮对回车键作出反应,只需要将它的DEFAULT属性设为TRUE即可。如果你是不管焦点在什么地方都对回车键作出同样的反应,则设计时通过属性窗口将它的KeyPreview属性设置成true,然后在它的KeyPress事件中输入代码:Private Sub Form_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then‘在此输入你要想的反应。End IfEnd Sub
热心网友
你说明白是怎么回事啊a
热心网友
回车的AscII码是13.
热心网友
将form的KeyPreview属性设置成truePrivate Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then MsgBox "你按了回车键", vbInformation, "information" End IfEnd SubPrivate Sub Form_Load() Me.KeyPreview = TrueEnd Sub
热心网友
是自然的回应啊!