vba能接受lisp参数吗？

longcs

请问各位，在lisp程序下vba能否象arx一样带参数执行，如（getdr par1 par2)
其中getdr为vba宏名，par1，par2为参数。

efan2000

这是ACAD的技术文档中介绍的，可以参考一下。

2. 
   
3. 将参数转给VBA宏
   
4.   
   
5. 产品： 操作系统：
   
6. AutoCAD(R) 2000 Windows NT 4.0, Windows 95, Windows 98
   
7. 
   
8. 修订时间： 1/20/2000 文档编号： TS20335
   
9. 
   
10. 问题：
    
11. 是否可以将变量传给VBA宏？不可能直接将参数从AutoCAD转给VBA宏，但是，可以用VBA中的GetString函数和AutoLISP中的（command）功能来传递数据。
    
12. 
    
13. 解决方法：
    
14. 这个例子显示了如何使用VBA和AutoLISP，将数据传递给VBA的宏：
    
15. 在“MODULE”中：
    
16. 
    
17. Public Param1, Param2 As String
    
18. 
    
19. 
    
20. Sub MyMacro()
    
21. Param1 = ThisDrawing.Utility.GetString(False)
    
22.         Param2 = ThisDrawing.Utility.GetString(False)
    
23.         
    
24.         'Enter your code here
    
25. End Sub
    
26. 然后按如下方法调用VBA宏：
    
27. (command "-VBARUN" " MyMacro " "Argument1" "Argument2")
    
28. 注意： 在调用宏以前需要加载项目，另外也可以用 (command VBALOAD projectName.dvb) 来加载项目。
    
29. Related Technical Solutions  
    

<br /> 将参数转给VBA宏 <br />   <br /> 产品： 操作系统： <br /> AutoCAD(R) 2000 Windows NT 4.0, Windows 95, Windows 98 <br /> <br /> 修订时间： 1/20/2000 文档编号： TS20335 <br /> <br /> 问题： <br /> 是否可以将变量传给VBA宏？不可能直接将参数从AutoCAD转给VBA宏，但是，可以用VBA中的GetString函数和AutoLISP中的（command）功能来传递数据。 <br /> <br /> 解决方法： <br /> 这个例子显示了如何使用VBA和AutoLISP，将数据传递给VBA的宏： <br /> 在“MODULE”中： <br /> <br /> Public Param1, Param2 As String<br /> <br /> <br /> Sub MyMacro()<br /> Param1 = ThisDrawing.Utility.GetString(False)<br />         Param2 = ThisDrawing.Utility.GetString(False)<br />         <br />         'Enter your code here<br /> End Sub<br /> 然后按如下方法调用VBA宏： <br /> (command "-VBARUN" " MyMacro " "Argument1" "Argument2")<br /> 注意： 在调用宏以前需要加载项目，另外也可以用 (command VBALOAD projectName.dvb) 来加载项目。 <br /> Related Technical Solutions  <br />

longcs

谢谢