VB中，如何获取指定模块或类模块中，指定过程的全部内容。

比如：模块1中有这样一个过程：

public sub 测试程序()
....
...
...
end sub


我要获取这个测试程序过程的全部内容，输出到窗体Textbox控件中。

最好能写个自定义函数，方便调用，效果如下：

text1.text=定义函数(过程名)

求指点，谢谢！

[ 本帖最后由 opelwang 于 2015-4-10 10:42 编辑 ]

我也想知道。

好吧，你去搜索一下 C 里面一个著名的题目
如何把自身的源代码显示出来的。

你这个问题与那个例示。我也很想知道如何解决的。

感谢版主来参与。

顶一下贴，期待有高手帮忙解决，谢谢！

能不能把要求描述清楚一些。
是不是理解为风吹过B版主所说的程序在运行过程中显示模块中代码？
VB在编译过后，还有模块那样的源代码吗？
模块中的文本是固定不变的，有必要在程序运行时去读取？不如直接把模块的文本装入一个隐藏文本框，再按要求显示你需要的部分。

定义函数(模块名，过程名）

如：

定义函数(模块1,测试程序)，即调用模块1中，测试程序过程中的所有内容。

定义函数(模块1)，即调用模块1中，所有内容。

目的：将获取的内容，输出到窗体textbox控件中或txt文件中。

我这样说，不知道版主能理解吗？

[ 本帖最后由 opelwang 于 2015-4-10 12:17 编辑 ]

这样能方便加入以前开发工程中模块中的代码，是为了满足开发方便的需求吧，并不是查看当前运行工程的模块代码？
这样的话，就是打开模块文件，搜索指定过程名的字符串，提取指定过程名的代码段。

不知道这样解释，版主能理解吗？

望帮忙，谢谢！

破解？我花了半年时间学习，没学到东西，魔高一尺道高一丈。有专业书介绍。

你误会了，仔细看看，不是破解哦。