Y2系列 三相感应电动机(VB)辅助程序代码Y2系列 三相感应电动机(VB)辅助程序代码.pdf

Y2系列 三相感应电动机(VB)辅助程序代码Y2系列 三相感应电动机(VB)辅助程序代码.pdf

  1. 1、本文档共23页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Y2系列 三相感应电动机(VB)辅助程序代码Y2系列 三相感应电动机(VB)辅助程序代码

辅助程序代码 Private Sub Command1_Click() Const UN = 380 Const f = 50 Const Z1 = 30 Const Z2 = 26 Const π = 3.14159265358979 Const PN = 4000 Const m1 = 3 Const η1 = 0.85 Const Cosφ = 0.88 Const p = 1 Const b01 = 3.5 Const h01 = 1 Const h11 = 1.3 Const b11 = 6.5 Const h21 = 11 Const r21 = 4 Const δ = 0.4 Const b02 = 1 Const h02 = 0.8 Const h12 = 1.5 Const h22 = 7.5 Const r22 = 2.7 Const b12 = 5.4 Const D1 = 175 Const Di1 = 98 Const Di2 = 38 Const Ns1 = 28 Const a1 = 1 Const Ni1 = 2 Const d11 = 15 Const d111 = 1.04 Const d222 = 1.12 Const Δi = 0.3 Const lt = 130 Const KFe = 0.92 Const β1 = 0.88 Const h = 2 Const KU1 = 1 Const KL1 = 1 Const ρcu = 8.9 * 10 ^ 3 Const ρFe = 7.8 * 10 ^ 3 Const q = 5 Const ∑s = 0.006 Const ρcuw = 0.0217 * 10 ^ (-6) Const ρAl1 = 0.0434 * 10 ^ (-6) Const μ0 = 4 * π * 10 ^ (-7) (一)额定数据及主要尺寸 1、外施相电压UN Φ α = p * 2 * π / Z1 UNφ = UN / Sqr(3) 2、功电流 Ikw = PN / (m1 * UNφ) 8、定转子每极槽数 Zp1 = Z1 / (2 * p) Zp2 = Z2 / (2 * p) 9. 电机主要尺寸 (1)转子外径 D2 = Di1 - 2 * δ (2)铁心有效长度 lef = lt + 2 * δ (3)净铁心长 lfe = KFe * lt 10.极距 τ = π * Di1 / (2 * p) 11.定转子齿距 t1 = π * Di1 / Z1 t2 = π * D2 / Z2 14、转子斜槽 bsk = t1 16、每相串联导体数 Nφ1 = Ns1 * Z1 / (m1 * a1) 17.每相串联匝数 N1 = Nφ1 / 2 18.绕组线规 Ac11 = 0.916 19、槽满率 (1)槽面积 hss = h21 + h11 Ass = (2 * r21 + b11) / 2 * (hss - h) + π * r21 ^ 2 / 2 (2)槽绝缘占面积 Ai = Δi * (2 * hss + π * r21) (3)槽有效面积 Aef = Ass - Ai (4)槽满率 sf = Ni1 * Ns1 * d222 ^ 2 / Aef 20、绕组系数 MMM = Sin(q * α / 2) NNN = q * Sin(α / 2) Kd1 MMM / NNN Kp1 = 1 kdp1 = Kd1 * Kp1 21、每相有效串联导体数 N = Nφ1 * kdp1 (二)磁路计算 22、每极磁通 Kss = 1.18 kE1 = 1.095 110: E1 = kE1 * UNφ 50: Dim kh(8, 1) As Single kh(0, 0) = 1: kh(0, 1) = 1.109 kh(1, 0) = 1.2: kh(1, 1) = 1.095 kh(2, 0) = 1.5: kh(2, 1) = 1.08 kh(3, 0) = 1.7: kh(3, 1) = 1.072

文档评论(0)

pfenejiarz + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档