Freigeben über


Field.Required-Eigenschaft (DAO)

Gilt für: Access 2013, Office 2013

Gibt einen Wert zurück, der angibt, ob für ein Field -Objekt ein Nicht-Null-Wert erforderlich ist, oder legt den betreffenden Wert fest.

Syntax

Ausdruck . Erforderlich

Ausdruck Eine Variable, die ein Field-Objekt darstellt.

Bemerkungen

Ein Field-Objekt, das noch nicht an die Fields-Auflistung angehängt wurde, hat Lese-/Schreibzugriff für diese Eigenschaft.

Die Verfügbarkeit der Required-Eigenschaft hängt von dem Objekt ab, das die Fields-Auflistung enthält, wie in der folgenden Tabelle dargestellt.

Zugehörigkeit der Fields-Auflistung

Required-Wert

Index-Objekt

Nicht unterstützt

QueryDef-Objekt

Schreibgeschützt

Recordset-Objekt

Schreibgeschützt

Relation-Objekt

Nicht unterstützt

TableDef-Objekt

Lesen/Schreiben

Mit der Required-Eigenschaft können Sie in Kombination mit der AllowZeroLength -, ValidateOnSet - oder ValidationRule -Eigenschaft die Gültigkeit des Werts der Value -Eigenschaft für dieses Field-Objekt überprüfen. Wenn die Required-Eigenschaft den Wert Falsehat, kann das Feld null-Werte enthalten und ebenso Werte, die die von den Eigenschaften AllowZeroLength und ValidationRule festgelegten Bedingungen erfüllen.

Hinweis

[!HINWEIS] Wenn Sie diese Eigenschaft sowohl für ein Index- als auch für ein Field-Objekt festlegen können, sollten Sie sie für das Field-Objekt festlegen. Die Gültigkeit des Werts dieser Eigenschaft wird zuerst für das Field-Objekt und erst danach für das Index-Objekt überprüft.

Beispiel

This example uses the Required property to report which fields in three different tables must contain data in order for a new record to be added. The RequiredOutput procedure is required for this procedure to run.

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