Select Case e.DataCol.Name Case "件2" If e.DataRow.IsNull("规格") Then e.DataRow("包2") = Nothing Else e.DataRow("包2") = e.DataRow("件2") * e.DataRow("规格") End If e.DataRow("金额") = e.DataRow("件2") * e.DataRow("单价") Case "包2" If e.DataRow.IsNull("件2") Then 这句改为:件2为空且包2不为空 e.DataRow("金额") = e.DataRow("包2") * e.DataRow("单价") End If End Select