以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]发现一个很奇怪的闪退问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159654)
--  作者：jjjeyes
--  发布时间：2021/1/3 18:54:00
--  [求助]发现一个很奇怪的闪退问题
Dim Names As String() = {"课堂表现分","随堂测验分","课外作业分"}
For Each Name As String In Names
    If e.DataRow.IsNull(Name) Then
        \'MessageBox.show(name)
        e.DataRow("平时成绩总分") = Nothing
        Return
    Else
        Dim dr3 As DataRow = e.DataRow
        dr3("平时成绩总分") = dr3("考勤分") + dr3("课堂表现分") + dr3("随堂测验分") + dr3("课外作业分")
    End If
Next

用以上代码来算分，把{"课堂表现分","随堂测验分","课外作业分"}三项中"课堂表现分"放第一位时，第一个输入"课堂表现分"，就会闪退。
把"随堂测验分"放第一位时，第一个输入"随堂测验分"，就会闪退。
请问这是什么原因？
"考勤分"是表达式列，分值已经存在。
--  作者：有点蓝
--  发布时间：2021/1/3 20:23:00
--  
先看看：http://www.foxtable.com/webhelp/topics/1522.htm
--  作者：jjjeyes
--  发布时间：2021/1/3 21:46:00
--  
谢谢指点，已经改过来了。