以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  组合统计，金额如何生成  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=149767)
--  作者：yfy13338431925
--  发布时间：2020/5/12 1:17:00
--  组合统计，金额如何生成

老师：数据表("照片档案目录")中本无【金额】列，我想增加此列，

且=记录数*单价，单价在窗口NumericComboBox1中，在下面的代码中如何生成？

 

Dim g As New GroupTableBuilder("统计表1", DataTables("照片档案目录"))
g.Groups.AddDef("录入员")
g.Groups.AddDef("录入时间", DateGroupEnum.None)
g.Totals.AddDef("录入员", AggregateEnum.Count, "记录数")
g.Filter = "录入员 IS NOT NULL"

Dim t As Table = e.Form.Controls("Table1").Table

t.DataSource = g.BuildDataSource

 

按钮代码

Dim str As String
str = forms("工作量统计").Controls("NumericComboBox1").value
DataTables("工作量统计_table1").DataCols.Add("金额", Gettype(String), "[录目数量] * \'" & str & "\'")

 

报错：无法设置列金额表达式，原因;无法在system int64和system string上操作*

[此贴子已经被作者于2020/5/12 3:33:53编辑过]
--  作者：有点蓝
--  发布时间：2020/5/12 8:27:00
--  
单引号去掉
msgbox("[录目数量] * " & str)
DataTables("工作量统计_table1").DataCols.Add("金额", Gettype(String), "[录目数量] * " & str)