以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]对非数据列进行记录数统计的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104844)

--  作者:jyh7081
--  发布时间:2017/8/6 22:12:00
--  [求助]对非数据列进行记录数统计的问题
求助版主,打开统计窗口,双击“统计历史”,提取出统计要素,当对“案号”列进行记录数统计时,提示错误:

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

附件:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:单表统计.table




--  作者:有点甜
--  发布时间:2017/8/6 22:35:00
--  

删除

 

For Each s As String In e.Form.Controls("CheckedComboBox8").text.Split("|")
    b.Totals.AddDef(s) \'添加列用于统计
Next

 

勾选统计记录数,而不是累计数

 

        b.Totals.AddDef(s,AggregateEnum.count)  \'统计记录数

[此贴子已经被作者于2017/8/6 22:35:17编辑过]

--  作者:jyh7081
--  发布时间:2017/8/8 16:46:00
--  

版主,见首层图:

假如我想把checkbox5的勾选状态保存到操作日志中的[勾选状态]列,应该怎样保存?[勾选状态]列是否要设置成逻辑列?

 

If e.Form.Controls("TextBox2").text = Nothing Then
    MessageBox.Show("请输入保存名称!", "提示", MessageBoxButtons.YesNo)
Else
    Dim ndr As DataRow = DataTables("操作日志").addnew
    ndr("统计种类") = "单表交叉统计"
    ndr("名称") = e.Form.Controls("TextBox2").text
    ndr("表") = e.Form.Controls("ComboBox5").text
    ndr("水平分组") = e.Form.Controls("CheckedComboBox6").text
    ndr("垂直分组") = e.Form.Controls("CheckedComboBox7").Text
    ndr("统计列") = e.Form.Controls("CheckedComboBox8").Text   
    ndr("统计条件") = e.Form.Controls("TextBox1").Text

    ndr("勾选状态") = e.Form.Controls("CheckBox5").?????
End If


--  作者:有点甜
--  发布时间:2017/8/8 16:54:00
--  

如果你一列保存一个勾选,那么这样写

 

ndr("勾选状态") = e.Form.Controls("CheckBox5").checked

 

如果你一列保存多个勾选,那就这样写

 

ndr("勾选状态") = iif(e.Form.Controls("CheckBox5").checked, "checkbox5,", "") & iif(e.Form.Controls("CheckBox8").checked, "checkbox8,", "")