VB.net参数化界面调用ANSYS求解的详细步骤及错误提示的解决办法

VB.net参数化界面调用ANSYS求解的详细步骤及错误提示的解决办法
微软旗下.net平台凭其易操作性、功能强大备受现代码农的喜爱，vb作为一门面向对象的程序语言，有着强大的功能和相对简单的操作，vb.net作为基于vb语言的面向对象的开发平台，同样有着优秀的操作体验以及更加强大的功能。
博主总结自己失败的经验，为了帮助更多需要的人避坑，特在此介绍一下vb.net在引用ANSYS Batch批处理功能时详细的步骤以及新手常常会出现的一些错误以及解决办法，尽管网上关于这方面的帖子很多，但都不够详细具体，希望能够对一些新手有些许的帮助！下面是干货：
**一 >vb.net调用ansys的方式：**vb.net并不能够直接打开ANSYS程序界面进行求解，而是通过调用ANSYS BATCH批处理模块在后台进行命令流文件的导入及求解等步骤，最终在指定的工作目录文件夹中生成相应的DB文件及其他文件（包括结果文件和错误文件等）。
**二 >认识批处理界面：**点击“开始”菜单→找到ANSYS17.0（对应版本）→找到Mechanical APDL Product Launcher，打开界面如下：

✳输入文件及输出文件的格式一般默认为 “.dat”、“.log”等,也可以是mac及其他文本格式。

三 >vb.net输入参数然后输出带参数值的命令流文件：
此处需要用到三个vb.net的函数：

1.“fileopen()”函数：Fileopen(filenumber,filename,mode,openaccess)，定义文件编号及定义读取\写入\追加 操作。

• filenumber：文件编号（自定义）
• filename：需要描述文件的详细路径，例 “c:\users\Mycomputer\Desktop\Auto_modeling.mac”
• mode：调用文件读取函数，默认“Openmode”
• openaccess：要对文件执行的操作，有3种：input-读取；output-写入；append-追加。
  2."printline()"函数：Printline(filenumber,paramArray)，向文件逐行写入双引号内的内容。
• filenumber：要写入的文件的编号
• paramArray：输入文件某行的内容，例 “hello world!”(输出内容需要双引号)
  3."EOF()"函数：EOF(filenumber),这是一个布尔型函数，编号对应的文件进行逐行读取或写入，如果未到达文本末则返回True，若到达文本末则返回False。
• filenumber：文件编号

在vb.net中新建一个参数输入框textbox，假设为textbox1，最终目的是要输出带有textbox1中输入参数值的文本文件，所以需要向文本文件中逐句写入APDL命令，
可利用以下代码：

dim a as integer=1
'设置ansys.mac文件编号为1，设置对文件1执行的操作为写入
fileopen(a,c:\users\mycoumperter\Desktop\ansys.mac,openmode,