可以用chr函数或者vbCrLf这种表示
网站建设哪家好，找创新互联！专注于网页设计、网站建设、微信开发、微信小程序、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了新巴尔虎左免费建站欢迎大家使用！
chr(10)：换行，相当于vbLf
chr(13)：回车，相当于vbCr
chr(13)+chr(10):回车+换行，相当于vbCrLf
表示ASCII码为8的字符
ASCII值为 8、9、10 和 13 分别转换为退格、制表、换行和回车字符。
Envirement.NewLine ;
dim s as string;
s = '天晴了哇'
s += Envirement.NewLine; ' or s += chr(13) ' s = s+"\n"
// 似乎用环境类的 NewLine兼容性较强些
如果是简单的换行用vbcrlf 或 environment.newline
要获得键盘的回车键用api 的
Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer