以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 数据丢失 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89326) |
-- 作者:刘林 -- 发布时间:2016/8/19 10:03:00 -- 数据丢失 Dim dr As DataRow = e.DataRow Dim dt As DataTable = DataTables("成绩") If e.DataCol.Name = "学校代码" Then dr("参考人数") = dt.Compute("count(姓名)","[学校代码] = \'" & dr("学校代码") & "\'and [年级代码] = \'" & dr("年级代码") & "\'and [班级] = \'" & dr("班级") & "\'") dr("语文_平均分") = dt.Compute("AVG(语文_语总)","[学校代码] = \'" & dr("学校代码") & "\'and [年级代码] = \'" & dr("年级代码") & "\'and [班级] = \'" & dr("班级") & "\'") dr("语文_优秀率") = dt.Compute("count(姓名)","[语文_语总] >= 85 and [学校代码] =\'" & dr("学校代码") & "\'and [年级代码] = \'" & dr("年级代码") & "\'and [班级] = \'" & dr("班级") & "\'")/dr("参考人数") dr("语文_及格率") = dt.Compute("count(姓名)","[语文_语总] >= 60 and [学校代码] =\'" & dr("学校代码") & "\'and [年级代码] = \'" & dr("年级代码") & "\'and [班级] = \'" & dr("班级") & "\'")/dr("参考人数") End If datacolchanged 重置了列后,参考人数,语文_平均分列在系统重开数据不见了,要重新重置,但语文_优秀率,语文_及格率没存在这个问题,请问是什么原因,如何处理?谢谢!!!
|
-- 作者:Hyphen -- 发布时间:2016/8/19 10:37:00 -- 语文_平均分列是不是表达式列? |