VB—两个问题。40分。

Question

有一ACCESS数据库，名为Data.mdb。其中有一张名为rq的表，表内有一列数据xtrq,用来记录系统日期，日期格式为：2009—3—8。问题一：
       怎样使这个日期自动更新。
问题二：
       怎样用一个标签（Lable_date）读取这个字段，使字段的内容显示在Lable_date的caption属性中。
谢谢！！！
      

Answer 1

第一个问题，好像Access无此功能，使用update语句更新。
第二个问题，直接读取字段内容修改caption属性即可。

Answer 2

TO mfkinfo, 
我希望字段中的日期是不断更新的，所以直接修改caption属性不可行。

Answer 3

那你只能用计时器控件，不断的检测系统日期。如果日期改变了，就update数据库，然后再重新把caption赋值。

Answer 4

TO mylzw,
请问具体的操作是怎样？

Answer 5

日期自动更新，我记得可以用getdate();它可以获得的吧。但这有个问题，它在更新的时候，只对现在的记录有用来着。不知道有没有用来着。

Answer 6

1、每次进行系统时执行cn.execute "Update rq set xtrq=#"& foramt(now,"yyyy-m-d") &"#"

Answer 7

2、Lable_date.cption=rs.Fields("xtrq")如果你要问cn、rs是什么，我就无法回答了。

Answer 8

1.什么是自动更新？ 更新成什么？当前日期么？ 如果是的话，那就是每次你的程序运行的时候 update tbl set column1=getdate()2. 你需要adodb来打开数据库,select column1 from tb1 where..........
  lbl.caption=rs.fields(0)

Answer 9

你的意思是不是希望新添记录时，该字段的值自动是当前日期？那你就设这个字段的默认值为date()就可以。在ACCESS的表设计视图下就可以做，不用编码。

Answer 10

date()还有这功能，没有使过。当然也不见的就没有，楼主可以一试。
计时器只需要需要考虑1个属性，1个事件即可。设有刷新时间，添加更新代码即可。
不过程序忙时，会有中断。另外，程序也太累。

Answer 11

问题已解决,谢谢各方朋友的帮忙.结帖.
正解为:Label_date.caption=rs("xtrq")
当然,首先要对cn及rs进行定义.