以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 统计表drawcell 没反应 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140094) |
-- 作者:dengk03 -- 发布时间:2019/8/29 11:47:00 -- 统计表drawcell 没反应 库存查询按钮代码 Dim b As New SQLGroupTableBuilder("成品库存","出入库") b.C">b.Groups.AddDef("货物编号") \'添加客户列用于分组 b.Groups.AddDef("货物名称") \'添加产品列用于分组 b.Groups.AddDef("配方编号") \'添加产品列用于分组 b.Groups.AddDef("规格") \'添加产品列用于分组 b.Totals.AddDef("数量") \'添加数量列用于统计 b.Groups.AddDef("单位") \'添加产品列用于分组 b.Build \'生成统计表 Tables("库存管理_table1").datasource = DataTables("成品库存") Tables("库存管理_table1").SetColVisibleWidth("货物编号|40|货物名称|110|配方编号|45|规格|110|单位|30|数量|40") Tables("库存管理_table1").DataTable.GlobalHandler.DrawCell = True 全局表drawcell代码 Select Case e.Table.name Case "库存管理_table1" If e.Row("数量") < 0 e.style = "缺货" End If End Select 没反应,怎么回事儿 |
-- 作者:有点蓝 -- 发布时间:2019/8/29 11:54:00 -- 需要动态设置样式 Tables("库存管理_table1").DataTable.AddUserStyle("缺货", Color.Red, Color.White)
|