这是我的代码，是通信模块的，第一个判断是判断是否接收到信息的判断。第二个if是判断当前信号是否联通，我设定的是当收到0x1F的时候认为通信正常，然后才进行收发，标志位就是 State_Comm，并且我设定的串口空间Mscomm的接收方式是接收二进制代码。但是始终卡在Tag_Temp = &H1F 这句话上，好像系统根本就不进行判断。
Sub OnComm(Byval Item)
Dim Tag_Temp
Dim Tag_Receive
Dim Delta_Set
Dim State_Comm

Set Tag_Receive = HMIRuntime.Tags("Tag_Receive")
Set Delta_Set = HMIRuntime.Tags("Delta_Set")
Set State_Comm = HMIRuntime.Tags("State_Comm")

If Item.CommEvent = 2 Then

Tag_Temp = Item.Input
Tag_Receive.Value = Tag_Temp
Tag_Receive.Write

If State_Comm.Read = 0 Then
HMIRuntime.Trace("通信没有建立" & vbCrLf)
If  Tag_Temp = 0 Then
HMIRuntime.Trace("1.5.1" & vbCrLf)
State_Comm.Write 1
Item.Output = "?"
Else
HMIRuntime.Trace("1.5.2" & vbCrLf)
End If
Else
HMIRuntime.Trace("通信已经建立" & vbCrLf)
Delta_Set.Value = Tag_Temp
Delta_Set.Write
End If

End If
End Sub