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 犀利哥？

补充：VB ,  数据库(包含打印，安装，报表)