用继承建立一个继承类
"Inherits"关键字可以用在使一个类继承另一个类的属性、方法、事件等等，所有的类缺省的都是可以继承的，除非被设置为"NoInheritable"关键字。
下面这个例子定义了两个类，第一个类是一个基础类，并且含有一个属性和两个方法，第二个类从第一个类继承了这个属性和两个方法，重载了第二个方法，并且定义了一个新的属性"intProp2"。
Class Class1
  Private intProp1 as Integer
  Sub Method1()
     Messagebox.Show("这是在基本类中的一个方法")
  End Sub
  Overridable Sub aMethod()
     Messagebox.Show("这是在基本类中的另一个方法")
  End Sub
  Property Prop1 As Integer
     Get
        Prop1=intProp1
     End Get
     Set
        intProp1=Value
     End Set
  End Property
End Class
Class Class2
  Private intProp2 As Integer
  Inherits Class1
  property Prop2 As Integer
      Get
          Prop2=intProp2
      End Get
      Set
          IntProp2=Value
      End Set
  End Property
  Overrides Sub aMethod()
      Messagebox.Show("这是在继承类中的一个方法")
  End Sub
End Class
 
Protected Sub TestInheritance()
  Dim C1 As New class1()
  Dim C2 As New class2()
  C1.Method1()
  C2.aMethod()
  C2.Method1()
End Sub
当用户运行过程TextInheritance以后，可以看见如下的信息：
“这是在基本类中的一个方法”
“这是在基本类中的另一个方法”
“这是在基本类中的一个方法”
“这是在继承类中的一个方法