求一段用vb写的原代码 好的 追加100

用控件 智能编程助手(ICoder)
-----------------------------------------
工具提供在VB 的IDE中添加了一个命令窗口,和工具条在命令窗口中,为了方便编程,提供的各式各样的命令和函数.
工具栏中暂时有4个项:
1,添加版权信息,如同 AddMyInf
2,配置编程助手,同ShowConfig
3,显示类侦探工具,该工具将获取和显示鼠标下的类信息,包括进程ID,标题,文本,Top,Left,Heith,Width,以及子类和子类的信息等.
4,该工具将按照配置放大鼠标下指定大小区域到一定倍数.
工具来3,4,按钮奇次加载,偶次卸载!

下面是命令行相关命令的介绍:

ShowConfig:
显示本配置窗体

AddMyInf
添加版权信息
加 /Bottom 添加到所有代码底部
加 /All 向所有的代码中添加,不加此参数仅向活动代码中添加

RegLib
注册库,比如DLL,OCX
参数为库文件的路径,不在系统目录时请指定具体路径
UnRegLib
反注册库,比如DLL,OCX
参数为库文件的路径,不在系统目录时请指定具体路径

ClsSpy 类侦探工具
/OnLoad 装载窗体
/OffLoad 卸载窗体

ObjZoom 放大镜
/OnLoad 装载窗体
/OffLoad 卸载窗体

DecApi 打开声明API的工具

GetMethodAddress,GMD
获取方法在库中的地址
参数格式 LibName.MethodName
如:kernel32.GetWindowsDirectory

MethodInLib,"MIL"
检查库中是否有此方法,如果有此方法返回该方法的地址
参数格式