遠い昔の記憶ですが、こんな感じだったぁしら。
(略)
qd.Parameters("[Forms]![F_入力]![txt01]") = Forms!F_入力!txt01
qd.Parameters("[Forms]![F_入力]![txt02]") = Forms!F_入力!txt02
・・・(略)
通報 ...