Шаг 33 - Свойство Description

Описание
Возвращает строковое значение, которое содержит описание ошибки.

Значения
Возвращаемое значение имеет тип String и содержит краткое описание ошибки.

Замечания
Значением свойства Description является краткое описание ошибки. Данное свойство используют для вывода уведомлений об ошибке, которую нельзя или не нужно обрабатывать.

Пример
Следующая программа создает ошибку, перехватывает ее и отображает свойства Description, Number, Source, HelpContext и HelpFile результирующего объекта Error.

Sub DescriptionX()

	Dim dbsTest As Database
	On Error GoTo ОбработчикОшибок
	' Преднамеренно генерирует ошибку.
	Set dbsTest = OpenDatabase("NoDatabase")
	Exit Sub

ОбработчикОшибок:
	Dim strError As String
	Dim errLoop As Error
	' Отображает семейство Errors и отображает свойства 
	' каждого объекта Error.
	For Each errLoop In Errors With errLoop
	strError = "Ошибка #" & .Number & vbCr
	strError = strError & 	"    " & .Description & vbCr
	strError = strError & 	"    (Источник: " & .Source & ")" & vbCr
	strError = strError & 	"Нажмите F1 для вызова раздела " & .HelpContext & vbCr
	strError = strError & 	"    из файла " & .HelpFile & "."
	End With
	MsgBox strError
	Next
	Resume Next

End Sub

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 21.02.2002