vb怎么调用Illustrator（此前Illustrator未启动）

vb如何调用Illustrator（此前Illustrator未启动）？
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer
Dim documentcount As Long
Dim sampletext As Illustrator.TextFrame
Dim samplepic As Illustrator.GraphItem

Set doc = app.Documents.Add
Set sampletext = doc.TextFrames.Add
'Set samplepic = doc.Gr
sampletext.Position = Array(200, 200)
sampletext.Contents = "hello worldfasdfasdfas"
End Sub 
如运行前已经提前启动Adobe Illustrator软件，一切正常，但如此前Adobe Illustrator软件未启动，执行到“Set doc = app.Documents.Add”系统会提示“activex部件不能创建对象”，应如何修改？非常感谢！

------解决方案--------------------
你在app.Documents.Add前面先调用app.Open 打开一个空的ai文件看看。
------解决方案--------------------
这样的话，可能没有什么好办法了。只有先用 shell “xxxx\Illustrator.exe"打开程序，再调用app.Documents.Add。一般来说，VB这类程序的操作，都要开应用程序的，就是操作word也一样，后台会自动启动word应用程序。