以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何区分普通表和交叉统计出来的表  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=129037)

--  作者:susu312
--  发布时间:2018/12/20 12:36:00
--  如何区分普通表和交叉统计出来的表

 


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


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

 

老师,如何区分这两个表,交叉统计表来源于普通表,而不能在交叉统计表上进行交叉统计 ,如何判断当前这个表是交叉 统计表而不是普通表?

 

\'\'获取统计控件的值
Dim chuiZhi As String = e.Form.Controls("chuiZhi").Value
If chuiZhi Is Nothing  Then
    e.Form.Controls("chuiZhi").Error="请选择垂直分组列"
    Return
Else
   chuiZhi = chuiZhi.Replace(" ","")
End If
Dim b As New CrossTableBuilder("统计表1", DataTables("时间节点_Table1"))
b.HGroups.AddDef("离退休单位") \'添加单位列用于水平分组
b.VGroups.AddDef(chuiZhi,chuiZhi & "_{0}" ) \'添加垂直分组
b.Totals.AddDef(chuiZhi, AggregateEnum.Count) \'添加用于统计
b.HorizontalTotal = True   \'水平方向生成汇总
b.VerticalTotal = True  \'垂直方向生成汇总
b.Build
Tables("时间节点_Table1").DataSource = DataTables("统计表1")
 \'\'设置表格居中
For Each c As Col In Tables("时间节点_Table1").Cols
      c.TextAlign  = TextAlignEnum.Center
Next
\'\'使得按钮点完后,不要再是选定色
e.form.controls("Table1").Select


--  作者:有点甜
--  发布时间:2018/12/20 15:17:00
--  

1、不论是统计表、普通表、临时表,都可以交叉统计的。

 

2、如果你要区分,参考

 

msgbox(Tables("时间节点_Table1").DataTable.Type)

 

http://www.foxtable.com/webhelp/scr/0389.htm