:1004-2539(2010)12-0027-03(,450002)以各类机械中常用的齿式棘轮机构的设计为例,建立了棘轮机构参数化设计的数学模型,利用VB对AutoCAD的二次开发技术,成功实现了棘轮机构的参数化设计该系统在选定棘轮机构的设计参数情况下,能够计算相关参数,对设计结果进行自动校验,并可以实现棘轮机构工程图的自动输出,进行尺寸参数及技术条件的标注,提高了棘轮机构的设计效率为棘轮机构的数字化设计加工提供了理论依据棘轮机构参数化设计VBCAD二次开发TheParametricDesignofRatchetMechanismWangLiangwenLiAnshengTanWeigangZhangXiaohui(CollegeofMechanicalandElectricalEngineering,ZhengzhouUniversityofLightIndustry,Zhengzhou450002,China)AbstractUsingthetoothratchetmechanismusinginallkindsofmachineasanexample,amathematicalmodelforparametricdesignaboutratchetmechanismisestablished.Theparametricdesignisrealizedbyusingseconddeve-lopingtechnologyforAutoCADinVB.Whenthedesignparameterinthesystemisselected,therelatingparametercanbecalculatedandthedesignresultscanbecheckedautomatically,theratchetmechanismengineeringdrawingcanbegivenoutautomatically,labeldimensionandtechnologytermscanbemarked,theefficiencyisimproved.Atheoret-icalbasisofdigitaldesignandmanufactureforratchetmechanismisprovided.KeywordsRatchetmechanismParametricdesignVBSeconddevelopingtechnologyforAutoCAD0,,[1-3],,VBAutoCAD,,;,;CAD,1,()(1),,[4](2)zjzH()H=2P/z,z,p,z=8~30,j=1,z,H,H,,(3)mp,m,:273412,,,(4)dadfh,(5)A,,1A,AA,B,nnBO1,,1(6),(7)1):1,:dadf,z,AABO2AABBBC,NABC=W,CBCrBABC,2):1,AnnAB,BAO1,AO1=L,O1BABh1BBAW1,Ba1O1d1,3):,h,22a.(A=0b)h=mzsinPzcos(W-Pz)sinW(1)b.hUADcosA=mzsinPzcos(W+A-Pz)cosAsinW(2)22.1VBAutoCADVBIDE,ActiveXAutomation,AutoCAD2.2,,,Auto-CAD,VBAutoCAD,3,,;/0,2.2.13,,,,,,,2820102.2.2,,,,:si=Atn((da/df*Sin(Af))/Sqr(1-(da/df*Sin(Af))^2))s2=si-Afs3=Acos(1-2*a^2/da^2)arr(0)=0:arr(1)=da/2,Setplineobj(0)=acaddoc.ModelSpace.AddLightWeight-Polyline(arr)DimretobjAsVariantDimbasepnt(0To2)AsDoublebasepnt(0)=0#:basepnt(1)=0#:basepnt(2)=0#Setretobj=plineobj(0).ArrayPolar(z,2*pi,basepnt),,2.2.3:SelectCaseCombo1.TextCasedHT150d,IfMjs=MxyThencMsgBoxd,!dElseMsgBoxd,,,,!d,vbExclamation33,m=3,z=30,3~64,V-isualBasic6.0AutoCAD,456[1],.SOLIDEDGE[J].,2002,19(6):33-35.[2],,,.SOLIDEDGE[J].,2003,20(12):26-28.[3],,,.[J].,2006,23(12):44-46.[4],.[M].:,1996:15-30.:20100520:(1963-),,,293412