關(guān) 于 的 字 段 組 合 查 詢 可 用 Querydef對 象 來 實(shí) 現(xiàn) 。 例 ： 一 數(shù) 據(jù) 庫 有 一 nps表 內(nèi) 有 name,phone,address三 個 字 段 ， 用 戶 選 擇 對 name,phone進(jìn) 行 查 詢 ， 并 在 相 應(yīng) 的 textname,textphone中 輸 入 了 要 查 詢 的 值 。 代 碼 如 下 (假 定 已 打 開 數(shù) 據(jù) 庫 )： 
    Dim dbqu As Dao.QueryDef, dbre As Dao.Recordset 
    Dim strsql As String 
     
    strsql="parameters[nam1] string,[phone1] string; " 
    strsql=strsql+"select * from nps where name=[name1] and phone=[phone1]" 
    Set dbqu=db.CreateQuerydef("",strsql) 
    dbqu.parameters("name1") = textname.text 
    dbqu.parameters("phone1") = textphone.text 
    Set dbre=dbqu.OpenRecordset() 
    在 vb6的 幫 助 中 有 詳 細(xì) 說 明 。 
<END>