最近换鼓包红米NOTE9Pro电池,发现买错了小米NOTE的尺寸和排序对,找了很久电池母座,在嘉立创中找到了C841001_板对板与背板连接器_CPBC308-0301F_规格书

本文链接：https://blog.csdn.net/jianpf/article/details/146383712

最近换鼓包红米NOTE9Pro电池,发现买错了小米NOTE的尺寸和排序对,找了很久电池母座,在嘉立创中找到了C841001_板对板与背板连接器_CPBC308-0301F_规格书_SMK板对板连接器.!(结果…不是这款连接器,失败)

请添加图片描述
在这里插入图片描述

好像华为40系列电池母座也是这规格(未确定)

在这里插入图片描述

淘宝60元买错了块小米电池,想给其他设备用.
买了2个对应的电池母座,发现焊接好线会掉卡扣铜片(塑料母框也容易折断,用美纹胶纸固定也不牢固)
卡尺量尺寸在嘉立创画封装,导出DXF文件,想在CAD中用zoom_s比例来在屏幕上1:1把母座对引脚.
发现CAD没装,就用SolidWorks草图导入DXF,SolidWorks没有zoom缩放视图比例的命令,画了张名片尺寸,放在屏幕对比,只能滚到差不多比例(CAD失败).
问AI后Kimi给出了vba的宏代码并创建了宏按钮,后来发现线条宽度最低0.12,缩小后线是几个像素糊了(sw失败).

'solidwork2024仿照CAD的SC命令缩放视图V1.1JianPF2025.3.18x5小时调试完成版
'导入宏按钮方法:
'SolidWork>菜单>工具>自定义>命令选项卡>工具栏>宏>新建宏按钮>托动到工具栏上>宏>文件路径>确定

Option Explicit

Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swModView As SldWorks.ModelView

Sub main()
On Error GoTo ErrorHandler ' 指定错误处理程序
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set swModView = swModel.ActiveView
    
    ' 设置缩放比例为1:1
    swModView.Scale2 = 1
    ' 刷新视图
    swModel.GraphicsRedraw2
    
    ' 提示用户输入直线长度
    Dim actualLength As Double
    actualLength = InputBox("默认0是缩放比例输入:0" & vbCrLf & "请输入直线的实际绘制长度（单位：mm）：", "比例或实际长度输入", 0)
    
    '判断是否比例输入
    If (actualLength = 0) Then
    Dim scv As Double
    scv = InputBox("当前比例为:" & swModView.Scale2 & vbCrLf & "请输入视图缩放比例：", "测量值输入", 1#)
    '输出调试记录
        Debug.Print "比例输入:=" & scv
    ' 应用新的缩放比例
    swModView.Scale2 = scv
    ' 刷新视图
    swModel.GraphicsRedraw2
    Else
        
        ' 提示用户输入测量的屏幕值
        Dim measuredLength As Double
        measuredLength = InputBox("请输入使用尺子测量的屏幕上的直线长度（单位：mm）：", "测量值输入")
        
        ' 比较实际长度和测量值
        Dim scalefactor As Double
        If actualLength > measuredLength Then
    
            ' 否则按实际长度/测量值调整比例
            scalefactor = actualLength / measuredLength
        Else
                    ' 如果实际长度大于测量值，按测量值/实际长度调整比例
            scalefactor = measuredLength / actualLength
        End If
        
        ' 应用新的缩放比例
        swModView.Scale2 = scalefactor
        ' 刷新视图
        swModel.GraphicsRedraw2
        
        '再次判断
        Dim result As VbMsgBoxResult
        Dim scalefactor2 As Double
        scalefactor2 = actualLength / measuredLength
        
        '输出调试记录
        Debug.Print "比例记录:=" & scalefactor & "|" & scalefactor2
        ' 显示消息框并获取用户点击的按钮
        result = MsgBox("视图比例已调整为：" & scalefactor & "倍" & vbCrLf & "是否按反比例缩放为:" & scalefactor2 & "倍", vbYesNoCancel + vbExclamation, "比例")
        
        If (result = vbYes) Then
        ' 应用新的缩放比例
        swModView.Scale2 = scalefactor2
        ' 刷新视图
        swModel.GraphicsRedraw2
        
        MsgBox "视图比例已调整为：" & scalefactor2 & "倍", vbInformation, "比例"
        End If
    End If

    ' 将视图模式改成平移模式???2025.3.18.JianPF
    'swModel.Extension.SetViewOrientation swModel.GetOrientation
    'swModel.GraphicsRedraw2
    
'指定错误处理程序且顺序也会执行
ErrorHandler:
    ' 提示用户视图模式已改成平移模式
    MsgBox "请按住 Ctrl+鼠标中键 平移或右键菜单选择平移固定", vbInformation, "视图平移"
    
    
    
End Sub

仓库地址 git clone git@gitee.com:jianpf/sw2vba.git

在这里插入图片描述
6.MSTSC远程到我有CAD的电脑上,导入DXF,用rec矩形命令画卡片的尺寸(8553mm)和中间一个正方形(55mm),再输入zoom回车框选正方形放大显示后,再输入Zoom回车s回车1回车,先按1:1比例显示屏幕(此时CAD窗口不许移动或改变大小,否则需要重新1:1一次),如果不能看到卡片只能看到正方形(55mm)的就说明屏幕分辨率放大倍率过大(可以进入桌面右键屏幕设置,这里不设置,笔者就是只看到55的正方形),用透明卡片垫着屏幕上(防止卡尺或卷尺子戳破屏幕,建议用塑料尺)测出线的长度,这里测的屏幕正方形20mm,用5/20=0.25倍就是视图缩放倍率了,输入zoom回车s回车0.25回车后,屏幕显示55mm的正方形,再用尺子测量,测得刚好5mm(由于透明卡片垫高存在一点误差抵消了)(如果前面1:1比例可以看到8553的尺寸比如只测85的线测的4*85=340mm长,用85/340=0.25倍一样道理).好了CAD已经按0.25比例映射到实际尺寸了,现在可以用鼠标中间移动视图(不要滚动视图缩放了,否则就再次输入0.25比例就好),找到DXF的封装引脚图,把电池母座放屏幕上,完美匹配上了(因为4K分辨率屏幕是35寸还是差一点,如果4K屏幕尺寸是14寸应该1像素对准的,这时为什么不放到手机上手动缩放微调呢?正蠢啊!),到此完美匹配说明可以打样了.
在这里插入图片描述

在这里插入图片描述

在这里插入图片描述

(公座是电池FPC软板上的边头(中间凹),母是手机主板上的边头(双凹凹),傻傻分不清中)

7.出于首次画贴片引脚,还是找了2天找到了电池座的型号,打样电路图和元件下单回来才知道.(问了几个AI都找不到,联系手机厂家,可能是我问的(关键词电池扣)方式不对,最后不知道哪个维修图纸要付费网站找到了关键词(背板连接器),然后再嘉立创中找到了(C841001),首次领取使用优惠价20还买了其他最后2元尝新价下单.(最后发现好像最后面C841002这款更像母座,赶紧看看,就写到这里,等到货后再补充…是错成本50内就是有点耗时间)

在这里插入图片描述
在嘉立创EDA专业版中收藏(吃灰)起来先.