- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 弱问,切换当前表的代码怎么写 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49928)
-- 发布时间：2014/4/26 0:48:00
-- 弱问,切换当前表的代码怎么写
需要当前表自动切换到需要的地方.
也就是说改变当前表的代码怎么写啊?
maintable切换代码直接一个等号就搞定,,但是currenttable好像没有切换的方法.
各位老师指点一下,我已经查了半天帮助文件了,没有查到
-- 发布时间：2014/4/26 1:19:00
--
不明白您的意思，提示：当前表可能是关联表，不一定是主表！
-- 发布时间：2014/4/26 8:35:00
--
Tables("xxx").Select(- 1,0) \'用- 1是以防该表一行都没有。
-- 发布时间：2014/4/27 1:24:00
-- 好像不对
table的select方法只是选择了某表的区域,但是并没有改变currenttable.
我想要的是这样:我在按下自动录入的按钮后,数据在某一个关联子表里自动录入.但是有可能我的当前表是在另一个表.那么我就看不到数据在相应子表里不停的自动录入的现象了.那我就不能享受那种看着数据不停的自动录入的幸福感了,而且重要的是我不能看到数据录入的进度.
所以,我要求在我按下自动录入按钮后,首先要让数据录入的表变成当前表,也就是要他在屏幕上显示出来,这样在数据录入的时候就能看到数据愉快的跳动了.也能知道数据录入的进度了.
-- 发布时间：2014/4/27 1:26:00
-- 就是要显示关联子表(我那个还是子子表)
我想要的是这样:我在按下自动录入的按钮后,数据在某一个关联子表里自动录入.但是有可能我的当前表是在另一个表.那么我就看不到数据在相应子表里不停的自动录入的现象了.那我就不能享受那种看着数据不停的自动录入的幸福感了,而且重要的是我不能看到数据录入的进度.
所以,我要求在我按下自动录入按钮后,首先要让数据录入的表变成当前表,也就是要他在屏幕上显示出来,这样在数据录入的时候就能看到数据愉快的跳动了.也能知道数据录入的进度了.
-- 发布时间：2014/4/27 2:53:00
--
绕这么多干吗？
maintable = tables("数据录入表")
关联表的话，这样试试：
currenttable = tables("父表.子表")
[此贴子已经被作者于2014-4-27 3:03:56编辑过]
-- 发布时间：2014/4/27 8:59:00
--
指定各类表成为当前表：
MainTable = Tables("客户")
Tables("客户.订单.产品").Grid.Select
Tables("客户").Grid.Select
CurrentTable.Select(- 1,CurrentTable.Cols.Count - 1)
Output.Show(CurrentTable.Name)
MainTable = Tables("订单")
Tables("订单.客户").Grid.Select
CurrentTable.Select(- 1,CurrentTable.Cols.Count - 1)
Output.Show(CurrentTable.Name)
MainTable = Tables("产品")
Tables("产品.订单.客户").Grid.Select
CurrentTable.Select(- 1,CurrentTable.Cols.Count - 1)
Output.Show(CurrentTable.Name)
Forms("窗口1").Controls("Table1").Select
Output.Show(CurrentTable.Name)
-- 发布时间：2014/4/27 9:12:00
--
currentTable可以切换，看7楼代码。
关键
Tables("订单.客户").Grid.Select \'选中表
CurrentTable.Select(- 1,CurrentTable.Cols.Count - 1) \' 选中最后一列，或者某列
-- 发布时间：2014/4/27 21:01:00
-- 这个不行啊
currenttable直接"="某表的话会报错,应该没有这个用发.
此主题相关图片如下：搜狗截图20140427205908.jpg
-- 发布时间：2014/4/27 21:02:00
--
回复9楼。
请看7楼和看8楼