这个功能VB能实现吗？

Question

在一张表格里一个格子里的数据不是一定的，能不能定义成一个变量？
具体说：能不能定义某条记录某字段的值为一个变量a，开始时显示为a当前的值，过几分钟后，a的值改变，表里的数自动相应地改变？

Answer 1

Dim CN As New adodb.Connection
    Dim Rs As New adodb.Recordset
    
    CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=Report;User Id=sa;Password=sa;"
    CN.Open
    Rs.CursorLocation = adUseClient
    Rs.Open "select * from table1", CN, adOpenDynamic, adLockBatchOptimistic
-------------------------------------------------------------------------------a=Rs.Fields("lno")a="11111"Rs.Fields("lno")=aRs.Update