请教关于改变另一个窗口的数据集的问题

[ccyylib]

我建立了一个FORM可显示数据库表的内容,其中
Private Sub Form_Load()
........
strSql = "select * from jlsexpert" + sqlWhere

Set adoPrimaryRs = New Recordset
adoPrimaryRs.Open strSql, db, adOpenStatic, adLockOptimistic
......
end sub
sqlwhere为条件变量需要在另一个窗口FORM2中赋值,赋值后按FORM2中的关闭按钮时,我想在FORM窗口中,根据新检索的条件,显示新的数据集请问该如何做,请高手指点

[战箫]

将sqlwhere变量在module模块中设为全局变量，
public sqlwhere as string
然后你就可以在form2中添条件，将条件保存在sqlwhere变量中，form2关闭以后sqlwhere内容不会丢，然后就可以在form1中使用它来查询了。