表示されているレコードを１つ上にする

環境：ACCESS2003&XP Pro
テーブルとそのテーブルをソースにしたクエリーを元に一覧形式のフォームを作成しています。以下のようなイメージです。

品名　　仕様　　数量　単価　合計
　A　　　xxx xxx xxx xxx　↑
　b　　　yyy yyy yyy yyy　↑
　C　　　zzz zzz zzz zzz　↑
＊↑はボタン

上記の表示で↑ボタンをクリックすると
表示されたレコードがひとつ上に行く方法が
わかりません。
よろしくお願いします。

例：上記で品名bの↑ボタンをクリック
品名　　仕様　　数量　単価　合計
　b　　　yyy yyy yyy yyy　↑
　A　　　xxx xxx xxx xxx　↑
　C　　　zzz zzz zzz zzz　↑

No.2 ベストアンサー 回答者： noname#22222 回答日時： 2006/02/25 18:37

１、当該のレコードを変数に保存する。

２、当該のレコードを削除する。
３、所定位置に表示されるように保存した内容でレコードを生成する。
４、クエリーを再表示する。

伝票行の入れ替えでは、このように組んだように記憶しています。

No.3 回答者： noname#22222 回答日時： 2006/02/26 06:52

s_husky です。

補足しておきます。

削除＋追加＝更新

という等式が成立することは言うまでもありません。
仕様次第では、左辺でなく右辺でも可です。

No.1 回答者： question01 回答日時： 2006/02/25 13:01

フォームをデザインページで開き、コマンドボタンを配置すると、ウィザードが開始されます。

種類を「レコードの移動」、ボタンの動作「前のレコードに移動」にすれば、作ろうとしているボタンができます。

VBで記述すると、以下のようになります。
※cmd_01＝ボタン名

Private Sub cmd_01_Click()
On Error GoTo Err_cmd_01_Click

DoCmd.GoToRecord , , acPrevious

Exit_cmd_01_Click:
Exit Sub

Err_cmd_01_Click:
MsgBox Err.Description
Resume Exit_cmd_01_Click

End Sub