mcs/btests/MustInheritC1.vb

   1 REM LineNo: 15
   2 REM ExpectedError: BC30376
   3 REM ErrorMessage: 'New' cannot be used on class 'C1' because it contains a 'MustOverride' member that has not been overridden.
   4
   5 MustInherit Class C1
   6     Public Function F1()
   7         Dim a As Integer = 10
   8     End Function
   9
  10     Public MustOverride Function F2()
  11 End Class
  12
  13 Module MustInheritC1
  14     Sub Main()
  15         Dim x As C1 = New C1()
  16     End Sub
  17 End Module