mcs/btests/OverrideC1.vb

   1 Class B
   2     Public NotOverridable Sub F1()
   3     End Sub
   4 End Class
   5
   6 Class D
   7     Inherits B
   8
   9     Public Overrides Sub F1()
  10     End Sub
  11 End Class
  12
  13 \r
  14 Module OverrideC1\r
  15     Sub Main()\r
  16     End Sub\r
  17 End Module\r
  18 \r