求助,VBA执行代码添加记录,如何马上显示结果

wolongyou

求助,在线等,VBA执行代码添加记录,如何能马上显示结果,

非常感谢!

Dim db As Database
Dim tb As Recordset
Dim name As String

Set db = CurrentDb
name = db.name
'Debug.Print name
Set tb = db.OpenRecordset("TEST")
Debug.Print tb.name
tb.AddNew

With tb
  ![Cc id] = "cxtb100"
  ![Owner] = "cxt"
  .Update
  .Close

End With

无忧

http://www.office-cn.net/forum.php?mod=viewthread&tid=50262我这个里面就可以马上显示结果，：）