mcs/btests/OverrideC1.vb

   1 REM LineNo: 19
   2 REM ExpectedError: BC30267
   3 REM ErrorMessage: 'Public Overrides Sub F1()' cannot override 'Public Overrides NotOverridable Sub F1()' because it is declared 'NotOverridable'.
   4
   5 Class A
   6     Public Overridable Sub F1()
   7     End Sub
   8 End Class
   9
  10 Class B
  11     Inherits A
  12     Public Overrides NotOverridable Sub F1()
  13     End Sub
  14 End Class
  15
  16 Class D
  17     Inherits B
  18
  19     Public Overrides Sub F1()
  20     End Sub
  21 End Class
  22
  23
  24 Module OverrideC1
  25     Sub Main()
  26     End Sub
  27 End Module
  28