mcs/mbas/Test/errors/AttributesC6.vb

   1 REM LineNo: 19
   2 REM ExpectedError: BC30045
   3 REM ErrorMessage: Attribute constructor has a parameter of type 'String', which is not an integral, floating-point, or Enum type or one of Char, String, Boolean, or System.Type.
   4
   5 Imports System
   6
   7 'Using byref positional parameters
   8
   9 <AttributeUsage(AttributeTargets.All)> _
  10 Public Class AuthorAttribute
  11      Inherits Attribute
  12         Public Name
  13         Public Sub New(ByRef Name As String)
  14                 Me.Name=Name
  15         End Sub
  16 End Class
  17
  18
  19 <Author("Robin Cook")> _
  20 Public Class C1
  21
  22 End Class
  23
  24 Module Test
  25         Sub Main()
  26
  27         End Sub
  28 End Module