断开与代理的连接

Private Sub Disconnect()
    mClient.Disconnect MqttDisconnectionNormal
    ' Use a text control to indicate whether the connection was disconnected
    If mClient.Connected = False Then
        isConnected.Caption = "False"
    End If
End Sub