在dll文件中调用VBA的命令

可以自动加载vba代码文件，然后执行该文件中的宏后卸载该文件。

Imports ZWCAD

Imports ZwSoft.ZwCAD.Runtime
Imports ZwSoft.ZwCAD.ApplicationServices




Public Class ZwApps
    <CommandMethod("callVBA")> _
    Public Sub callVBA()


        Dim fileName As String = "d:\Project.zpvb"


        Dim ZwApp As Object = Application.ZcadApplication '.RunMacro()
        ZwApp.LoadZPVB(fileName)
        ZwApp.RunMacro("test")
        ZwApp.UnloadZPVB(fileName)


    End Sub
End Class