在此表的DataColChanged事件中设置代码：
Select case e.DataCol.Name
Case "实收货款列的名称"
if e.DataRow("实收货款列的名称") > 0 Then
e.DataRow("付款日期") = Date.Today
End if
End Select
加好友 
发短信
Post By：2012/5/10 9:56:00 [显示全部帖子]
