[浏览完整版]
标题：窗口筛选树统计问题
31楼
jhxb8821 发表于：2023/10/19 13:21:00全选：（单选框）
If e.Sender.Checked = True Then
Dim lvw As
WinForm.ListView = e.Form.Controls("ListView1")
lvw.View = ViewMode.Details '显示模式切换为：复选框为全选的内容
End
If
已选：
If e.Sender.Checked = True Then
Dim lvw As
WinForm.ListView = e.Form.Controls("ListView1")
lvw.View = ViewMode.LargeIcon '显示模式切换为：复选框为已选的内容
End
If
未选：
If e.Sender.Checked = True Then
Dim lvw As
WinForm.ListView = e.Form.Controls("ListView1")
lvw.View = ViewMode.LargeIcon '显示模式切换为：复选框为未选的内容
End
If
这样能实现吗，红色代码修改
32楼
有点蓝 发表于：2023/10/19 14:11:00listview有没有绑定datarow？比如这里的：http://www.foxtable.com/webhelp/topics/2782.htm
vr.Tag= dr '将DataRow赋值给ListViewRow的Tag属性,将二者联系起来
通过vr.Tag绑定获取绑定的行赋值
33楼
jhxb8821 发表于：2023/10/19 14:28:00好的
34楼
jhxb8821 发表于：2023/10/20 15:36:00Dim b As New CrossTableBuilder("交叉统计表1", DataTables("订单"))
b.HGroups.AddDef("客户")
b.HGroups.AddDef("产品")
b.HGroups.AddDef("日期", DateGroupEnum.Year, "年")
b.HGroups.AddDef("日期", "月")
b.VGroups.AddDef("日期", DateGroupEnum.Day, "日期_{0}日")
b.Totals.AddDef("数量") '添加数量列用于统计；
b.Build
Maintable = Tables("交叉统计表1")
老师, 这个交叉统计代码是正确, 假若我不用"数量"列, 换成"评比结果"字符列, 这里如何给指定日期列赋值？
35楼
有点蓝 发表于：2023/10/20 15:40:00字符列只能计数
b.Totals.AddDef("评比结果",AggregateEnum.count)
36楼
jhxb8821 发表于：2023/10/20 15:46:00比如3日，检查结果为“好”，则将“好”填充到“3日”列中，像考勤一样，能不能用交叉统计代码，简洁表示
37楼
有点蓝 发表于：2023/10/20 15:49:00统计结果只能是数值，看35楼
38楼
有点蓝 发表于：2023/10/20 15:51:00或者看懂原理：http://www.foxtable.com/webhelp/topics/2394.htm，自己写代码计算
39楼
jhxb8821 发表于：2023/10/20 15:59:00谢谢老师
40楼
jhxb8821 发表于：2023/10/27 16:22:00老师，帮忙看看怎么未找到列？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:项目2310.foxdb |