CByte() ?
Solo che così otterresti solo ValoreA (= 10)...codice:Dim ValoreA = 10 Dim ValoreB = 8 Dim valore As Integer = BitConverter.ToInt16(New Byte() {ValoreA, ValoreB}, 0) MsgBox(CByte(valore Mod 256))
CByte() ?
Solo che così otterresti solo ValoreA (= 10)...codice:Dim ValoreA = 10 Dim ValoreB = 8 Dim valore As Integer = BitConverter.ToInt16(New Byte() {ValoreA, ValoreB}, 0) MsgBox(CByte(valore Mod 256))