Imports System

Public Module Module1

    public Class Vehicle

    End Class

    public Class Car 

    Inherits Vehicle

    End Class

    public Class Motorocycle  

    Inherits Vehicle

    End Class

    Public Sub Main()

        Dim honda as New Car()

​

        Dim harley as New Motorocycle()

​

        harley ; honda

        Console.WriteLine("Hello World")

    End Sub

End Module

​

​