VB上位机温度采集(共5页).doc
( 4.5 )《VB上位机温度采集(共5页).doc》由会员分享，可在线阅读，更多相关《VB上位机温度采集(共5页).doc（5页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、精选优质文档-倾情为你奉上VB程序Option ExplicitDim NowX As Integer Dim MaxPlotNo As Long Dim PreValue As Single Private Sub cmbCOM_Click() If cmbCOM.ListIndex + 1 = MSComm1.CommPort Then Exit Sub Timer1.Enabled = False TimeDelay 100 If MSComm1.PortOpen ThenMSComm1.PortOpen = False End If lblMsg.Caption = 已停止检测并关闭通
2、讯端口 cmdOpenCOM.Enabled = True End SubPrivate Sub cmdEnd_Click() EndEnd SubPrivate Sub cmdOpenCOM_Click() If cmbCOM.ListIndex = 0 And cmbCOM.ListIndex PreValue + 0.01 Then picVoltage.Line -(NowX, ValueStr), RGB(255, 0, 0) Else picVoltage.Line -(NowX, ValueStr), RGB(0, 0, 255) End If End If PreValue = ValueStr NowX = NowX + 1 If NowX MaxPlotNo Then NowX = 0 End Sub专心-专注-专业
- 配套讲稿：
如PPT文件的首页显示word图标，表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制：
部分文档作品中含有的国旗、国徽等图片，仅作为作品整体效果示例展示，禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词：
- VB 上位 温度 采集
淘文阁 - 分享文档赚钱的网站所有资源均是用户自行上传分享，仅供网友学习交流，未经上传用户书面授权，请勿作他用。
限制150内