本文整理匯總了VB.NET中Microsoft.VisualBasic.ErrObject.Raise方法的典型用法代碼示例。如果您正苦於以下問題：VB.NET ErrObject.Raise方法的具體用法？VB.NET ErrObject.Raise怎麽用？VB.NET ErrObject.Raise使用的例子？那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。
在下文中一共展示了ErrObject.Raise方法的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Module1
Module Module1
Const WidthErrorNumber As Integer = 1000
Const WidthHelpOffset As Object = 100
Sub Main()
CallingProcedure()
End Sub
Sub TestWidth(ByVal width As Integer)
If width > 1000 Then
' Replace HelpFile.hlp with the full path to an appropriate
' help file for the error. Notice that you add the error
' number you want to use to the vbObjectError constant.
' This assures that it will not conflict with a Visual
' Basic error.
Err.Raise(vbObjectError + WidthErrorNumber, "ConsoleApplication1.Module1.TestWidth",
"Width must be less than 1000.", "HelpFile.hlp", WidthHelpOffset)
End If
End Sub
Sub CallingProcedure()
Try
' The error is raised in TestWidth.
TestWidth(2000)
Catch ex As Exception
' The Err object can access a number of pieces of
' information about the error.
Console.WriteLine("Information available from Err object:")
Console.WriteLine(Err.Number)
Console.WriteLine(Err.Description)
Console.WriteLine(Err.Source)
Console.WriteLine(Err.HelpFile)
Console.WriteLine(Err.HelpContext)
Console.WriteLine(Err.GetException)
Console.WriteLine(vbCrLf & "Information available from Exception object:")
Console.WriteLine(ex.Message)
Console.WriteLine(ex.ToString)
Err.Clear()
End Try
End Sub
End Module輸出：
Information available from Err object: -2147220504 Width must be less than 1000. ConsoleApplication1.Module1.TestWidth HelpFile.hlp 100 System.Exception: Width must be less than 1000. at Microsoft.VisualBasic.ErrObject.Raise(Int32 Number, Object Source, Object Description, Object HelpFile, Object HelpContext) at ConsoleApplication1.Module1.TestWidth(Int32 width) in C:\Users\example\App Data\Local\Temporary Projects\ConsoleApplication1\Module1.vb:line 17 at ConsoleApplication1.Module1.CallingProcedure() in C:\Users\example\AppData \Local\Temporary Projects\ConsoleApplication1\Module1.vb:line 25 Information available from Exception object: Width must be less than 1000. System.Exception: Width must be less than 1000. at Microsoft.VisualBasic.ErrObject.Raise(Int32 Number, Object Source, Object Description, Object HelpFile, Object HelpContext) at ConsoleApplication1.Module1.TestWidth(Int32 width) in C:\Users\example\App Data\Local\Temporary Projects\ConsoleApplication1\Module1.vb:line 17 at ConsoleApplication1.Module1.CallingProcedure() in C:\Users\example\AppData \Local\Temporary Projects\ConsoleApplication1\Module1.vb:line 25