断开连接事件
Private Sub mClient_Disconnected(ByVal Message As MQTTDisconnectedEvent) MsgBox Message.Description & Message.Reason End Sub
提供反馈
Private Sub mClient_Disconnected(ByVal Message As MQTTDisconnectedEvent) MsgBox Message.Description & Message.Reason End Sub