I'm sure you don't need 255 If statements in this Sub.
Won't the example below work ?
Code:
Sub ImageButtonSendTx_Click
num=label17.Text
label20.Text="TX = " & num
b1()=Array(num)
serial.Output2(b1())
End Sub
__________________
.
.
.
Don't ask, I'm fine, honest. !!
.
.
.
Just a little crazy at times
O2 XDA, GW Evo 2.1 UC WWE Rom, WM6.1
Radio Ver 03.34.90
With Basic4ppc V6.80
http://www.taximania.co.uk