Select Case e.DataCol.Name
Case "第一列","第二列"
If e.DataRow.IsNull("第一列") = False OrElse e.DataRow.IsNull("第二列") = False
e.DataRow("第三列") = val(e.DataRow("第一列")) ^ 2 + val(e.DataRow("第二列")) ^ 2
e.DataRow("第四列") = math.Sqrt(e.DataRow("第三列"))
Else
e.DataRow("第三列") = Nothing
e.DataRow("第四列") = Nothing
End If
End Select