- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]紧急求助，输入焦点定位问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65596)
-- 发布时间：2015/3/18 21:03:00
-- [求助]紧急求助，输入焦点定位问题
此主题相关图片如下：99999999.jpg
如上面的窗口，我想实现
1.打开窗口后，输入焦点自动定位到DropBox1控件上，
2.离开其他控件如TextBox1，TextBox2后焦点有自动定位到DropBox1上，
3.在DropBox1中输入内容后回车，能清空DropBox1的当前内容，并把焦点定位到DropBox1上
代码要怎么写才能实现啊。e.Form.Controls("DropBox1").Select()好像没用，DropBox1控件是用条码机录入的
[此贴子已经被作者于2015/3/18 21:09:36编辑过]
-- 发布时间：2015/3/18 21:04:00
--
呃，什么意思，哪个控件，什么功能
-- 发布时间：2015/3/18 21:13:00
--
不好意思，刚没写上需求
现在请帮我看看
-- 发布时间：2015/3/18 21:20:00
--
1、afterLoad
e.Form.Controls("DropBox1").Select()
2、Leave事件
e.Form.Controls("DropBox1").Select()
3、keydown事件
If e.KeyCode = 13 Then
e.Sender.Text = ""
e.Sender.Select()
e.Cancel = true
End If
-- 发布时间：2015/3/18 21:47:00
--
以下是引用有点甜在2015/3/18 21:20:00的发言：
1、afterLoad
e.Form.Controls("DropBox1").Select()
2、Leave事件
e.Form.Controls("DropBox1").Select()
3、keydown事件
If e.KeyCode = 13 Then
e.Sender.Text = ""
e.Sender.Select()
e.Cancel = true
End If
不好意思，红色没看懂，13代表的是。。。。。
-- 发布时间：2015/3/18 21:48:00
--
13的意思回车
http://www.foxtable.com/help/topics/0621.htm
-- 发布时间：2015/3/18 22:00:00
--
还有，是不是上面的代码把其他控件如TextBox1，TextBox2这些都锁死了，好像不能获取输入焦点了
-- 发布时间：2015/3/18 22:02:00
--
2、leave事件，是Textbox1、TextBox2的啊
3、Keydown，是DropBox1事件的啊
做不好，就上传例子。