フィルタリング後にフォームに結果が表示されない場合のメッセージの表示

Question

以下は、現在私のVBAの外観です。 searchCritは名、姓、などとsearchTxtのような様々な検索条件でコンボボックスに値が入力されている。

If searchCrit = "First Name" Then 
    Me.Search_Results.Form.Filter = "[FirstName] LIKE '%" & searchTxt & "%' 
    Me.Search_Results.Form.FilterOn = True 

    If Me.Search_Results.Form.RecordCount < 1 Then 
     MsgBox ("No Results Found") 
    End If 
Else If ....... 

私はライン上のエラーを取得しています：

If Me.Search_Results.Form.RecordCount < 1 Then 

はRecordCountをですここで実行可能な方法ではない？フォームが結果を返さなかったかどうかを検出する他の方法はありますか？

Answer 1

はして試してみてください。

If Me!Search_Results.Form.RecordsetClone.RecordCount = 0 Then 
    MsgBox ("No Results Found") 
End If