文件名称：PC机与智能仪器串口通信
文件大小：4KB
文件格式：ZIP
更新时间：2015-10-22 17:39:38
vb pc 串口通信
'定义窗体级变量 '在显示、绘图、报警等过程中使用 Dim datatemp(1000) As Single '用于存储温度采样值 Dim num As Integer '用于存储采样值个数 '串口初始化 '在窗体的Load事件中加入下列代码对串口进行初始化: Private Sub Form_Load() MSComm1.CommPort = 1 MSComm1.InputMode = 1 MSComm1.RThreshold = 1 MSComm1.SThreshold = 1 MSComm1.Settings = "4800,n,8,2" MSComm1.PortOpen = True Call tabinit '调用表格初始化子程序 End Sub '开始采集 Private Sub Cmdstart_Click() Timer1.Enabled = True End Sub '停止采集 Private Sub Cmdstop_Click() Timer1.Enabled = False End Sub '每隔1000ms向仪表发送读数据命令串 '每台仪表有一个仪表号，PC机通过仪表号来识别网上的多台仪表 '程序中仪表号（即地址代号）要与仪表设定值一致，否则不能返回数据。 Private Sub Timer1_Timer() MSComm1.Output = Chr(&H8282;) & Chr(&H52;) & Chr(&HC;) End Sub
【文件预览】：
6．3 PC机与智能仪器串口通信
----工程1.VBW(49B)
----工程1.VBP(775B)
----MSSCCPRJ.SCC(190B)
----FORM1.FRM(12KB)