VB.Net Tutorial/Class Module/ToString

Override ToString method

<source lang="vbnet">Option Strict On

Imports System
Public Class Dog
    Private weight As Integer
    Public Sub New(ByVal weight As Integer)
        Me.weight = weight
    End Sub
    Public Overrides Function ToString( ) As String
        Return weight.ToString( )
    End Function 
End Class 
Public Class Tester
    Shared Sub Main( )
        Dim i As Integer = 5
        Console.WriteLine(i.ToString( ))
        Dim milo As New Dog(62)
        Console.WriteLine(milo.ToString( ))
    End Sub 
End Class</source>

5
62