[求助]求窗口控件Label的动态用法！祝大神们春节快乐，万事如意 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

小弟想使用窗口控件label来制作一个汇总数据。

在窗口中绑定表单后，增加一个单击按钮，点击后弹出新的一个独立窗口，上面则想用label来把当前表单的数据进行汇总统计显示出来。

求大神指导一下，该怎么样具体设置label的命令，才能实现以上内容？

利用Compute统计出数据然后给Label赋值 http://www.foxtable.com/help/topics/0393.htm

在窗口ALterLoad事件

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

例如代码

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

以下是引用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)

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

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

主题：[求助]求窗口控件Label的动态用法！祝大神们春节快乐，万事如意