home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic .NET - Read Less - Learn More / Visual_Basic.NET_Read_Less_Learn_More_Richard_Bowman_Visual_2002.iso / Resources / Code / Ch8-CreateAbstractClass / AbstractClass.vb next >
Text File  |  2001-08-08  |  411b  |  15 lines
  1. Public MustInherit Class AbstractClass
  2.     Public MustOverride Sub Method1(ByVal var As String)
  3.     Public MustOverride Function Method2() As Integer
  4. End Class
  5.  
  6. Public Class ImplementClass
  7.     Inherits AbstractClass
  8.  
  9.     Public Overrides Sub Method1(ByVal var As String)
  10.         MsgBox(var)
  11.     End Sub
  12.     Public Overrides Function Method2() As Integer
  13.         Return 5
  14.     End Function
  15. End Class