请教HP3457A表的使用问题

pdshyh

输出曲线测量程序：
'输出曲线测量设定
        Private Sub bt_output_Click(sender As Object, e As EventArgs) Handles bt_output.Click
        Dim Ibcurrent As String
        Dim VbeVoltage As String
        Dim Iccurrent As String
        Dim VceVoltage As String
        Dim Ib As String
        Dim Vce As String

        SendCommand("ISET 1," & Initial & ";VSET 1,1;ISET 2,0.5 ;VSET 2,0.02", 2)
        SendCommand("OUT 1,1;OUT 2,1;OUT 3,0;OUT 4,0", 2)
        Sleep(200)
        For j = 1 To 10
            Ib = j * Val(Initial)
            SendCommand("ISET 1," & Ib, 2)
            Sleep(200)
            For i = 1 To Val(VceMax) Step 0.02
                Vce = i * 0.02
                SendCommand("VSET 2," & Vce, 2)
                Sleep(200)
                SendCommand("IOUT? 1", 2)
                Ibcurrent = ReadValue(2)
                Sleep(200)
                SendCommand("VOUT? 1", 2)
                VbeVoltage = ReadValue(2)
                Sleep(200)
                SendCommand("IOUT? 2", 2)
                Iccurrent = ReadValue(2)
                Sleep(200)
                SendCommand("VOUT? 2", 2)
                VceVoltage = ReadValue(2)
                Sleep(200)
                Label3.Text = FormatNumber(CStr(Ibcurrent), 7)
                Label2.Text = FormatNumber(CStr(Iccurrent), 7)
                Label11.Text = FormatNumber(CStr(VceVoltage), 7)
                Label4.Text = FormatNumber(CStr(VbeVoltage), 7)

                Record.AppendText(Now & "输出曲线测量 " & FormatNumber(CStr(Ibcurrent), 10) & " " & FormatNumber(CStr(VbeVoltage), 10) & " " & FormatNumber(CStr(Iccurrent), 10) & " " & FormatNumber(CStr(VceVoltage), 10) & vbCrLf)
                Record.ScrollToCaret()

                fLog.WriteLine(Now & " Ib:Vbe:Ic:Vce " & FormatNumber(CStr(Ibcurrent), 10) & " " & FormatNumber(CStr(VbeVoltage), 10) & " " & FormatNumber(CStr(Iccurrent), 10) & " " & FormatNumber(CStr(VceVoltage), 10))
                fLog.Flush()
                ' Sleep(500)
            Next
            fLog.WriteLine(" 输出曲线测量 Ib= " & Ib)
            fLog.Flush()
        Next
    End Sub

pdshyh

washu 发表于 2019-1-28 15:45
Textbox 和 Label 显示的数据是相同的吗？都是在程序中实时更新的？

Label还是不显示，把延时删除了运行速度快多了，这个模块有问题运行结束死机，输入加10Ω电阻照旧，电源精度1μA,偏差这么大，需要校准？

补充内容 (2019-1-29 07:55):
在办公室把消息框屏蔽 Label 不显示数据，运行结束软件陷入死机。

补充内容 (2019-1-29 10:19):
运行结束软件陷入死机，原因查到，减少循环次数就没有这个问题，这怎么办？

pdshyh

运行生成.exe文件出现错误提示：应用程序发生异常，消息框内容是：有关调用实时(JIT)调试而不是此对话框的详细信息，请参见此消息的结尾。




问题找到了关闭消息框出现的问题，把消息框关联都关了问题就没有了，显示还是老问题。结束显示最后一行

补充内容 (2019-1-29 19:02):
电源电流档误差原因也找到了，电流范围是0.5a,g改为15ma,设定10μa，读数和手持万用表读数接近12μa偏差2μa递增10μa,偏差小于1μa.

补充内容 (2019-2-1 14:38):
Label.text不显示原来例程抄不到，摸索增加Label.Refresh()控件刷新可以了。现在软件多重循环运行稳定性有问题大多遇到其它软件运行或鼠标动作造成运行死机。

dy008

这是我看过的最耐心的老师和最执着的学生！你们二位让我肃然起敬！

pdshyh

dy008 发表于 2019-4-1 14:21
这是我看过的最耐心的老师和最执着的学生！你们二位让我肃然起敬！

      谢谢您的关注和支持，我是无事生非，感谢各位老师指教，我也注意到了。尽量网上搜搜学习。主要自己刚刚接触，空白面比较多，还有高位仪表也是刚刚接触。小城市我的朋友圈没有人玩，没处请教。说明书英文，英文极差，借助网络输入翻译，使用很不方便，很简单的设置和测量，第一次使用，很懵。

laozhu1998

一个台表居然有这么多故事，我还是不考虑了

pdshyh

washu 发表于 2018-8-20 10:03
并未超标，上下限是 ± 0.2 欧姆，不过你使用的短路装置是什么，是否可靠？

超标可重新校准 0 点，但  ...

washu 老师好，我用4个bz3串联接hp6626a恒流，在用HP3457a的 44491卡（去掉了MMCX 端子适配器，直接用网线连接），上位机分别测量每个 bz3电压并记录，采用100plc，测量转换后端卡，测量记录都有动作，出现表测量溢出现象（我的理解），

在每个选择通道测量功能和触发指令后面加Sleep（1000）也不行。
34401a,测量出现100plc和位数选择不一致出现上面的情况，选择一致就解决了。

比葫芦画瓢就遇到困难了

pdshyh

HP3457a 44491卡上位机问题找到了，没有设置使用44491卡，TERM2; ，给的示例有，给忽略了。改完还没试，

pdshyh

HP3457a 入手一年多终于使用上44491卡，使用上位机操作确实很方便。

xinglong1115

恭喜楼主，我的3457a没有44491卡，偶尔用用，前段时间使用中尾部突然砰的一声冒白烟，吓了我一跳，赶紧断电，后检查发现是变压器旁边的电源输入滤波插座冒烟，估计是里面的电容寿命到了，喷出来了不少黑色液体，再次通电发现还能正常使用，为了安全起见就从网上淘了个二手进口拆机的，换了上去，不知道这样对这表的精度有没有什么影响？

pdshyh

xinglong1115 发表于 2019-10-21 10:36
恭喜楼主，我的3457a没有44491卡，偶尔用用，前段时间使用中尾部突然砰的一声冒白烟，吓了我一跳，赶紧断电 ...

谢谢，仪器年代久了电解电容容易出问题，看帖子论坛高手他们到手就把电解电容给换掉，我的动手能力差用着说着。

washu

xinglong1115 发表于 2019-10-21 10:36
恭喜楼主，我的3457a没有44491卡，偶尔用用，前段时间使用中尾部突然砰的一声冒白烟，吓了我一跳，赶紧断电 ...

没有影响，大多数人的 3457、3458 都得要换这个破烂玩意。

不过你们烧这个插座，漏保不跳闸吗？

xinglong1115

washu 发表于 2019-10-21 16:06
没有影响，大多数人的 3457、3458 都得要换这个破烂玩意。

不过你们烧这个插座，漏保不跳闸吗？

我的漏保没跳，我的理解：年代久远，只是电容耐压值下降，击穿漏液，不存在漏电或短路，所以没跳

washu

xinglong1115 发表于 2019-10-21 16:12
我的漏保没跳，我的理解：年代久远，只是电容耐压值下降，击穿漏液，不存在漏电或短路，所以没跳

运气真好，我这里 3458 和 7081 滤波插座烧了之后内部 Y 电容明显漏电

jiangjigt

对楼主pdshyh和washu老师表示感谢和赞同，当我看到这整个16页的交流前我也买了这个HP3457A，没想到这么复杂，路漫漫其修远兮