Enum and FlagsAttribute

[Nicolas]

How do I set a FlagsAttribute to a run time created enum
I really need a FlagsAttribute for the enum as it will be use to trigger multiple choice
Thanks for the help
Function BuildEnum(ByVal EnumName As String, ByVal args As Hashtable) As Type
Dim ad As AppDomain
Dim an As New AssemblyName
Dim ab As AssemblyBuilder
Dim mb As ModuleBuilder
Dim eb As EnumBuilder
Dim t As Type
Dim ie As IDictionaryEnum erator = args.GetEnumera tor

Try
ad = AppDomain.Curre ntDomain
an.Name = EnumName
ab = ad.DefineDynami cAssembly(an, AssemblyBuilder Access.RunAndSa ve)
mb = ab.DefineDynami cModule(EnumNam e, EnumName & ".dll")
eb = mb.DefineEnum(E numName, TypeAttributes. Public, GetType(Integer ))

While ie.MoveNext
eb.DefineLitera l(ie.Value, CInt(ie.Key))
End While

t = eb.CreateType()
Return t

Catch ex As Exception
''do nothing
Return Nothing

Finally

End Try
End Function

[Mattias Sjögren]

>How do I set a FlagsAttribute to a run time created enum

Something like this:

eb.SetCustomAtt ribute(New
CustomAttribute Builder(GetType (FlagsAttribute ).GetConstructo r(Type.EmptyTyp es),
New Object() {}))
Mattias

--
Mattias Sjögren [C# MVP] mattias @ mvps.org
http://www.msjogren.net/dotnet/ | http://www.dotnetinterop.com
Please reply only to the newsgroup.

[Nicolas]

You'r my man thanks a lot :)

"Mattias Sjögren" <ma************ ********@mvps.o rg> wrote in message
news:%2******** ********@TK2MSF TNGP12.phx.gbl. ..

How do I set a FlagsAttribute to a run time created enum
Something like this:

eb.SetCustomAtt ribute(New

CustomAttribute Builder(GetType (FlagsAttribute ).GetConstructo r(Type.EmptyTyp e
s), New Object() {}))
Mattias

--
Mattias Sjögren [C# MVP] mattias @ mvps.org
http://www.msjogren.net/dotnet/ | http://www.dotnetinterop.com
Please reply only to the newsgroup.