VB.Net Tutorial/Class Module/ToString — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
|
(нет различий)
|
Версия 16:40, 26 мая 2010
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