VB调用ANSYS10

能帮我看看这个程序错在哪里吗？111.txt是用APDL写的，222.txt是一个空的文本文件，用来写入的。谢谢了
Private Sub Command1_Click()
Dim x
x = Shell("C:\Program Files\Ansys Inc\v100\ANSYS\bin\intel\ansys100.exe
- b - i E:\VB\VB&ANSYS\111.txt - o E:\VB\VB&ANSYS\222.txt")
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
If Dir("E:\test\file.err") <> "" Then
MsgBox ("Finish")
Timer1.Enabled = False
End If
End Sub...

谢谢啊

result = Shell("C:\Program Files\Ansys Inc\v100\ANSYS\bin\intel\ansys100.exe -b -p ane3fl -i input_file -o output_file ")
其中ane3fl为ANSYS产品特征代码，input_file 为用APDL编写的ANSYS输入文件，output_file为输出文件。
关于VB调用ANSYS的文章比较多，可以看看邵军等写的《基于VB的ANSYS二次开发》:)