Microsoft Access 掲示板

検索した日付のデータがない場合、メッセージボックスを使ってエラーを出したい / 3

4 コメント
views
4 フォロー
3
hatena 2020/10/29 (木) 20:30:07 修正

ちなみに、前期のマクロをVBAに翻訳すると下記のよにうなコードになります。

Private Sub コマンド9_Click()
    Me.日付.SetFocus
    DoCmd.FindRecord Me.検索窓口, acAnywhere
    If Me.日付 = Me.検索窓口 Then
    Else
        MsgBox "該当データがありません"
    End If
End Sub
通報 ...