vba - 使用VBA的竞技场模拟导出报告

Question

我正在编写 VBA 来创建、运行、导出结果。我已经完成了创建和运行模型，但我不知道如何获得报告结果。示例： - 号码输出： - 平均排队时间： - 转移时间

Answer 1

我试试这段代码，它对我有用

i = s.SymbolNumber("Entity 1") j = s.EntitiesNumberOutOfType(i) entity_out(n) = j ' Current NumberOfQueue i = s.SymbolNumber("Process 1.Queue") j = s.QueueNumberOfEntities(i) entity_queue_1(n) = j