Y
Yousif
Guest
Hi all.
Aku m mencoba menyapu resistansi masukan antena.Aku m menggunakan VBA untuk kode di bawah ini.Hal ini bekerja dengan baik tetapi di mulai dari setiap simulasi simulator bertanya kepadaku apakah saya ingin menghapus hasil lama atau menyimpannya.Jadi saya berpikir untuk menghapus semua hasil di akhir setiap simulasi.Can anyone please help me dengan itu?
Thank you in advance.
YousifSub Utama
For i = 1 Ke 10
'@ Menghapus disamakan elemen: element1
LumpedElement.Delete "element1"
'@ Define disamakan elemen: element1
Dengan LumpedElement
. Reset
. SetName "element1"
. SetType "RLCSerial"
. SetR "1"
. SetL "0"
. SetC "0"
. SetGs "0"
. SetI0 "1e-14"
. P'aturan "300"
. SetP1 "Salah", ".25", "0", "0"
. SetP2 "Salah", "-. 25", "0", "0"
. SetInvert "Salah"
. SetMonitor "Benar"
. Buat
Akhir Dengan'menentukan simulasi
Dengan Solver
. CalculationType "TD-PLW"
. StimulationPort "Plane gelombang"
. StimulationMode "1"
. SteadyStateLimit "-30"
. MeshAdaption "Salah"
. StoreTDResultsInCache "Salah"
. FullDeembedding "Salah"
. UseNetworkComputing "Salah"
Akhir Dengan
'memulai simulasi
Dengan Solver
. Mulai
Akhir Dengan
'menyimpan hasil
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ Tegangan \ Sinyal \ element1 [pw]")
ExportPlotData "vt" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ Tegangan \ | U | linier \ element1 [pw]")
ExportPlotData "vf" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ arus \ Sinyal \ element1 [pw]")
ExportPlotData "itu" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ arus \ | I | linier \ element1 [pw]")
ExportPlotData "jika" & i & ". Sig"'menghapus hasil
Next i
End Sub
Aku m mencoba menyapu resistansi masukan antena.Aku m menggunakan VBA untuk kode di bawah ini.Hal ini bekerja dengan baik tetapi di mulai dari setiap simulasi simulator bertanya kepadaku apakah saya ingin menghapus hasil lama atau menyimpannya.Jadi saya berpikir untuk menghapus semua hasil di akhir setiap simulasi.Can anyone please help me dengan itu?
Thank you in advance.
YousifSub Utama
For i = 1 Ke 10
'@ Menghapus disamakan elemen: element1
LumpedElement.Delete "element1"
'@ Define disamakan elemen: element1
Dengan LumpedElement
. Reset
. SetName "element1"
. SetType "RLCSerial"
. SetR "1"
. SetL "0"
. SetC "0"
. SetGs "0"
. SetI0 "1e-14"
. P'aturan "300"
. SetP1 "Salah", ".25", "0", "0"
. SetP2 "Salah", "-. 25", "0", "0"
. SetInvert "Salah"
. SetMonitor "Benar"
. Buat
Akhir Dengan'menentukan simulasi
Dengan Solver
. CalculationType "TD-PLW"
. StimulationPort "Plane gelombang"
. StimulationMode "1"
. SteadyStateLimit "-30"
. MeshAdaption "Salah"
. StoreTDResultsInCache "Salah"
. FullDeembedding "Salah"
. UseNetworkComputing "Salah"
Akhir Dengan
'memulai simulasi
Dengan Solver
. Mulai
Akhir Dengan
'menyimpan hasil
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ Tegangan \ Sinyal \ element1 [pw]")
ExportPlotData "vt" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ Tegangan \ | U | linier \ element1 [pw]")
ExportPlotData "vf" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ arus \ Sinyal \ element1 [pw]")
ExportPlotData "itu" & i & ". Sig"
SelectTreeItem ( "Hasil 1D \ disamakan Elemen \ arus \ | I | linier \ element1 [pw]")
ExportPlotData "jika" & i & ". Sig"'menghapus hasil
Next i
End Sub