Ado Dim Db As Connection Dim WithEvents adoPrimaryRS As Recordset

• 数据库连接对象