В настоящее время вы работаете в автономном режиме; ожидается повторное подключение к Интернету

Использование объекта Error управления сценариев

ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.

Эта статья на английском языке:184742
Эта статья помещена в архив. Она предлагается "как есть" и обновляться не будет.
Аннотация
В данной статье описывается сценарий управления ошибки свойства объекта и примеры кода, демонстрирующий использование.
Дополнительная информация
Элемент управления сценария объекта Error широкие сведения основное приложение о сообщения об ошибках сценария. Поддерживаются следующие свойства:
   Property         Description   -----------------------------------------------------------------   Number           Error number.   Description      Error message.   Line             The line number the error occurred on (1 based).   Column           The column number the error occurred on (0 based).   Text*            The text of the line that caused the error.   Source**         What component caused the error.   HelpFile***      Help file name provided by the error source.   HelpContext***   Help context provided by the error source.				

* Значение свойства Text является пустым для ошибок во время выполнения, но содержит данные для ошибок компиляции.

** Свойство Source для VBScript — это ошибка компиляции Microsoft VBScript или ошибка во время выполнения Microsoft VBScript. Если используется другой язык сценариев, система может отличаться.

*** HelpFile и HelpContext свойства являются пустыми, за исключением пользователей при возникновении ошибки.

ВНИМАНИЕ: Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации и гарантии или подразумеваемых, включая, но не ограничиваясь только ими, подразумеваемые гарантии товарности или пригодности для определенной цели. Примеры в данной статье рассчитаны на пользователя, имеющего достаточный уровень знаний соответствующего языка программирования, а также необходимых средств разработки и отладки..

Пошаговый пример

  1. В Visual Basic создайте новый проект (по умолчанию создается форма Form1).
  2. Нажмите кнопку «компоненты» в меню проект и затем установите флажок «Элемента управления Microsoft Script 1.0».
  3. Добавьте в форму Form1 элемент управления сценария (ScriptControl1), текстовое поле (Текст1) и кнопки (Command1). Свойство MultiLine текстового поля равно true. Для удобства использования измените размер Текст1 таким образом, чтобы он размещает 5 строк с 60 символов.
  4. Добавьте следующий код в форму Form1:
          Private Sub Command1_Click()        On Error Resume Next        With ScriptControl1          .Language = "VBScript"          .AllowUI = True          .AddCode Text1.Text          .Run "Test"        End With        If Err Then          MsgBox Err & " " & Error          ListErrors ScriptControl1        End If      End Sub      Private Sub ListErrors(S As ScriptControl)        With S.Error          Debug.Print "Number:", .Number          Debug.Print "Source:", .Source          Debug.Print "Desc:", .Description          Debug.Print "Line: " & .Line, "Column: " & .Column          Debug.Print "Text:", .Text          Debug.Print "Help File:", .HelpFile          Debug.Print "Help Context:", .HelpContext          Debug.Print        End With      End Sub						
  5. Запустите форму Form1 и откройте окно отладки.
  6. В текстовом поле введите следующий сценарий:
          Sub Test        MsgBox == "Hello World"        Err.Raise 555, "Test", "Custom Error", "test.hlp", 5      End Sub						
  7. Нажмите добавленную кнопку.. В результате в окне отладки (фактический выход может меняться в зависимости от версии используется элемент управления сценария) появляется следующее сообщение об ошибке:
          Number:       1002      Source:       Microsoft VBScript compilation error      Desc:         Syntax error      Line: 2       Column: 16      Text:         MsgBox == "Hello World"      Help File:      Help Context:  0						
  8. Удалите из строки MsgBox == и нажмите кнопку еще раз.
  9. MsgBox появится и затем ошибка «555 Custom Error». В окне отладки отображается следующее:
          Number:       555      Source:       Test      Desc:         Custom Error      Line: 3       Column: 8      Text:      Help File:    test.hlp      Help Context: 5						
    Примечание: Номер столбца может изменяться в зависимости от того, следует ли вы Вырезать и вставить код или ввести его вручную без начальных пробелов.
Ссылки
Создать сценарий для элемента управления раздела справки: объект Error

За сведениями о получении управления сценария обратитесь к следующей статье Microsoft Knowledge Base:
184739: Информация: где получить сценарий элемента управления

(c) Корпорация Майкрософт 1998 года, все права защищены. Вклад Алексей Стюард, корпорация Майкрософт
kbScript kbCtrl kbVBA500 kbVBp400 kbVBp500 kbVBp600 kbVBp kbdsd kbDSupport

Свойства

Номер статьи: 184742 — последний просмотр: 12/05/2015 08:36:44 — редакция: 2.0

Microsoft Visual Basic 5.0 Learning Edition, Microsoft Visual Basic 5.0 Professional Edition, Microsoft Visual Basic 6.0 Professional Edition, Microsoft Visual Basic 5.0 Enterprise Edition, Microsoft Visual Basic 4.0 Standard Edition

  • kbnosurvey kbarchive kbgrpdsvb kbhowto kbscript kbvbp kbmt KB184742 KbMtru
Отзывы и предложения