实际键入和代码添加所产生的回车不一样吗?

Question

我有一个text控件,如果在里面敲一个回车 会弹出一个窗口 "已键入回车"如果我通过代码在text控件里加入回车 比如说text1.text=string1+chr(10)+chr(13)但是执行完这段代码后 不会弹出窗口 "已键入回车"难道实际键入的和代码添加所产生的回车不一样吗请高人解释下 拜谢

Answer 1

Option ExplicitPrivate Sub Command1_Click()
    Text1.SetFocus
    SendKeys ("{Enter}")
End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
    MsgBox "已键入回车"
End If
End Sub如果我通过代码在text控件里加入回车 比如说text1.text=string1+chr(10)+chr(13)
在代码里加入回车的判断，你这样写是错误的，这样的写法是给TEXT赋值的时候加个回车换行，和模拟按键没有任何关系

Answer 2

multiline=truePrivate Sub Text1_Change()
If InStr(1, Text1.Text, Chr(10) & Chr(13)) > 0 Then
MsgBox "已键入回车"End If
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 
http://feiyun0112.cnblogs.com/

Answer 3

我试下CSDN的阅读器好不好用
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) http://feiyun0112.cnblogs.com/

Answer 4

我试下CSDN的阅读器好不好用
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) http://feiyun0112.cnblogs.com/

Answer 5

我试下CSDN的阅读器好不好用
  
我总在傻Ａ和傻Ｃ之间徘徊

Answer 6

CSDN的阅读器我发出帖子了，但是看不到自己的回复呀还有我刚才发了3个回复，只出来一个