数据批处理
来源：
更新时间：2024-08-11
阅读：
' Batch Export Results
Option Explicit
Sub Main()
Dim cst_FileName As String
Dim cst_ASCIIName As String
Dim cst_Frequency As Double
For cst_Frequency = 3.8 To 4.4 STEP 0.01
cst_FileName = "2D/3D Results\Current Density\current(f="+Format(CStr(cst_Frequency))+")[1]"
cst_ASCIIName = "current_f="+Format(CStr(cst_Frequency))+".txt"
SelectTreeitem(cst_FileName)
With ASCIIExport
.Reset
.FileName(cst_ASCIIName)
.Mode("FixedNumber")
.StepX(1)
.StepY(0.2)
.StepZ(1)
.Execute
End With
Next cst_Frequency
End Sub
批量导出电流密度?
咋了
代码不知道有没有问题，我就是查不出来
