mcs/btests/StructureC6.vb

   1 REM LineNo: 7
   2 REM ExpectedError: BC30435
   3 REM ErrorMessage: Members in a Structure cannot be declared 'Protected'.
   4
   5 Structure S
   6         Dim a As String
   7         Protected Structure S1
   8                 dim g as string
   9         End Structure
  10 End Structure
  11
  12 Module M
  13         Sub Main()
  14                 dim x as S
  15         End Sub
  16 End Module