Android Question Help with converting one line of code to B4A from VB

[Beja]

In VB it's in several lines..

VB code:

Private Sub Command1_Click()
Dim a(0 To 7) As Byte
a(0) = "83"
a(1) = "68"
a(2) = "82"
a(3) = "127"
a(4) = "127"
a(5) = "0"
a(6) = "0"
a(7) = "254"

MSComm1.Output = a

Thanks in advance

Edit:
It will be sent from Android device by Bluetooth.

 

[JohnC]

Dim Array() As String = Array As String(83, 68, 82, 127, 127, 0, 0, 254)

Then when you read a value, convert to byte.

There might be a way to setup the array as a byte array directly, but I can't think of right now.

 

[Beja]

Dim Array() As String = Array As String(83, 68, 82, 127, 127, 0, 0, 254)

Then when you read a value, convert to byte.

There might be a way to setup the array as a byte array directly, but I can't think of right now.

Thanks John
This code is not working:
I just stepped our and will be back soon.

Dim Array() As String = Array As String(83, 68, 82, 127, 127, 0, 0, 254)
Stream.Write(Array)

Any meaning?

 

[LucaMs]

Dim Array() As String = Array As String(83, 68, 82, 127, 127, 0, 0, 254)

There might be a way to setup the array as a byte array directly, but I can't think of right now.

Dim arrBytes() As Byte = Array As Byte(83, 68, 82, 127, 127, 0, 0, 254)

You cannot use Array as variable name, it is a language keyword, of course.

 

[Erel]

I will repeat Luca answer as it is really simple:

Dim a() As Byte = Array As Byte (83, 68, 82, 127, 127, 0, 0, 254)