Example of Object Orientation using Visual Basic