coreldraw 与VB.NET

VB.NET 中使用coreldraw

Imports CorelDRAW

Dim CdrApp As New CorelDRAW.Application
CdrApp.Visible = True
Dim doc As Document = CdrApp.ActiveDocument
If (doc Is Nothing) Then
doc = CdrApp.CreateDocument
End If
Dim lay As Layer = doc.ActiveLayer
CdrApp.Unit = cdrUnit.cdrMillimeter

函数

CreateRectangle 创建矩形框  lay.CreateRectangle(0, 0, ryWidth, ryHeight)
CreateLineSegment 创建线段 
OutLine.SetNoOutLine() 无外框线
SizeWidth() 宽度 
MasterPage 主页 
doc.MasterPage.SizeWidth 主页宽度
Group 打组
InsertPagesEx 插入页面
Activete 激活页面
文本设置
Story.Size 
Story.Font

AddToSelection 
Duplicate 复制一份
Move 移动位置

SendKeys.SendWait("^.") 发送按键
My.Application.DoEvents() 等待

示例：

Dim FrameRect As Shape = lay.CreateRectangle(0, 0, ryWidth, ryHeight)
        Dim LeftRect As Shape = lay.