スキルアップ・問題解決なら、モーグにおまかせ！

フォームに表示させたレコードを削除します。

●準備●
テーブルを用意します。
次に新規フォームを作成し、先ほど作成したテーブルのデータを表示させます。

●詳細●
作成したフォームにコマンドボタンを１つ追加し、「名前」を名前付けルールに
従って任意に変更します。サンプルでは、「cmdDelete」としています。
また、お好みに合わせて「標題」なども変更しておきます。
コマンドボタンを選択した状態で、「プロパティ」の「イベント」タブページを
選択し、クリック時を選択すると　[...]ボタンが表示されるので、そのボタンを
クリックして、「コードビルダ」を選択します。
モジュールが表示されるので、下記のコードを記述します。

●サンプルプログラム●
Private Sub cmdDelete_Click()

    If MsgBox("削除してよろしいですか？" _
        , vbYesNo + vbInformation, "確認") = vbNo Then Exit Sub
    With DoCmd
        .SetWarnings False
        .RunCommand acCmdDeleteRecord
        .SetWarnings True
    End With

End Sub