我搞了一个ansystoflac，vb.net编写得可视化得哦
见附件Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
再ansys中直接生成用element.dat
和NLIST.lis
就可以
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
很好,鼓励!!!Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
这个是程序，可能要.net支持已经不需要.net支持
特别提醒：如果单元数目特别多，在element文件中，那些数字之间没有空格的话，这个程序运行要出现错误哦
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
有一个问题，就是如果计算机得内存小，拷贝源代码需要比较大得内存，可能要死机哦，这个有问题哦我这个就是在vb中打开一个文件，同时又打开一个文件成为难题，
所以就用了richtextbox1。
节点控制在10000之内，速度还是可以保障得哦
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
谢谢，都是借鉴本论文，只不过进行了可视化得创作，
但是vb在处理字符串方面有些欠缺，
优待进一步增强其功能
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
有要源代码得吗，其实也就几个关键函数instr（）
replace（）
+
＝
Split（）
在vb.net中打开文件容易多了哦，简要实例如下
-----------------
FileSystem.FileOpen(Filenumber, TextBox1.Text, OpenMode.Input, OpenAccess.Default)
Do While Not FileSystem.EOF(Filenumber)
lstr = FileSystem.LineInput(Filenumber)
'Text1.Text = Text1.Text + Lstr + Chr(13) + Chr(10)
'MsgBox(lstr)
If Len(lstr) > 3 Then
If InStr(lstr, " ") Then
lstr = Replace(lstr, " ", " ")
End If
If InStr(lstr, " ") Then
lstr = Replace(lstr, " ", " ")
End If
If InStr(lstr, " ") Then
lstr = Replace(lstr, " ", " ")
End If
If InStr(lstr, " ") Then
lstr = Replace(lstr, " ", " ")
End If
If InStr(lstr, " ") Then
lstr = Replace(lstr, " ", " ")
End If
If InStr(lstr, "") Then
lstr = Replace(lstr, "", " ")
End If
' MsgBox(lstr)
a11 = Split(lstr, " ", , CompareMethod.Text)
UbA1 = UBound(a11, 1)
'MsgBox(UbA1)
If UbA1 > 1 Then
Str12 = Str12 + "gen point id " + a11(1) + " (" + a11(2) + "," + a11(4) + "," + a11(3) + ")" + Chr(13) + Chr(10)
End If
'MsgBox(Str12)
'End
End If
Loop
Str12 = ""
FileSystem.FileClose(Filenumber)
------------------------------
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
如果没有.net支持，那么就会出现如下错误Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
增加了那个缺失的dll文件，现在可以在windowsxp下，下载直接运行、使用了有什么问题，请和我联系吧
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
window XP 和2003，应该不需要安装运行环境，windows2000可能需要自行安装运行环境，最下的10M左右，也有20M的版本，也有100M的版本哦Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
window XP 和2003，应该不需要安装运行环境，windows2000可能需要自行安装运行环境，最小的10M左右，也有20M的版本，也有100M的版本哦Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
真的很好。Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
支持！Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
今天用了3个小时时间，建立了一个小间距隧道的模型，用这个软件，很快就得到了flac需要的模型，样子可以，但是还没有计算Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
感谢焦苍兄！Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
建立的模型，已经通过计算了，效果还不错，说明写的程序很不错。
但是还是要注意，单元个数的限制哦，比如
element.dat
里面的单元号太多而连接在一起，那么就出错了哦，
这个希望大家注意哦
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
需要.net的支持啊。Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
haca7841 wrote:需要.net的支持啊。
下载一个也就20M左右的运行库就可以了哦。
问搂主:
这个程序生产的是 Flac模型*.sav还是Flac的模型创建 *.dat文件
如果是模型文件,那楼主可很Niu啦;
要是*.dat, 然后还要 new;call *.dat,那时间可是很很长!
我要加油!
Re:我搞了一个ansystoflac，vb.net编写得可视化得哦
Framework 2.0版微软官方下载地址http://www.chinacs.net/archives/4/2005/06/01/3273.html
大概24M
这个程序产生的是*.dat，而起自己拷贝到文本文件中，
用vb开发的，
简化的开发方法。