meding 发表于 2008-5-28 22:41:15

请教VB和ANSYS

本人是ANSYS初学者,正在做VB调用ANSYS的设计,我找了一个用记事本写的弹簧建模的语句如下:

fini
/cle
/filname,ring,1
/prep7
*AFUN,DEG
TOT=12      !一个螺距上沿圆周分割的点数
N_num=5    !螺距数
p_dis=0.8!螺距
N=TOT*n_num !整个弹簧的点数
cic=360

et,1,45    !弹簧采用的单元
et,2,200    !给面划网格的MESH200单元
keyopt,2,1,6

DIV=cic/TOT !两点将的圆心角
DIS=p_dis/TOT !螺距
rid=1      !弹簧主半径
rid2=0.1    !弹簧截面半径
csys,1

*DO,I,1,N+1
k,I,rid,(I-1)*DIV,(I-1)*DIS
*ENDDO

flst,3,N+1,3
*do,i,1,N+1
fitem,3,i
*enddo
bsplin,,p51x

csys,0
wprot,,90
wpoff,rid
pcirc,rid2,,0,360

asel,all
lsla,s
lesi,all,,,4
type,2
mshkey,0
amesh,all
eplot


type,1
extopt,esize,300
vdrag,1,,,,,,1
eplot



在很多相关的帖子里看到VB调用ANSYS的关键语句是:
Private Sub Command1_Click()
Dim x
x = Shell("D:\ANSYS\v81\ANSYS\bin\intel\ansys81.exe - g - i E:\test\&ex1.txt& - o E:\test\&ex1.out&")
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


疑问是:接下来该怎么做?在ANSYS中怎样打开刚才写的语句;输入和输出文件&ex1.txt&、&ex1.out&是怎样生成的?里面包括什么内容;file.err又是怎么生成的.

希望大家多多指教,谢谢.

tomandzx 发表于 2008-6-4 20:38:46

&ex1.txt
是你编的命令流
ex1.out
是运行过程
页: [1]
查看完整版本: 请教VB和ANSYS