Sub Main() Dim App As Object App = CreateObject("PCDLRN.Application") Dim Part As Object Part = App.ActivePartProgram Dim Cmds As Object Cmds = Part.Commands Dim PartProg As Object PartProg = App.ActivePartProgram Part.EXECUTE() PartProg.Close()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)