- 易迪拓培训,专注于微波、射频、天线设计工程师的培养
CST DS用VBA定义隔离器
录入：edatop.com 点击：
最近看一篇论文，在DS工作室用VB控件模块代替理想隔离器。
具体做法是将Miscellaneous中的VB模块放入视图桌面（一定要在naviation tree先右击VBA1，在properties对话框将其设为2 ports，并且勾选 show parameters table inside drawing，否则就显示不了）。
然后可以对该模块进行edit，根据其源代码编辑其S参数。对于理想隔离器，其S矩阵
{S11 S12; S21 S22 } 应为{0 0；1 0}
但我不大懂VB，不知道怎样改写该程序代码得到我想的S参数矩阵
烦请高手帮忙指点指点，谢谢！
具体做法是将Miscellaneous中的VB模块放入视图桌面（一定要在naviation tree先右击VBA1，在properties对话框将其设为2 ports，并且勾选 show parameters table inside drawing，否则就显示不了）。
然后可以对该模块进行edit，根据其源代码编辑其S参数。对于理想隔离器，其S矩阵
{S11 S12; S21 S22 } 应为{0 0；1 0}
但我不大懂VB，不知道怎样改写该程序代码得到我想的S参数矩阵
烦请高手帮忙指点指点，谢谢！
经过这几天不断试验，问题解决了！代码共享！
Function OnS(f As Double, i As Integer, j As Integer) As Variant
'Insert code here
'First parameter is current frequency in Hz
'i and j are 1-based indices
Dim Sij(2) As Double
If i=j Then
Sij(1)=0
Sij(2)=0
ElseIf i>j Then
Sij(1)=-1
Sij(2)=0
Else
Sij(1)=0
Sij(2)=0
End If
OnS = Sij
End Function
申明：网友回复良莠不齐，仅供参考。如需专业解答，请学习易迪拓培训专家讲授的CST视频培训教程。
上一篇：CST DS 仿真并联式开关电源
下一篇：曲面上的功率积分设置
