Field.Required プロパティ (DAO)

適用先: Access 2013、Office 2013

Field オブジェクトに非 Null 値が必要かどうかを示す値を設定または取得します。

構文

式 。必須

式Field オブジェクトを表す変数です。

注釈

Fields コレクションにまだ追加されていない Field オブジェクトでは、このプロパティは値の取得および設定が可能です。

Required プロパティを使用できるかどうかは、次の表に示すように、 Fields コレクションが含まれているオブジェクトによって決まります。

Required プロパティは、AllowZeroLength、ValidateOnSet、または ValidationRule プロパティと共に使用して、該当する Field オブジェクトの Value プロパティの設定の妥当性を確認できます。 Required プロパティが False に設定されている場合、フィールドには null 値、および AllowZeroLength プロパティと ValidationRule プロパティの設定値で指定された条件を満たす値を含めることができます。

例

次の使用例は、 Required プロパティを使用して、新しいレコードを追加するためにデータを含める必要がある、3 つの異なるテーブルのフィールドをレポート出力します。 このプロシージャを実行するには、RequiredOutput プロシージャが必要です。

Sub RequiredX() 
 
 Dim dbsNorthwind As Database 
 Dim tdfloop As TableDef 
 
 Set dbsNorthwind = OpenDatabase("Northwind.mdb") 
 
 With dbsNorthwind 
 ' Show which fields are required in the Fields 
 ' collections of three different TableDef objects. 
 RequiredOutput .TableDefs("Categories") 
 RequiredOutput .TableDefs("Customers") 
 RequiredOutput .TableDefs("Employees") 
 .Close 
 End With 
 
End Sub 
 
Sub RequiredOutput(tdfTemp As TableDef) 
 
 Dim fldLoop As Field 
 
 ' Enumerate Fields collection of the specified TableDef 
 ' and show the Required property. 
 Debug.Print "Fields in " & tdfTemp.Name & ":" 
 For Each fldLoop In tdfTemp.Fields 
 Debug.Print , fldLoop.Name & ", Required = " & _ 
 fldLoop.Required 
 Next fldLoop 
 
End Sub