1、weui的list界面按日期字段的月来分组汇总,代码怎么写?
2、weui手动生成的list界面+汇总模式,这种汇总下可以编辑吗?
For i As Integer = 0 To dt.DataRows.count - 1
Dim r As DataRow = dt.DataRows(i)
If i > 0 Then
Dim lr As DataRow = dt.DataRows(i-1)
'If r("huodongfee") <> lr("huodongfee") Then
Totalfee = dt.compute("sum(总费用)")
'amt = dt.compute("sum(手续费)")
With .Body.AddRow()
.Attribute = "style='background-color:#F0FFFF'"
.AddCell("小计" & lr("日期"))
'.AddCells("","Totalfee")
End If
.Body.AddRow(r("日期"),r("总费用"),r("预存扣"),r("手续费"),r("线下"),r("提现"))
Next