以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请老师帮忙看看  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=34539)
--  作者：lichelleco
--  发布时间：2013/6/8 20:32:00
--  请老师帮忙看看
你老师看看如何在按ADD按钮,那个createdate会自动显示电脑系统日期
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table
--  作者：czy
--  发布时间：2013/6/8 20:50:00
--  
With Tables("VendorFile")
    If .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改
        Dim r As Row = Tables("VendorFile").AddNew()
        r("CreateDate") = Date.Today()
    End If
End With
--  作者：lichelleco
--  发布时间：2013/6/8 21:03:00
--  
谢谢老师，可以用了
--  作者：lichelleco
--  发布时间：2013/6/8 21:54:00
--  

请老师再帮忙一下，如果数据保存后，要按EDIT键才可以修改，不然不可以修改数据要怎么做呢，
--  作者：XYT
--  发布时间：2013/6/9 9:06:00
--  

http://www.foxtable.com/help/topics/0621.htm

http://www.foxtable.com/help/topics/0741.htm

 参考帮助