[求助]

excchu

在一窗体中有一“命令1”，单击“命令1”时，会生成一个临时查询“TEMP”并打开；
当关闭临时查询“TEMP”后，：当再次单击“命令1”时,只打开临时查询“TEMP”，此代码如何写？(关闭临时查询“TEMP”时能否自动删除临时查询“TEMP”)

tmtony

先判断此临时查询是否存在, 可附加错误陷阱来捕获,如存在,则引用现有的,否则创建

tmtony

不是很好代码,但你可试试
Private Sub Form_Load()
Dim strQdfName As String
On Error Resume Next
strQdfName = CurrentDb.QueryDefs("你的查询名").Name
If Err.Number <> 0 Then
    MsgBox " 不存在"
Else
    MsgBox "存在"
End If

End Sub