datacolchanged事件: If e.DataCol.Name = "基数" Then If e.DataRow.IsNull("基数") Then e.DataRow("保险") = Nothing e.DataRow("会费") = Nothing Else e.DataRow("保险") = e.DataRow("基数")*DataTables("比率").DataRows(0)("保险比率") e.DataRow("会费") = e.DataRow("基数")*DataTables("比率").DataRows(0)("会费比率") End If End If