NotInheritable Class C1 End Class Module Module1 Sub Main() Dim x As New C1() End Sub End Module