类似以下代码
DataColChanged事件
Select Case e.DataCol.Name
Case "账户名"
If e.NewValue > "" Then
If e.NewValue.contains("张") Then
e.DataRow("利润")=e.DataRow("利率") * e.DataRow("存款额")
ElseIf e.NewValue.contains("李") Then
e.DataRow("利润")=e.DataRow("利率") * e.DataRow("存款额") -0.1
Else
End If
End If
End Select