矢量频谱分析仪HP-E4406A自动化控制.docVIP

频谱仪E4406A的自动化控制 需要用到的基本命令，此文以为基础，所以本文的所有命令都是基于形式。 Dim E4406A_2 As Agilent.AgilentSa.Interop.IAgilentSa3 此命令是定义设备实例，继承E4406A的托管代码 E4406A_2 = New Agilent.AgilentSa.Interop.AgilentSaClass 此命令是实现实例 E4406A.Application.Basic.Frequency.Center =此命令是设置basic模式下的中心频率，单位是Hz E4406A.Application.Basic.Spectrum.Marker.Query(pPosition, pAmplitude)、 此命令是获得basic模式下，频谱的marker下的中心频率和增益 E4406A.Application.Basic.Spectrum.FrequencySpan = 1000000 此命令是设置频谱频率范围，单位Hz E4406A.Application.Basic.Spectrum.Average.Enabled = true 此命令是打开“平均”功能 E4406A.Application.Basic.Spectrum.Marker.Search(Agilent.AgilentSaAppBasic.Interop.AgilentSaAppBasicMarkerSearchTypeEnum.AgilentSaAppBasicMarkerSearchTypeMax) 此命令是search到频谱上最大频率点所在位置 Dim val As Boolean=E4406A.Application.Basic.Spectrum.Marker.Enabled 此命令是使能marker，相当于机器控制面板上的search E4406A.Application.Basic.Spectrum.Marker.Trace = Agilent.AgilentSaAppBasic.Interop.AgilentSaAppBasicSpectrumTraceEnum.AgilentSaAppBasicSpectrumTraceSpectrum 此命令设置追踪模式为频谱模式 E4406A.Application.Basic.Spectrum.Bandwidth.ResolutionAuto = true 此命令设置分辨率带宽为auto，false为man E4406A.Application.Basic.Spectrum.Bandwidth.Resolution = 100000 此命令设置分辨率带宽为 100000，单位Hz E4406A.System.TimeoutMilliseconds = 2000 此命令设置系统超时时间，单位为：ms E4406A.System.IO.IO.TerminationCharacter = 10 此命令设置终端字符为10 E4406A.System.IO.IO.TerminationCharacterEnabled = false 此命令关闭终端字符，true为开 Dim val As Double=E4406A.Application.Basic.Spectrum.Marker.Positione 此命令获得basic模式下，频谱的最高中心频率 E4406A.Application.Select(Basic) 此命令选择模式 E4406A.Application.Basic.Spectrum.Traces.Initiate() 此命令初始化traces模式 流程图： 编程： 开发环境：visual studio 2012 使用语言：VB.NET 开发平台：window7 下文将讲到必须要准备的配置环境 keysight IO libraries suits，次软件必须部署在需要部署此软件的电脑上，或者需要自行开发的电脑上。它主要提供了基于IVI-COM的一些动态支持库。下载地址： /main/software.jspx?cc=CNlc=chinid=-33002.977662id=2175637 AgilentSa IVI-COM driver，提供了E4406A需要的SCPI命令封装 下载地址：/find/inst_drivers  3.command expert，提供了对应仪器的SCPI命令包，并且可以仿真和实时控制，对于开发自动化测试有很大的帮助，强烈建议安装。 下载地址：/zh-C