用VB编界面 温度报警不正常不知道是什么原因 请用过的大神们赐教

whm

Sub alarm()

If (data(num) >= mindata And data(num) <= maxdata) Then
maxb.FillColor = QBColor(10)
minb.FillColor = QBColor(10)
End If

If (data(num) <= mindata) Then
minb.FillColor = QBColor(12)
End If
If (data(num) >= maxdata)) Then
maxb.FillColor = QBColor(12)
End If
End Sub
这段温度报警的程序有什么不对吗？为什么报警不对，现在是下限报警不正常。
是这段程序出了问题，还是别的程序里需要加什么额外的语句呀？

PCA

data(num)？
完整工程代码发上来，也许可以帮你解决之前设计过一个，给你参考下，可以设置温度报警上下限


做好的上位机软件也给你用一下
数据通信格式：
0XFF(引导码)+节点号(0x01节点一，0x02节点2，0x03节点3)+温度(只取整数位一个字节表示)+结束标志位0X0A

whm

坐等大神们来帮忙。。。

whm

有木有人呀？？

正点原子

帮顶