主题：窗口中的表有一列是日期列，我想点打印按钮后这列自动生成当时的日期和时间

如标题：窗口中的表有一列是日期列，我想点打印按钮后这列自动生成当时的日期和时间，怎么样能实现

打印按钮的代码设置为：

 

Tables(" 表名").Current("日期") = Date.Now

你原来的打印代码

所有行还是当前行？

 

所有行：

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

谢谢狐爸，也谢谢童狐，这么简单的一个代码我想了二个晚上。看起来还是学的太肤浅了。