レコードカウントについて

解決

---

前回、質問させていただいた（VBから印刷する機能について）なのですが、
      その時の内容
      印刷時に印刷データがすぐに溜まらない
      リカバリをかけても復活しない
      VBをインストールすると復活する（正常にインストール終了しない）
  メッセージボックスで調査した結果、原因となっている場所がわかりました。
  以下のように変更すると、修正できることも分かりました
  エラー個所
    SQL作成
    Set RS = DBOpenRecordset(SQL)
    If RS.RecordCount = 0 Then
        MsgBox "データがありません。"
            受付番号.SetFocus
        Exit Function
    End If
  修正個所
    SQL作成
    Set RS = DBOpenRecordset(SQL)
    If RS.EOF = True Then
        MsgBox "データがありません。"
            受付番号.SetFocus
        Exit Function
    End If

  RecordCountの部分をEOFの判定に変更すると修正できたのですが、
  なぜ復活できるのかが疑問なのですが、私はどちらも同じ判断をしている
  と思うのですが。。。
  
  よろしければ、ご回答御願い致します。

編集 削除

---

すみません。少し自分で考えてみたいと思います

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。