Accessのメッセージについて

Access初心者です。よろしくお願い致します。

レコードソースをクエリ1で検索フォームを作成しています。

ボタン1をクリック時、店舗名、店舗略称、店舗旧称のいずれかに当てはまる曖昧検索で、該当するレコードがフォーム上に表示されるようにしています。

検索のテキストボックスに文字が未入力の場合、その旨のメッセージが出るようにしているのですが、該当のレコードがない場合に｢該当がありません｣とメッセージを出す場合にはどのようにすればいいのでしょうか。

お力添えをよろしくお願い致します…

質問者からの補足コメント

• 貼っていただいたURLを参考にやってみてダメだったので質問させて頂いた次第でした(・・;)
  
  Private Sub 検索ボタン1_Click()
  If IsNull(店舗名検索,Value)＝True Then
  MsgBox("店舗名を入力して下さい")
  Exit Sub
  
  End If
  
  Me.Filter＝"店舗名 Like '＊" & 店舗名検索 & "＊' Or 店舗略称 Like '＊" & 店舗名検索 & "＊' Or 店舗旧名称 Like '＊"＆ 店舗名検索 & '＊"'
  Me FilterOn＝True
  
  End Sub
  
  の後のコードなんですが…
  申し訳ありません…

  No.1の回答に寄せられた補足コメントです。 補足日時：2020/08/28 12:42

No.1 回答者： goold-man 回答日時： 2020/08/28 09:04

>｢該当がありません｣とメッセージ

参考URLをご覧ください。
https://oshiete.goo.ne.jp/qa/6919349.html