if key = 13 then
   key = 0
end if

解决方案 »

  1.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
    if keyascii=13 then keyascii=0
    End Sub
      

  2.   

    在textbox控件或者form的KeyPress事件过程中(一定要这个事件过程),加上下面代码:If KeyASCII=VBKeyReturn Then
      KeyASCII=0
    End If
      

  3.   

    如果在form的keypress中写这段代码,要设置form的keypreview为true。
      

  4.   

    谁能告诉我如果不设keyascii=0,它为什么会叫呢
      

  5.   

    VB中,Textbox控件默认不接受回车键,Beep的意思是提醒用户:“你的击键不是期望的”,就相当于你在不该输入回车键的地方敲击了回车键。