Android Question MQTT B4A

Sub Process_Globals
    Public client As MqttClient
End Sub

Sub ConnectMQTT
    Log("Connecting")
    client.Initialize("client", "tcp://your_server:your_port", "your_topic")
'    client.Connect  ***If you don't need user and password, then uncomment this line and comment the 3 next ones
    Dim options As MqttConnectOptions
    options.Initialize("your_user", "your_password")
    client.Connect2(options)
End Sub

Private Sub client_MessageArrived (Topic As String, Payload() As Byte)
    Dim obj As Object = serializator.ConvertBytesToObject(Payload)
    Dim msg As String = obj
    Log("Topic: " & Topic  & " Mensaje: " & msg)
End Sub