為了打開參數(shù)查詢, 你須要明確指出基于參數(shù)查詢打開記錄集的每一個(gè)參數(shù).
例如, 在下面的代碼中, 查詢 "Qry1" 擁有兩個(gè)參數(shù): [Please enter Code:] 和 [Please enter city:].
Dim db As Database ' 當(dāng)前數(shù)據(jù)庫(kù)
Dim rs As Recordset ' 保存查詢結(jié)果的記錄集
Dim qdfParmQry As QueryDef ' 實(shí)際的查詢對(duì)象
Set db = CurrentDb()
Set qdfParmQry = db.QueryDefs("Qry1")
qdfParmQry("Please Enter Code:") = 3
' or try this alternate method
' to pass the parameter
qdfParmQry![Please Enter City:] = "New York"
Set rs = qdfParmQry.OpenRecordset()
例如, 在下面的代碼中, 查詢 "Qry1" 擁有兩個(gè)參數(shù): [Please enter Code:] 和 [Please enter city:].
Dim db As Database ' 當(dāng)前數(shù)據(jù)庫(kù)
Dim rs As Recordset ' 保存查詢結(jié)果的記錄集
Dim qdfParmQry As QueryDef ' 實(shí)際的查詢對(duì)象
Set db = CurrentDb()
Set qdfParmQry = db.QueryDefs("Qry1")
qdfParmQry("Please Enter Code:") = 3
' or try this alternate method
' to pass the parameter
qdfParmQry![Please Enter City:] = "New York"
Set rs = qdfParmQry.OpenRecordset()

