怎样按回车键转移控件焦点

snow000 2003-12-26 02:15:28

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 9
End If
End Sub
这样不行，怎么才可以怎样按回车键转移控件焦点，请高手指点！

...全文

82 2 打赏收藏举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

现在还是人类 2003-12-26

打赏
举报

回复

来晚了

hhjjhjhj 2003-12-26

打赏
举报

回复

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
sendkeys chr(9)
End If
End Sub

protected override bool ProcessDialogKey(Keys keyData) { if (keyData == Keys.Enter && !(this.ActiveControl is Button)) { keyData = Keys.Tab; } return base.Proce

用回车键实现MFC对话框中TAB键控制输入焦点在控件中跳转的效果近日在为一个数据应用写数据输入界面，大量的编辑框要想实现快速的输入就是有设计良好的符合工作流程的TAB键序。相信，不少的人在使用具有大量编辑框的程序时都有这样的想法和感概。而我这个对话框界面主要输

用方向键转移焦点及回车键触发　　窗口的key事件：　　GRAPHICOBJECT cb_control //定义环境变量　　CHOOSE CASE KEY 　　　　　 CASE keyrightarrow! //按光标右键右移焦点　　　　　　　　keybd_event(9,0,0,0) 　　　　　　　　keybd_event(9,0,2,0) 　　　　　 CASE keydownar

为了使EDIT控件能收到回车键 属性mutiline要改为TRUE 方法1 ====================================================================== WNDPROC prevProc; LRESULT CALLBACK NewEditProc ( HWND hwnd, UINT uMsg, WPARAM wP

procedure Tfmlogin.FormKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; perform(wm_nextdlgctl,0,0); end;end;

7,788

社区成员

197,583

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章