主题：求助每次修改都登记一下修改日期 代码

您好，我想在一个表中实收货款列在录入或修改时自动在收款列录入当天日期。  请问代码怎么写，昨天看了帮助文件自己没搞出来，求助  谢谢

此主题相关图片如下：qq截图20120510070907.png

在此表的DataColChanged事件中设置代码：

 

Select case e.DataCol.Name

   Case "实收货款列的名称"

        if e.DataRow("实收货款列的名称") > 0 Then

             e.DataRow("付款日期") = Date.Today

       End if

End Select

 

谢谢OK