VB.Net by API/System/Exception — различия между версиями

Материал из VB Эксперт
Перейти к: навигация, поиск
м (1 версия)
 
м (1 версия)
 
(нет различий)

Текущая версия на 15:51, 26 мая 2010

Exception.Message

<source lang="vbnet">

Imports System Public Class MainClass

   Shared Sub Main(ByVal args As String())
       Try
           CalculateValue()
       Catch ex As Exception
           Console.WriteLine( "ex.Message:" & ex.Message )
           Console.WriteLine( "ex.StackTrace:" & ex.StackTrace )
           Console.WriteLine( "ex.ToString:" & ex.ToString )
       End Try
   End Sub
   
   Shared Private Function CalculateValue() As Integer
       Return 1 \ Integer.Parse("0")
   End Function

End Class


 </source>


Exception.StackTrace

<source lang="vbnet"> Imports System Public Class MainClass

   Shared Sub Main(ByVal args As String())
       Try
           CalculateValue()
       Catch ex As Exception
           Console.WriteLine( "ex.Message:" & ex.Message )
           Console.WriteLine( "ex.StackTrace:" & ex.StackTrace )
           Console.WriteLine( "ex.ToString:" & ex.ToString )
       End Try
   End Sub
   
   Shared Private Function CalculateValue() As Integer
       Return 1 \ Integer.Parse("0")
   End Function

End Class


 </source>


Exception.ToString

<source lang="vbnet"> Imports System Public Class MainClass

   Shared Sub Main(ByVal args As String())
       Try
           CalculateValue()
       Catch ex As Exception
           Console.WriteLine( "ex.Message:" & ex.Message )
           Console.WriteLine( "ex.StackTrace:" & ex.StackTrace )
           Console.WriteLine( "ex.ToString:" & ex.ToString )
       End Try
   End Sub
   
   Shared Private Function CalculateValue() As Integer
       Return 1 \ Integer.Parse("0")
   End Function

End Class


 </source>