Описание
Задает или возвращает значение, указывающее, требует ли объект Field непустого (не Null) значения, или требует ли объект Index обязательного заполнения всех полей.

Значение
Задаваемое или возвращаемое значение является выражением типа Boolean и содержит значение True, если в поле не допускаются значения Null.
Для объекта, еще не добавленного в семейство, это свойство доступно для чтения/записи. Для объекта Index значение данного свойства доступно только для чтения, если объект добавлен в семейство Indexes объекта Recordset или TableDef.

Замечания
Доступ к свойству Required зависит от объекта, который содержит семейство Fields, как показано в следующем списке:

• Index - Не поддерживается
• QueryDef - Только чтение
• Recordset - Только чтение
• Relation - Не поддерживается
• TableDef - Чтение/запись

Для объекта Field свойство Required используют вместе со свойствами AllowZeroLength, ValidateOnSet или ValidationRule для определения того, является ли допустимым значение свойства Value данного объекта Field. Если свойство Required имеет значение False, то поле может содержать значения Null, а также любые значения, удовлетворяющие значениям свойств AllowZeroLength и ValidationRule.
Если значение данного свойства можно задать как для объекта Index, так и для объекта Field, то рекомендуется задавать значение данного свойства для объекта Field. Условие на значение объекта Field проверяется раньше, чем аналогичное свойство объекта Index.

Пример
Следующая программа использует свойство Required, чтобы сообщить, какие поля в трех таблицах должны содержать данные при добавлении новой записи. Для выполнения этой процедуры требуется процедура RequiredOutput.

Sub RequiredX()

	Dim dbsNorthwind As Database
	Dim tdfloop As TableDef

	Set dbsNorthwind = OpenDatabase("Борей.mdb")

	With dbsNorthwind
		' Показывает, какие поля в семействе Fields 
		' трех объектов TableDef являются обязательными.
		RequiredOutput .TableDefs("Типы")
		RequiredOutput .TableDefs("Клиенты")
		RequiredOutput .TableDefs("Сотрудники")
		.Close
	End With

End Sub

Sub RequiredOutput(tdfTemp As TableDef)
	Dim fldLoop As Field
	' Отображает семейство Fields указанного объекта TableDef 
	' и печатает значение свойства Required.
	Debug.Print "Поля в " & tdfTemp.Name & ":"
	For Each fldLoop In tdfTemp.Fields
		Debug.Print , fldLoop.Name & ", Required = " & 	fldLoop.Required
	Next fldLoop
End Sub