以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  当前表汇总  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56807)

--  作者:yifan3429
--  发布时间:2014/9/12 16:37:00
--  当前表汇总
在窗口实时显示  汇总  当前数据
有案例吗    关联表有帮助   这个不会了

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140912163405.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2014/9/12 16:44:00
--  

 没有具体例子,赋值这样写

 

Forms("窗口1").Controls("Label1").Text = Tables("表A").Compute("sum(小计)")


--  作者:yifan3429
--  发布时间:2014/9/12 17:11:00
--  
 1.   ok
Forms("产品预算").Controls("预算1").Text = Tables("产品数据库").Compute("sum(需求数量)")

下面的这样修改就不对了没明白哪里出了错
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140912170953.png
图片点击可在新窗口打开查看

2.   显示不对
Dim lbl As WinForm.Label
lbl = e.Form.Controls("预算")
lbl.Text = "当前预算为:" & Forms("产品预算").Controls("预算").Text = Tables("产品数据库").Compute("sum(小计)") & ",圆整"
[此贴子已经被作者于2014-9-12 17:11:58编辑过]

--  作者:有点甜
--  发布时间:2014/9/12 17:12:00
--  
Dim lbl As WinForm.Label
lbl = e.Form.Controls("预算")
lbl.Text = "当前预算为:" & Tables("产品数据库").Compute("sum(小计)") & ",圆整"