设置DataColChanged事件代码：
Select Case e.DataCol.Name
Case "姓名"
e.DataRow("日期") = Date.Today
Case “实收货款"
e.DataRow("收款日期") = Date.Today
End Select
加好友 
发短信
Post By：2012/6/4 8:36:00 [显示全部帖子]
