サブフォームに表示されているレコードの有無判定

対象バージョン : 97, 2000, 2002, 2003, 2007
最終更新日 : 2007/02/12 ( オリジナル作成日：1996/12/20 )

概　要

　サブフォームにレコードが表示されているかを判断する方法です。

方　法

　RecordCount プロパティが 0 を返しますので、これを利用します。

　フォーム上に貼り付けたサブフォームのコントロールの名前を "Sub" とすると、次のようになります。

If Me!Sub.Form.RecordsetClone.RecordCount = 0 Then
    MsgBox "表示対象レコードはありません。"
End If

改定履歴

• 1999/09/05 2000 の仕様変更に伴い、共通で判定可能な NewRecord プロパティを使用。
• 2001/06/10 サブフォーム「追加の許可」の設定により、NewRecord プロパティが使えないため、方法を変更。

目次へ戻る