Mega Code Archive

 

Categories / VB.Net Tutorial / Class Module

 

Override ToString method

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 5 62