在TextBox的KeyPress事件里面判断:
chr(KeyAscii)=vbCrLf

解决方案 »

  1.   

    在TextBox的KeyPress事件里面判断:
    keyascii=13
      

  2.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
      If KeyAscii = 13 Then
        MsgBox "按了回车键"
      End If
    End Sub
      

  3.   

    我喜欢在keydown事件中判断,keydown比keypress先发生,而且在keydown事件中,可以将keycode参数设为0, 以放弃一次击键.
      

  4.   

    同意footballboy(郑创斌) 
     不过按两次回车键时,会发出声响
    可以加一行代码,应该没写错
     Private Sub Text1_KeyPress(KeyAscii As Integer)
      If KeyAscii = 13 Then
            keyascii=0
           
    ' 写程序    
     End If
    End Sub
      

  5.   

    to:michaelzhao1978(mike) 
    如果你是想屏蔽一次键击,那么得在keydown事件中,设keycode=0
      

  6.   

    用keydown和keypress事件都可以解决,回车键的Ascii码是13。
      

  7.   

    keydown事件不识别keyascii
    而且keycode=0不能屏蔽击键声
    还是keypress事件好一些