[求助]：斑竹帮帮忙！

锋锋大帝

小弟在用VB开发一个CAD环境下的工艺表格填写系统，如果我需要增加菜单项或者工具条的话！势必要调用VBA工程模块！我想只用VB开发，不想调用VBA，不知道是否可以实现！

efan2000

可以，不过可能需要借助于一些AutoLisp的知识，那样的效果可能会好一点。
如下面是计算器在菜单和工具栏中使用的例子。
在菜单中使用：
ID_CALC  [计算器(&C)...]^C^C^P(STARTAPP "CALC.EXE")(PRINC)

在工具栏中使用：
ID_CALC  [_Button("计算器", "calc.bmp", "calc.bmp")]^C^C^P(STARTAPP "CALC.EXE")(PRINC)

如果能放到一个Lisp文件中，那效果更佳。
在Lisp文件中使用：
(defun c:CALC()
  (startapp "CALC.EXE")
)

在菜单和工具栏中的调用可以简化为：
ID_CALC  [计算器(&C)...]^C^CCALC
ID_CALC  [_Button("计算器", "calc.bmp", "calc.bmp")]^C^CCALC

这种方式允许在命令行上键入：calc就可以调用命令，跟AutoCAD的内部命令相似。

锋锋大帝

这样调用的话，势必要将模块编译成EXE，不能直接调用么？

efan2000

你见过VB的程序能不在调试状态下，不通过编译就能直接运行吗？除非是内嵌的编程语言，否则独立的编程语言如VC、VB、Delphi等都需要编译。