以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  动态表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=21157)

--  作者:wilson
--  发布时间:2012/7/3 14:48:00
--  动态表

Output.Clear()
forms("纸箱下单窗口").Show()
\'统计物料
Output.Clear()
Dim gb As new SQLGroupTableBuilder("统计表a","产品纸箱表")
gb.AddTable("产品纸箱表","产品型号","订单表","产品型号")
gb.Groups.AddDef("配件名称")
gb.Groups.AddDef("配件品类")
gb.Groups.AddDef("配件规格")
gb.Groups.AddDef("配件颜色")
gb.Groups.AddDef("配件单位")
gb.Groups.AddDef("备注")
gb.Totals.AddExp("采购数量","[数量] * [配件用量]")
gb.Build()
\'生成窗口Table1
Dim tbal As WinForm.Table
tbal = e.Form.CreateTable("Table1", "统计表a", False)
tbal.SetBounds(212,5,595,251)
e.Form.AddControl(tbal)
Output.Clear()
求助,执行上述代码提示错误如何解决,谢谢!!!

 


此主题相关图片如下:捕获1.png
按此在新窗口浏览图片

--  作者:狐狸爸爸
--  发布时间:2012/7/3 15:16:00
--  

你在那里执行这样的代码?

只有在窗口或者控件的事件中,才有:e.Form

如果是Table的事件,必须明确使用窗口名称: forms("窗口名称")