VB中ADODC控件调用和更改Access数据库中一个表的某一个值怎么弄?

简单地说就是我想让一个integer被定义为一个表中的数据，用ADO控件
然后呢还能再把别的=这个integer

表是 一个 这样的  
ID 时间
1 20



希望代码通过一个text能改 这个时间
然后另一个Form中的一个timer做的倒计时的总时间再调用这个值

哥 还是 自问 自答 了吧


Adodc1.RecordSource = "select * from 考试时间 where ID = 1"
Adodc1.Refresh
Adodc1.Recordset.Fields("时间") = Text1.Text
Adodc1.Recordset.Update

另一个Form

Adodc2.RecordSource = "select * from 考试时间 where ID = 1"
Adodc2.Refresh
Adodc2.Recordset.Update


timep = Adodc2.Recordset.Fields("时间")
timep之前定义过integer

Adodc1.RecordSource   =   "select   *   from   考试时间   where   ID   =   1 "
Adodc1.Refresh
Adodc1.Recordset.Fields( "时间 ")   =   Text1.Text
Adodc1.Recordset.Update