Page 101 - Programming VB.NET
P. 101

Code With VB.Net                              97



                     Public Class Second

                         Inherits First

                         Private nilai_z As Integer

                         Public Property Z() As Integer
                             Get

                                 Return nilai_z

                             End Get

                             Set(ByVal value As Integer)

                                 nilai_z = value
                             End Set

                         End Property

                         Public Function getSum() As Integer

                             Dim total As Integer

                             total = X + Y + Z

                             Return total

                         End Function
                     End Class
   96   97   98   99   100   101   102   103   104   105   106