Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助] 完善统计

1楼
小小草 发表于:2011/9/18 1:12:00

求助:完成了部分的统计,但还有些需要补充,请帮帮忙。。。

 

谢谢!!!

 

其中还有一些问题需要解决:

 

1、基本信息表中 如果列【变动原因】有“毕业”或者“转学”,应移除基本信息表转移到毕业转学表中。

 

2.统计表中,统计了年级和年龄列,怎么来统计班级、班级数、以及年龄段的统计。。。

 

 

再次感谢!!!谢谢。

2楼
小小草 发表于:2011/9/18 1:24:00
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学籍.table

3楼
狐狸爸爸 发表于:2011/9/18 10:01:00

第一个问题,学生基本信息表的DataColChanged加上一段代码:

 

If e.DataCol.Name = "变动原因" Then
    If e.DataRow("变动原因") = "毕业" OrElse e.DataRow("变动原因") = "转学" Then
        Dim dr As DataRow = DataTables("毕业转学").Addnew
        For Each dc As DataCol In DataTables("毕业转学").DataCols
            dr(dc.name) = e.DataRow(dc.name)
        Next
        e.DataRow.Delete
    End If
End If

 

第二个问题,统计班数:

 

e.DataRow("班级数统计_班数") = DataTables("学生基本信息").GetUniqueValues("[年级]= '" & e.DataRow("年级统计_年级") & "'", "班级").Count

 

其他统计用类似的方法。

 

共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 3 queries.