• 艾伟_转载:趣味问题:你能用Reflection.Emit生成这段代码吗? 狼人:


    众所周知,Reflection.Emit是非常强大的工具,可以在运行时动态生成各种程序集、类型和方法的IL代码,几乎无所不能。原先我也是这样认为的,但是看了某个人的博客之后我发现想要用Reflection.Emit做一些特殊的事情还是很需要技巧性的。假设你还没有看过那个人的博客(暂时先不公开……)可以尝试一下这个问题。下面的代码可以用vbc.exe正确编译(当然等价C#程序也可以经试验C#编译器无法处理该逻辑,各位参照VB的行为吧)。。。

    Class A
    Implements B.I
    End Class

    Class B
    Inherits A
    Interface I

    End Interface
    End Class

    代码的逻辑是这样的,A实现了接口I,而I是B的内嵌类型,B又继承自A。非常简单。使用TypeBuilder就可以生成这段逻辑了对吧?不太熟悉Reflection.Emit或者已经忘了怎么开始的朋友可以先参考一下下面的代码:

    Imports System.Reflection
    Imports System.Reflection.Emit

    Module Program
    Sub Main()
    Dim name = New AssemblyName("test")
    Dim dasm = AppDomain.CurrentDomain.DefineDynamicAssembly(name, AssemblyBuilderAccess.RunAndSave)
    Dim dmod = dasm.DefineDynamicModule(name.Name, name.Name + ".dll")

    Dim tA = dmod.DefineType("A", TypeAttributes.Public Or TypeAttributes.Class)
    Dim tB = dmod.DefineType("B", TypeAttributes.Public Or TypeAttributes.Class, tA)
    Dim tI = tB.DefineNestedType("I", TypeAttributes.NestedPublic Or TypeAttributes.Interface Or TypeAttributes.Abstract)
    tA.AddInterfaceImplementation(tI)

    '...
    '你需要完成这一部分逻辑,让test.dll包含刚才的三个类型
    '...

    dasm.Save(name.Name
    + ".dll")
    End Sub
    End Module

    注释的地方还没有写完,请你补全它,实现上面提到的那三个类型以及正确的关系。

    (不需要翻译成C#了吧,基本上只需要把Dim改成var再加个分号就是C#了……)

    老实说我也是刚刚知道了大概的方案,还没有动手实验,那就让我们一起开始动手做一做吧。

  • 相关阅读:
    ERROR 2003 (HY000): Can't connect to MySQL server on 'localhost' (10061)
    纷享集成API函数注意点
    纷享开发注意事项:
    Oracle操作表的常见语法
    数据库中的自连接怎么理解
    decode()和SQL语法case表达式
    浮点数之间的等值判断,基本数据类型不能用==来比较,包装数据类型不能用equals来判断
    vue-seamless-scroll 无缝滚动
    vue 实现表格无缝滚动
    echarts5 在vue3 中tooltip显示不出来
  • 原文地址:https://www.cnblogs.com/waw/p/2157040.html
Copyright © 2020-2023  润新知