數(shù)據(jù)批處理
來源:
更新時(shí)間: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
批量導(dǎo)出電流密度?
咋了
代碼不知道有沒有問題,我就是查不出來