ok try this....
-------------------------------------------------------------
Public Mustinherit Class LeggedAnimal

Private mLegCount as Integer

Public Readonly Property LegCount as Integer
Get
return mLegCount
End Get

Public Sub New(LegCount as Integer)
if LegCount < 1 then
Throw new ArgumentException("Legged Animal nust have  more than 0 legs")
End if
mLegCount = LegCount
End Sub

Public Sub Walk
If mLegCount > 1 then
MsgBox("Animal Walks")
End if
End Sub

End Class

Public Class Dog
Inherits LeggedAnimal

Public Sub WagTail
Msgbox("Dog Wags tail")
End Sub

End Class

Public Module Main
Public sub Main()
Dim Rover as new Dog
Rover.Walk
Rover.Wagtail
End sub
End Module

-------------------------------------------------------------

This proves that the dog can both wag it's tail and use the inherited behaviour
of walking.

Rover is a specific "instance" of the "class" dog.

You can say that "Rover is a Dog" and further that "Rover is an LeggedAnimal"

The Subs (WagTail and Walk) are what we can methods and they are what we
use to do things.
You might think of them as Actions

mLegCount is a Private field. It can only be seen by code that is part of
LeggedAnimal (Not by code that is part of Dog)

LegCount is the public face of mLegCount. It is a readonly property. The
compiler would error if we tried to set it.

We can also have writable and read/writable properties. the main purpose
of a property is to allow us to perform various checks and balances when
either the get or set (TRead and Write aspects of the property) are accessed.

This will act as a brief first example.

Some will find this information too much, others too little.

Please feel free to ask if you have any further questions

--
Rory