以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何设置在窗口的非副本的Normal中按某键使光标移动窗口中的其它控件上  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=9192)

--  作者:红叶
--  发布时间:2011/3/10 15:05:00
--  如何设置在窗口的非副本的Normal中按某键使光标移动窗口中的其它控件上

如何设置在窗口的非副本的Normal中按某键使光标移动窗口中的其它控件上


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.png
图片点击可在新窗口打开查看

当光标在非副本的Normal中的"商品代码"时,按"D"键后,使光标移动窗口的备注信息框中Textbox1中


--  作者:狐狸爸爸
--  发布时间:2011/3/10 15:10:00
--  

Select

 

选择该控件。

 

示例

 

窗口中有一个按钮,希望单击该按钮能够增加一行,然后将输入焦点移到一个名为“txtName”的文本框中。
为此,可将该按钮的Click事件代码设为:

 

Tables("订单").AddNew()
e.Form.Controls(
"txtName").Select()


--  作者:红叶
--  发布时间:2011/3/10 15:25:00
--  

未能解决,需要实现的是

当光标在非副本的Normal中的"商品代码"时,是按键盘的"D"键后,使光标移动窗口的备注信息框中Textbox1中

不是按窗口中的某按钮使光标移动窗口的备注信息框中Textbox1中
--  作者:狐狸爸爸
--  发布时间:2011/3/10 15:39:00
--  

设置此表的KeyDown事件:

 

If e.KeyCode = Keys.D AndAlso e.Control = True Then
    If Forms("窗口名").Opened Then
          Forms("窗口名").Controls("txtName").Select()
    End If
End If


--  作者:红叶
--  发布时间:2011/3/10 16:49:00
--  

我这样试过,好象不能,订单表和订单明细表通过编号关联,窗口是在关联表的父表订单表中,

要实现的是当光标窗口中的关联表订单明细表(非副本的Normal)中的"商品代码"时,是按键盘的"CTRL+D"键后,使光标移动窗口的备注信息框中Textbox1中

其实我要的结果是在主表的窗口中按TAB键使光标移动,当移动到窗口中的关联表订单明细表(非副本的Normal)中的最后一行的最后一列后,又移动到的备注信息框中Textbox1中

[此贴子已经被作者于2011-3-10 16:51:59编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/3/10 17:00:00
--  

看看这个例子: 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目9.table


--  作者:红叶
--  发布时间:2011/3/10 17:12:00
--  

你给的是什么版的?

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.png
图片点击可在新窗口打开查看
我打不开,需要激活
--  作者:狐狸爸爸
--  发布时间:2011/3/10 17:15:00
--  

我的是商业版,和试用版格式一样啊。

应该不是我的文件的原因,而是恰好你的foxtable快到期了吧。