怎么通過代碼打開一個參數(shù)查詢

字號:

為了打開參數(shù)查詢, 你須要明確指出基于參數(shù)查詢打開記錄集的每一個參數(shù).
    例如, 在下面的代碼中, 查詢 "Qry1" 擁有兩個參數(shù): [Please enter Code:] 和 [Please enter city:].
    Dim db As Database ' 當前數(shù)據(jù)庫
    Dim rs As Recordset ' 保存查詢結(jié)果的記錄集
    Dim qdfParmQry As QueryDef ' 實際的查詢對象
    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()