以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]求窗口控件Label的动态用法!祝大神们春节快乐,万事如意  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64616)

--  作者:lyf_0722
--  发布时间:2015/2/25 17:41:00
--  [求助]求窗口控件Label的动态用法!祝大神们春节快乐,万事如意
小弟想使用窗口控件label来制作一个汇总数据。
在窗口中绑定表单后,增加一个单击按钮,点击后弹出新的一个独立窗口,上面则想用label来把当前表单的数据进行汇总统计显示出来。
求大神指导一下,该怎么样具体设置label的命令,才能实现以上内容?

--  作者:Bin
--  发布时间:2015/2/25 17:44:00
--  
利用Compute统计出数据然后给Label赋值 http://www.foxtable.com/help/topics/0393.htm

在窗口ALterLoad事件

e.form.controls("Label1").text=datatables("XX").Compute("sum(列名)")

--  作者:有点甜
--  发布时间:2015/2/25 17:44:00
--  

例如代码

 

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


--  作者:lyf_0722
--  发布时间:2015/2/25 18:51:00
--  
以下是引用Bin在2015/2/25 17:44:00的发言:
利用Compute统计出数据然后给Label赋值 http://www.foxtable.com/help/topics/0393.htm

在窗口ALterLoad事件

e.form.controls("Label1").text=datatables("XX").Compute("sum(列名)")

----------------
BIN大神,我看了一下您这边给的链接,也按链接上尝试了相应的代码。在命令窗口执行的时候,是可以正确的显示出我想要的数据,但是现在想和babel进行绑定的话,我的理解思路还是有些无法连贯在一起。
首先,我在数据窗口上增加了一个 button 按钮,在点击这个按钮以后,弹出一个新的独立窗口,并且能根据当前表的数据,在新的独立窗口上通过label来显示汇总的数据。
我根据示例贴子,作出来的代码是这样子的。
Dim Total As Integer
Dim Amount As Double
With DataTables("销售明细账")
    Total = .Compute("Sum(数量)")
    Amount = .Compute("Sum(实付金额)")
End With
Output.Show("数量:" & Total)
Output.Show("金额:" & Amount)

但现在这个代码就不知道该怎么样和刚才说的内容联系上。 该写在哪个控件的哪个事件上呢?


--  作者:有点甜
--  发布时间:2015/2/25 19:00:00
--  
Dim Total As Integer
Dim Amount As Double
With DataTables("销售明细账")
    Total = .Compute("Sum(数量)")
    Amount = .Compute("Sum(实付金额)")
End With
 

Forms("窗口1").Controls("Label1").Text = "数量:" & Total

Forms("窗口1").Controls("Label2").Text = "金额:" & Amount