以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]紧急求助,输入焦点定位问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65596)

--  作者:99473593
--  发布时间:2015/3/18 21:03:00
--  [求助]紧急求助,输入焦点定位问题


图片点击可在新窗口打开查看此主题相关图片如下:99999999.jpg
图片点击可在新窗口打开查看

 

如上面的窗口,我想实现

1.打开窗口后,输入焦点自动定位到DropBox1控件上,

2.离开其他控件如TextBox1TextBox2后焦点有自动定位到DropBox1上,

3.在DropBox1中输入内容后回车,能清空DropBox1的当前内容,并把焦点定位到DropBox1

代码要怎么写才能实现啊。e.Form.Controls("DropBox1").Select()好像没用,DropBox1控件是用条码机录入的

[此贴子已经被作者于2015/3/18 21:09:36编辑过]

--  作者:有点甜
--  发布时间:2015/3/18 21:04:00
--  
 呃,什么意思,哪个控件,什么功能
--  作者:99473593
--  发布时间: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


--  作者:99473593
--  发布时间: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

 


--  作者:99473593
--  发布时间:2015/3/18 22:00:00
--  
还有,是不是上面的代码把其他控件如TextBox1TextBox2这些都锁死了,好像不能获取输入焦点了
--  作者:有点甜
--  发布时间:2015/3/18 22:02:00
--  

 2、leave事件,是Textbox1、TextBox2的啊

 

 3、Keydown,是DropBox1事件的啊

 

做不好,就上传例子。