Foxtable(狐表)用户栏目专家坐堂 → 关于Doubleclick问题


  共有4173人关注过本帖树形打印复制链接

主题:关于Doubleclick问题

帅哥哟,离线,有人找我吗?
xh2207
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:190 积分:1593 威望:0 精华:0 注册:2013/1/6 19:46:00
关于Doubleclick问题  发帖心情 Post By:2014/1/9 11:27:00 [只看该作者]

现有三个窗体,分别是入仓窗体、出仓窗体、工程名称窗体。如何修改工程名称窗体的Doubleclick代码,实现如下功能:

1、在入仓窗体主表中单击项目名称,即打开工程名称窗体,在工程名称窗体中双击选中的行,将行的内容填入入仓窗体主表当前行中。

2、在出仓窗体主表中单击项目名称,即打开工程名称窗体,在工程名称窗体中双击选中的行,将行的内容填入出仓窗体主表当前行中。

我目前解决的方法是:建立入仓工程名称窗体和出仓工程名称窗体,分别在出入仓主表中打开入仓工程名称窗体和出仓工程名称窗体,虽然能达到功能要求,但不算最好。请专家指教。


 回到顶部
帅哥哟,离线,有人找我吗?
xh2207
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:190 积分:1593 威望:0 精华:0 注册:2013/1/6 19:46:00
  发帖心情 Post By:2014/1/9 11:28:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新成ok_201401090955.zip

 

现有三个窗体,分别是入仓窗体、出仓窗体、工程名称窗体。如何修改工程名称窗体的Doubleclick代码,实现如下功能:

1、在入仓窗体主表中单击项目名称,即打开工程名称窗体,在工程名称窗体中双击选中的行,将行的内容填入入仓窗体主表当前行中。

2、在出仓窗体主表中单击项目名称,即打开工程名称窗体,在工程名称窗体中双击选中的行,将行的内容填入出仓窗体主表当前行中。

我目前解决的方法是:建立入仓工程名称窗体和出仓工程名称窗体,分别在出入仓主表中打开入仓工程名称窗体和出仓工程名称窗体,虽然能达到功能要求,但不算最好。请专家指教。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/1/9 11:29:00 [只看该作者]

纸上不谈兵,有例子才好办. 这个不难的,主要楼主还没看完帮助,没掌握狐表的所有技术点,所以没找到下手点.

 回到顶部
帅哥哟,离线,有人找我吗?
xh2207
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:190 积分:1593 威望:0 精华:0 注册:2013/1/6 19:46:00
  发帖心情 Post By:2014/1/9 15:01:00 [只看该作者]

例子在附件

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/1/9 15:05:00 [只看该作者]

看到了,你已经实现了啊.你对那里不满意呢?

 回到顶部
帅哥,在线噢!
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/1/9 16:31:00 [只看该作者]

你可以在打开窗口前,将表的名称保存在一个public变量中:

 

public变量 = e.Table.Name

Forms("工程名称").open()

 

原来类似这样的代码:

 

Tables("入仓主表").Current("项目名称") = e.Table.Current("项目名称")

 

改为:

 

Tables(public变量).Current("项目名称") = e.Table.Current("项目名称")


 回到顶部
帅哥哟,离线,有人找我吗?
xh2207
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:190 积分:1593 威望:0 精华:0 注册:2013/1/6 19:46:00
  发帖心情 Post By:2014/1/9 21:29:00 [只看该作者]

谢谢各位的指引,让我受益匪浅。


 回到顶部