datacolchanged事件
Select Case e.DataCol.name
Case "回答", "答案"
If e.DataRow.isnull("回答") OrElse e.DataRow.isnull("答案") Then
e.DataRow("结果") = Nothing
Else
If e.DataRow("回答") = e.DataRow("答案") Then
e.DataRow("结果") = "正确"
Else
e.DataRow("结果") = "错误"
End If
End If
End Select
[此贴子已经被作者于2023/11/13 22:19:15编辑过]