以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 自动关闭问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=55110) |
-- 作者:bagabaga -- 发布时间:2014/8/11 11:19:00 -- 自动关闭问题 以下代码是窗口中加载的表的表事件DoubleChlick,但是在窗口双击列"Zhdj"后,原来打开的窗口会自动关闭,导致程序中断,请教什么原因,怎么修改 If e.Col.Name = "Zhdj" Dim sql As String = "Select RcjBm as 人材机编码,Mc as 名称,Rcjhl As 含量,Rcjhj as 合计 FROM (SELECT Rcjid,Rcjhl,Rcjhj,fK From {QdxrcjhlMx} where Fk = \'" & Tables("Qdmx").Current("Xh") & "\') as a INNER JOIN {RcjhzMx} as b ON a.RcjId = b.RcjId" Dim b As New GroupTableBuilder("统计表1",sql) b.Groups.AddDef("人材机编码") b.Groups.AddDef("名称") b.Groups.AddDef("含量") b.Totals.AddDef("合计") \'b.HorizontalTotal = True b.VerticalTotal = True b.Build() End If |
-- 作者:有点甜 -- 发布时间:2014/8/11 11:32:00 -- 呃,是不是你这个双击的table就是【统计表1】?
做个例子发上来 |