- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何双击窗口表 打开不同的其它窗口 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=133220)
-- 发布时间：2019/4/9 20:47:00
-- 如何双击窗口表 打开不同的其它窗口
此主题相关图片如下：4-9.jpg
此主题相关图片如下：4-9-2.jpg
老师我想问：
窗口的表是由表的FILL 方法生成的，根据右边的组合框的列表 加载相应的内容，
代码如下：
Case "产品信息"
Dim fit As String="Select 产品编号,产品名称,研发负责人,模具负责人 Fro m {产品信息} where 产品名称=\'" & tx & "\'"
t.Fill(fit,"外部数据-1",True)
Case "数据更改统计表"
Dim fit As String="Select 产品名称,接收时间,备注说明 Fro m {数据更改统计表} where 产品名称=\'" & tx & "\'"
t.Fill(fit,"外部数据-1",True)
如果生成的是产品信息内容，双击表中某一行，打开 窗口A
如果生成的是数据更改统计表的内容，双击表中某一行，打开 窗口B
这个如何实现
[此贴子已经被作者于2019/4/9 20:49:06编辑过]
-- 发布时间：2019/4/9 20:56:00
--
Case "产品信息"
Dim fit As String="Select 产品编号,产品名称,研发负责人,模具负责人 Fro m {产品信息} where 产品名称=\'" & tx & "\'"
t.Fill(fit,"外部数据-1",True)
vars("当前表") = “产品信息”
Case "数据更改统计表"
Dim fit As String="Select 产品名称,接收时间,备注说明 Fro m {数据更改统计表} where 产品名称=\'" & tx & "\'"
t.Fill(fit,"外部数据-1",True)
vars("当前表") = “数据更改统计表”
双击事件
if vars("当前表") = “产品信息” then
打开 窗口A
else
打开 窗口B
end if
-- 发布时间：2019/4/9 21:42:00
--
好的，谢谢老师