Если PFvld является параметром и запрос (MyQuery) сохраняется (часть базы данных MSAccess), то вы должны выполнить:
Dim qdf As DAO.QueryDef
Set qdf = db.QueryDefs("MyQuery")
qdf.Parameters("[PFvld]") = myValue
Если вы составляете запрос на лету и выполняете его, то вы можете просто указать значение при составлении кода SQL вместо параметра (хотя это не лучшее решение).