VB变压器优化设计分析-1

VB变压器设计程序分析(1)程序流程目录一）对优化设计程序的要求二）优化设计框图三）输入数据四）循环变量五）电抗高度系数六）由最高电密确定线规的步骤七）绕组高确定原则八）主要的编程语句九）信息的输入和输出十）方案优化排队十一）程序调试方法VB变压器设计程序分析(1)一）对优化设计程序的要求1.本设计程序使用VB6.0编写，采用循环遍数法。选择合理的跳出运行出口，节省运行时间。2.从满足性能参数（PO，PK，UK，温升等）约束条件出发，先在选定的铁心尺寸范围内从设定的最高磁密、最高电密开始计算，无解时逐渐降低磁密和电密进行循环计算。3.循环变量：铁心尺寸（或直径）、磁密、电抗高度系数、高压层数、低压层数、最高高压电密、最高低压电密。4.磁密以铁心截面和低压匝数实现。5.为满足阻抗UK要求，输入电抗高度系数，由程序估算绕组高度。VB变压器设计程序分析(1)5.电密以导线截面实现，在绕组高度和设定的层数下导线的宽度也就确定。然后以最小的导线厚度为起点开始运算，每一次循环增加一级导线厚度，直到有解时跳出这一次循环。高、低压导线均如此，要求每一种导线的组合都不放过。6.在循环运算过程中要显示可行解的信息。使设计者了解循环变量范围选取是否合适。7.运算无解时显示计算到什么阶段，便于设计者调整输入数据。8.优化设计后应有人工调整功能。9.设计结果能存于数据库，便于查阅。10.设计结果输出一份详细的计算单，作为技术文件保存。VB变压器设计程序分析(1)二）优化设计程序框图铁心尺寸循环磁密循环电抗高度循环高压线宽循环低压线宽循环高压线厚循环绕组计算UK判断PK判断温升判断PO判断低压线厚循环材料成本计算方案比较排队下一个循环显示十个最优选择方案人工调整保存方案保存计算单绘制铁心图结束输入数据NoNoNoNoYesYesYesYesVB变压器设计程序分析(1)设计程序框图说明：1.磁密循环：实际上是低压匝数循环。2.高压线宽循环：实际上是高压层数循环。3.低压线宽循环：实际上是低压层数循环。4.在取不到线规时，自动跳出进入下一循环。5.人工调整计算时跳出循环和约束条件的限制。VB变压器设计程序分析(1)三）输入数据VB变压器设计程序分析(1)1.一部分数据需人工输入，标准产品的性能参数由程序自动输入。在PrivateSubForm_Load()中打开TXT文件：OpenApp.Path&\&FJGG.TXTForInputAs#1DoUntilEOF(1)‘循环输出Input#1,SP,SHW,SMO,SDOS,SDOL,SMO1IfP=SPThen‘选择所需行的数据HW=SHW:MOO=SMO:DOOS=SDOS:DOOL=SDOL:MOO1=SMO1ExitDo‘选到后退出EndIfLoop‘循环Close#1VB变压器设计程序分析(1)2.为免除反复人工输入，设置了《恢复上次输入》按键。也是一个TXT文件。是调用SC1012模块：SubSC1012()Rem恢复上次输入参数OpenApp.Path&\SFJ-DA2.TXTForInputAs#1Input#1,GXG$Input#1,KEE1,KEE2,IH,IW,BMM,KQ,BM2,DOOS1,DOOS2,DOOL1,DOOL2,M21,M22,TYZ,TYF,TYS,UD1,UD2,DOOLInput#1,M11,M12,U1,U2,JJ,JCU,JQB,JBO,JFE,JAL,JALQB,JALBO,A4,B4,KPO,KPK,JYOU,JGC,JCBXSClose#1EndSubVB变压器设计程序分析(1)3.《恢复上次输入》。完成后存盘，调用SC1013模块：SubSC1013()Rem输入参数存盘OpenApp.Path&\SFJ-DA2.TXTForOutputAs#1Print#1,GXG$Print#1,KEE1,KEE2,IH,IW,BMM,KQ,BM2,DOOS1,DOOS2,DOOL1,DOOL2,M21,M22,TYZ,TYF,TYS,UD1,UD2,DOOLPrint#1,M11,M12,U1,U2,JJ,JCU,JQB,JBO,JFE,JAL,JALQB,JALBO,A4,B4,KPO,KPK,JYOU,JGC,JCBXSClose#1EndSubVB变压器设计程序分析(1)四）循环变量循环变量的设置可参看《输入数据参考》，运行后再作调整。原则是看最优解是否在所设定的范围中部，如最优解在设定铁心的边缘，则应调整铁心的设置。因高压是圆线，不需改线宽，故无需优化层数。VB变压器设计程序分析(1)五）电抗高度系数ForKEE=KEE1ToKEE2Step0.02'电抗高度循环HH0=KEE*1.85*I2*N2*DOO/(ET*UD*10000!)*(DOO/80+2*UD+4+CZ1)‘电抗高度估算公式KEE是电抗高度的循环系数，一般从0.8到1.2，Step步长的大小应小于导线宽的变化率，也就是绕组高度的变化率应小于导线宽的变化率，否则就会漏掉线规的组合，可能漏掉最优解。1.85是经验系数，铜线和铝线不同，不同结构的绕组也有差别。解决的办法是从最优解的列表中看KEE值的范围。VB变压器设计程序分析(1)六）由最高电密确定线规的步骤BD=HH0/((N2/M2+1)*B4*KH2)–JBA2’确定线宽AD=S22/BD’确定线厚AB=Int(Log(AD)*17.452+2.5)’扁线厚数组下标BZ=Int(Log(BD)*17.452-15.5)’扁线宽数组下标如果是圆线则：AC=Int(Log(AG*10)*17.17-18)’圆线宽数组下标这些是从线规的数列得出的公式。有了起始线规的数组下标，以后的循环计算中每次数组下标加1就可以了。VB变压器设计程序分析(1)七）绕组高确定原则1.先算出次级线圈高H2；2.由次级高H2加两线圈高差HGD（即两倍的高低端绝缘差），初步确定高压线圈高H1；H1=H2-HGD*23.由H1算出高压每层匝数N9，由N9最后确定高压线圈高H1；4.由H1加高压端绝缘H11D确定线圈总高H21：H21=H1+H11D*2同时确定低压端绝缘H22D：H22D=H11D-HGDVB变压器设计程序分析(1)八）主要的编程语句1.循环结构Do循环结构DoWhile|Until条件语句块[ExitDo]语句块LoopFor循环结构For计数器=初始值To终止值[Step步长]语句块[ExitFor]Exit[计数器]VB变压器设计程序分析(1)2.选择语句if…Then结构if条件Then语句if条件Then语句块Endifif条件1Then语句块1[Elseif条件1Then语句块2]……[Else语句块n]EndifVB变压器设计程序分析(1)selectcase结构SelectCase变量|表达式Case值1语句块1Case值2语句块2…….[CaseElse语句块n]EndSelect3.联接模块，例如：CallXGJM1'线规截面计算VB变压器设计程序分析(1)八）信息的输入和输出1.输入InputBox函数InputBox（对话框字符串S[，标题S][，文本框字符串][，横坐标值N][，纵横坐标值N][，帮助文件S][，帮助主题号N]）如：U1=InputBox(请输入导变高压（V）：,,10500)VB变压器设计程序分析(1)2.输出MsgBox函数MsgBox（消息文本S[，显示按钮N][，标题S][，帮助文件S][，帮助主题号N]）消息文本——作为消息显示的字符串，超过一行时插入回车符Chr(13)或换行符Chr(10)进行换行。标题——对话框标题显示按钮——是C1+C2+C3+C4的总和，用来指定显示按钮的数目、形式、使用的图标样式。C1：显示按钮的数目（0～5），0—显示OK按钮；1—0—显示OK及Cancel按钮。C2：使用的图标样式16—显示关键信息图标；32—显示疑问图标；48—显示警告图标；64—显示通知图标。VB变压器设计程序分析(1)举例：M=标准:PO=&POT&PK=&PKS&NLM=M&**************************************************************&NL&NLM=M&NO&报价&DOOL&DOOS&N2&M2&CZ11&M1&M1n&PK&PO&UK&A1&B1&A2&B2&KEE&NL&NLForI=0To9M=M&I&KOG1$&MM(I)&KOG1$&D(I)&KOG$&DD(I)&KOG$&N(I)&KOG$&III(I)&KOG$&C(I)&KOG$&II(I)&KOG$&M1n0(I)&KOG$&K(I)&KOG$&O(I)&KOG$&Format(U(I),#.##)&KOG$&aa(I)&KOG$&bb(I)&KOG$&E(I)&KOG$&F(I)&KOG$&KOG$&KE1(I)&NLNextM=M&NL&方案数：&QMsgBoxM,,10个优化方案主要数据VB变压器设计程序分析(1)VB变压器设计程序分析(1)九）方案优化排队Rem可行解方案排队，选取10个最优方案。3010IfZ11ThenZ=11ForI=1ToZ:IfJI=MM(I)ThenReturnNextIMM(Z)=JI:aa(Z)=A1:AA0(Z)=A01:bb(Z)=B1:C(Z)=CZ11:D(Z)=DOOL:DD(Z)=DOOSIfZ=11ThenGoSub3090Z=Z+1:Q=Q+1Return3090ForI=0To9ForJ=I+1To11IfMM(I)=MM(J)ThenGoTo3270H=MM(I):MM(I)=MM(J):MM(J)=HH=aa(I):aa(I)=aa(J):aa(J)=HH=AA0(I):AA0(I)=AA0(J):AA0(J)=HH=bb(I):bb(I)=bb(J):bb(J)=HH=C(I):C(I)=C(J):C(J)=HH=D(I):D(I)=D(J):D(J)=HH=DD(I):DD(I)=DD(J):DD(J)=H3270NextJNextIReturnVB变压器设计程序分析(1)说明：排队的变量有两类：1.重现计算结果必需的变量，如高、低压线规，绕组高度；层数等；2.显示10个最优方案所需的成本、计算的性能参数等。3.上例中因篇幅所限，未全部列出。VB变压器设计程序分析(1)十一）程序调试方法1.设置中断点，运行时查看变量数值VB变压器设计程序分析(1)VB变压器设计程序分析(1)2.设置STOP点，符合设置条件时查看。本例中设置的条件：IfA1=3.28AndA2=5AndB2=8.5ThenStop，到时运行中断，供查阅。VB变压器设计程序分析(1)3.设置Debug，在立即窗口查看变量值的变化，以便判断。全文完