| 以文本方式查看主题 - 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=26508) |
| -- 作者：穆紫1212 -- 发布时间：2012/12/6 15:48:00 -- 窗口中的表有一列是日期列，我想点打印按钮后这列自动生成当时的日期和时间 如标题：窗口中的表有一列是日期列，我想点打印按钮后这列自动生成当时的日期和时间，怎么样能实现 |
| -- 作者：狐狸爸爸 -- 发布时间：2012/12/6 15:53:00 -- 打印按钮的代码设置为：
Tables(" 表名").Current("日期") = Date.Now 你原来的打印代码 |
| -- 作者：sgs -- 发布时间：2012/12/6 15:54:00 -- 所有行还是当前行？
所有行： for each r as row in e.form.controls("table1").table.rows r("confirmdate") = date.now() next 当前行就简单了 if e.form.controls("table1").table.current isnot nothing then dim r as row = e.form.controls("table1").table.current r("confirmdate") = date.now() end if |
| -- 作者：穆紫1212 -- 发布时间：2012/12/6 16:24:00 -- 谢谢狐爸，也谢谢童狐，这么简单的一个代码我想了二个晚上。看起来还是学的太肤浅了。 |