Sub Example_PlotToFile()
    'Этот пример печатает текущий рисунок в файл.
    
    'Определите имя файла.
    'Используйте "" чтобы выбрать имя рисунока в качестке имени файла.
    Dim plotFileName As String
    plotFileName = "MyPlot"
    
    Dim result As Boolean
        
    result = ThisDrawing.Plot.PlotToFile(plotFileName)
    
End Sub