Luokan perustaminen

Index - Omat luokat - New - Get ja Set - Metodit - Perintä - Overrides - Implements

New - luokan perustaminen

Eisimerkissä alustetaan objekti "Pöytä" käyttäen reseptinä Luokkaa "Huonekalu". Alustettaessa käytetään sanaa New jolloin ajetaan luokan sisällä oleva Sub New, joka tässä asettaa objektin perustamispäivän muistiin.

    Dim Pöytä As Huonekalu = New Huonekalu

    Public Class Huonekalu
        Public Laji As String
        Public Tyyli As String
        Public Ostohinta As Single
        Public ValmVuosi As Date
        Public RekisteröintiPVM As Date
        Sub New() ' new ajetaan aina kun objekti tehdään
            RekisteröintiPVM = Now
        End Sub
    End Class