How to create a class inherited from StringConverter by Reflection.Emit (Dynamically)

[Mohamed Ali Jinnah]

Hi all, Please can you help me on this. I want to create a class dynamically which is inherited from StringConverter with help of Reflection.Emit. Class --------------------------------- Public Class EngStatusConverter Inherits StringConverter Public Overloads Overrides Function GetStandardValuesSupported(ByVal context As ITypeDescriptorContext) As Boolean Return True End Function Public Overloads Overrides Function GetStandardValues(ByVal context As ITypeDescriptorContext) As StandardValuesCollection Return New StandardValuesCollection(New String() {"RUNNING", "IDLE"}) 'Return New StandardValuesCollection(sStdValues) End Function Public Overloads Overrides Function GetStandardValuesExclusive(ByVal context As ITypeDescriptorContext) As Boolean Return True End Function End Class Using Reflection.Emit ---------------------------- Dim oTypeBuilder As TypeBuilder = Nothing Dim oMethodBuilder As MethodBuilder = Nothing Dim oILGenerator As ILGenerator = Nothing Dim oConstructorInfo As ConstructorInfo = Nothing Dim oParams() As Type Try oTypeBuilder = foModuleBuilder.DefineType("EngStatusConverter", TypeAttributes.Class, GetType(StringConverter)) oMethodBuilder = oTypeBuilder.DefineMethod("GetStandardValuesSupported", MethodAttributes.Public, GetType(Boolean), New Type() {GetType(ITypeDescriptorContext)}) oILGenerator = oMethodBuilder.GetILGenerator oILGenerator.Emit(OpCodes.Ldarg_0, CType(True, Object)) oILGenerator.Emit(OpCodes.Ret) oMethodBuilder = oTypeBuilder.DefineMethod("GetStandardValues", MethodAttributes.Public, GetType(StandardValuesCollection), New Type() {GetType(ITypeDescriptorContext)}) oILGenerator = oMethodBuilder.GetILGenerator oParams = New Type() {GetType(String)} oConstructorInfo = GetType(StandardValuesCollection).GetConstructor(oParams) oILGenerator.Emit(OpCodes.Ldarg_0, oConstructorInfo) oILGenerator.Emit(OpCodes.Ret) oMethodBuilder = oTypeBuilder.DefineMethod("GetStandardValuesExclusive", MethodAttributes.Public, GetType(Boolean), New Type() {GetType(ITypeDescriptorContext)}) oILGenerator = oMethodBuilder.GetILGenerator oILGenerator.Emit(OpCodes.Ldarg_0