Send integer value from Serial Port

[rauldasel]

I'm trying to send a integer value from Serial Port but I only can send strings


This is an example of my code:

Sub Serial1_Connected (Success As Boolean)
   If Success Then
      ToastMessageShow("Connected successfully", False)
      TextReader1.Initialize(Serial1.InputStream)
      TextWriter1.Initialize(Serial1.OutputStream)
      Timer1.Enabled = True
      connected = True
      lblEstadoBT.Text = "CONECTADO"
      RemoveViews
      Activity.LoadLayout("Motor")
   Else
      lblEstadoBT.Text = "Error de conexión" & CRLF & "Inténtelo de nuevo"
      connected = False
      Timer1.Enabled = False
      Msgbox(LastException.Message, "Error connecting.")
   End If
End Sub

Sub skbVelocidad_ValueChanged (Value As Int, UserChanged As Boolean)
   
    If (Value < 50) Then
        TextWriter1.WriteLine("p")
        TextWriter1.Flush
    Else If (Value > 50) Then
        TextWriter1.WriteLine("m")
        TextWriter1.Flush
    End If

End Sub

I want to send "Value" of the SeekBar

Thank you and sorry for my english

 

[Erel]

You should use AsyncStreams (or AsyncStreamsText) to handle the communication. You can use ByteConverter library to convert integers to bytes.