以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样输入第统时产  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=30904)
--  作者：andycun
--  发布时间：2013/4/6 16:12:00
--  怎样输入第统时产

想用foxtable做一个请假条的输入、打印、以及保存的表

怎样让第一列直接读取系统时间并不允许修改？

 
--  作者：lihe60
--  发布时间：2013/4/6 16:17:00
--  

dim r as row=currenttable.addnew()

r("第一列")=now()
--  作者：fjlclxj
--  发布时间：2013/4/6 16:22:00
--  
表事件

PrepareEdit

If e.col.Name="第一列" Then e.Cancel=True

DataRowAdding

Dim dr As DataRow =e.DataRow
dr("第一列")=Date.Now