专家坐堂-[求助]标签Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]标签  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=71728)

--  作者：江南小城
--  发布时间：2015/7/16 22:03:00
--  [求助]标签
老师好，通过代码在标签里显示数量列统计数据

--  作者：大红袍
--  发布时间：2015/7/16 22:18:00
--

在需要的事件加入代码

If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("Label1").Text = Tables("表A").Compute("sum(数量)")
End If

--  作者：江南小城
--  发布时间：2015/7/17 9:43:00
--

以下是引用大红袍在2015/7/16 22:18:00的发言：

在需要的事件加入代码

If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("Label1").Text = Tables("表A").Compute("sum(数量)")
End If

老师好，我没有把要求说清楚，现在要用烦你了。我是要统计窗口关联表中的股票名称显示在标签上。

此主题相关图片如下：图像 1.png

--  作者：大红袍
--  发布时间：2015/7/17 10:11:00
--
If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("Label1").Text = Tables("子表").Compute("sum(数量)", "股票名称 = \'" & Tables("父表").Current("股票名称") & "\'")
End If(

--  作者：大红袍
--  发布时间：2015/7/17 10:11:00
--
If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("Label1").Text = Tables("父表.子表").Compute("sum(数量)")
End If

--  作者：江南小城
--  发布时间：2015/7/17 10:27:00
--  [求助]标签

以下是引用大红袍在2015/7/17 10:11:00的发言：
If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("Label1").Text = Tables("父表.子表").Compute("sum(数量)")
End If

老师，不能及时更新标签数据，要重启窗口

[此贴子已经被作者于2015/7/17 10:27:29编辑过]

--  作者：大红袍
--  发布时间：2015/7/17 10:28:00
--

写到currentchanged事件、写到datacolchanged事件

--  作者：江南小城
--  发布时间：2015/7/17 10:42:00
--
谢谢老师，太感谢了。

--  作者：江南小城
--  发布时间：2015/7/17 12:11:00
--

老师，还是要麻烦你。

此主题相关图片如下：图像 3.png

--  作者：大红袍
--  发布时间：2015/7/17 12:12:00
--
Tables("父表.子表").Compute("sum(买入量)") - Tables("父表.子表").Compute("sum(卖出量)")