在事件中怎么调用一个数据集

独舞雨农

问大家一个问题.在事件中怎么调用一个数据集.

如

sql="select * from bill where...."

set rs=currentdb().openrecordset(sql)

因为在整个界面的所有按钮事件中.都用到了同一条sql.同一个rs

有办法把这个rs 放到一个变量中.然后调用吗?大家有什么方法

eyewitnes

public rs

然后每次调用都能进行不关闭和清空的操作

LucasLynn

Private daoRS As DAO.Recordset



Private Sub Form_Load()

    Dim strSQL="SELECT * FROM bill WHERE...."

    Set daoRs=CurrentDB.OpenRecordset(strSQL)

End Sub



Private Sub Form_Unload()

    daoRs.Close

End Sub

[此贴子已经被作者于2005-10-15 14:28:33编辑过]