- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于读取同一表，显示不同数据问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80206)
-- 发布时间：2016/1/18 15:06:00
-- 关于读取同一表，显示不同数据问题
1、
窗口A，我读取原表A数据；2、窗口B，我用DataTables("A").Fill组合数据，
但是A和B 显示数据一样了，请问如何设置？谢谢！
-- 发布时间：2016/1/18 15:08:00
--
Tables("窗口B_Table1").Fill()
-- 发布时间：2016/1/18 15:09:00
--
DataTables("A").Fill 我写在了内部函数中，公用的呢
-- 发布时间：2016/1/18 15:11:00
--
不明白你的意图，要不同，就必须用Tables().Fill
-- 发布时间：2016/1/18 15:12:00
--
我的意思：窗口1显示A表原数据；窗口2显示fill后的处理的数据，就这么简单
-- 发布时间：2016/1/18 15:18:00
--
Tables("学校建筑物信息1_Table6").Fill(")
Tables("学校建筑物信息1_Table6").SetColVisibleWidth("XXQHM|100|xxmc|200|jzwmc|200|jglx|100|cs|50|sfyzssj|100|jgsj|80|jcsj|100|czaqyhqk|150|zhpddj|100|sfcqcs|100")
\'设置列标题
With DataTables("学校建筑物信息1_Table6")
.DataCols("XXQHM").Caption = "所属区县"
.DataCols("xxmc").Caption = "学校名称"
.DataCols("jzwmc").Caption = "建筑物名称"
.DataCols("jglx").Caption = "结构类型"
.DataCols("cs").Caption = "层数"
.DataCols("sfyzssj").Caption = "是否有正式设计"
.DataCols("jgsj").Caption = "竣工时间"
.BuildHeader()
End With
-- 发布时间：2016/1/18 15:18:00
--
这么写对吗
-- 发布时间：2016/1/18 15:22:00
--
6楼代码基本正确，fill里面要写sql语句的。fill进来的和原本的表没有什么联系
-- 发布时间：2016/1/18 15:29:00
--
我放在内部函数中，提示找不到窗口呢，是必须把代码放在窗口代码中吗
-- 发布时间：2016/1/18 15:30:00
--
先判断窗口是否打开
If Forms("学校建筑物信息1").Opened Then
End If