×

PCB设计：如何快速将元器件编号摆放好？资料下载

消耗积分:0 | 格式:pdf | 大小:140.24KB | 2021-04-11

王璐

分享资料个

如上图所示，图中PCB的元器件的编号还没有摆放好，看起来很乱。如何快速将元器件编号摆放好？可以编写一个脚本，一键就能快速摆放好。 首先，打开PCB脚本编辑器，编写以下脚本。 参考代码： Sub Main Dim partFi As Double Dim DocumentUnit,x As Integer DocumentUnit = ActiveDocument.unit ActiveDocument.unit = ppcbUnitMils For Each part In ActiveDocument.Components If part.Labels.Count > 0  Then If GetPartType(part) = "CON" Or GetPartType(part) = "J" Then For x = 1 To part.Labels.Count If part.Labels(x Then  partFi = (((part.PositionX-part.Pins(1).PositionX)^2) + ((part.PositionY-part.Pins(1).PositionY)^2) + ((part.PositionX-part.Pins(part.Pins.Count).PositionX)^2) + ((part.PositionY-part.Pins(part.Pins.Count).PositionY)^2))/2 If partFi<= 5000 Then part.Labels(x).Height=47 part.Labels(x).LineWidth=4 ElseIf PartFi <= 10000 And PartFi > 5000 Then part.Labels(x).Height=47
下载并关注上传者 开通VIP，低至0.08元下载/次

声明：本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人，不代表电子发烧友网立场。文章及其配图仅供工程师学习之用，如有内容侵权或者其他违规问题，请联系本站处理。 举报投诉

评论(0)
发评论

下载排行榜

全部0条评论

快来发表一下你的评论吧 !