从品牌网站建设到网络营销策划,从策略到执行的一站式服务
先把Form窗体的KeyPreview设置为True
创新互联专注为客户提供全方位的互联网综合服务,包含不限于成都网站建设、成都做网站、虎林网络推广、微信小程序、虎林网络营销、虎林企业策划、虎林品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;创新互联为所有大学生创业者提供虎林建站搭建服务,24小时服务热线:18982081108,官方网址:www.cdcxhl.com
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then '回车键
SendKeys vbTab '模拟键盘发送TAB键
End If
End Sub
如果是简单的换行用vbcrlf 或 environment.newline
要获得键盘的回车键用api 的
Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer
可以用chr函数或者vbCrLf这种表示
chr(10):换行,相当于vbLf
chr(13):回车,相当于vbCr
chr(13)+chr(10):回车+换行,相当于vbCrLf
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图