是等于控件的值,不是等于控件本身。
Dim je As WinForm.NumericComboBox = e.Form.Controls("金额")
For Each dr As DataRow In DataTables("职工表").DataRows dr("扣款") = je.ValueNext