我需要使用完全独立的外部VB程序构建Arena仿真模型,而不是使用内置VBA编程功能。我在构建此类程序方面取得了一些进展,但对行为并不满意。
- 当前代码 -
Try
arenaApp = CType(CreateObject("Arena.Application"), Arena.Application)
arenaModel = arenaApp.Models.Add
... some code to build model, adding modules, blah blah blah, ...
arenaModel.SaveAs(fileName)
Finally
If (arenaApp IsNot Nothing) Then arenaApp.Quit()
End Try
- 平台 -
非常感谢。
Yam Hon答案 0 :(得分:0)
我无法直接回答您的问题。但是,我建议查看有关竞技场集成和自定义的以下讲义。
http://dept.lamar.edu/industrial/Underdown/Simulation/ch10.ppt
对于您遇到的错误,这些链接与Arena没有直接关系,但可能包含有关“无法创建ActiveX / Com对象”错误的解决方案。