急，vb调用Illustrator的一个动作

需求，vb调用Illustrator导入一个eps.文件，并执行一个ai动作,注意是导入呀！Illustrator是一个知名的绘图软件！

Module Module1
    Sub Main()
        Shell("Illustrator C:\file.eps", AppWinStyle.NormalFocus)
    End Sub
End Module

可以参考这个

https://www.dotnetperls.com/shell-vbnet

或者用 shell “xxxx\Illustrator.exe"打开程序，再调用app.Documents.Add

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
app.Open
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 

望采纳，谢谢

需要执行动作工作面板里的一个动作命令，比如默认动作里的水平镜像

能给一个示例吗