Frekvens = FormatNumber(Frekvens, 2, TriState.False, TriState.False,
TriState.False)
Dim nyF As Double
Dim nyF2 As Long
nyF = Convert.ToDouble(Frekvens) * 100
nyF2 = Convert.ToInt32(nyF)
Dim fHex As String
Dim F1, F2, F3, F4, OP As Byte
fHex = nyF2.ToString("X8")
De 4 aktuelle verdiene som skal utgjøre F1-F4 finnes slik :
C4 = Microsoft.VisualBasic.Left(fHex, 2)
C3 = Microsoft.VisualBasic.Mid(fHex, 3, 2)
C2 = Microsoft.VisualBasic.Mid(fHex, 5, 2)
C1 = Microsoft.VisualBasic.Right(fHex, 2)
Så langt, alt vel ☺
Det jeg nå ønsker, er at jeg på en lett måte får omgjort(om mulig) C4 ->
F4 ? osv..
Siden C4 er en streng, så får jeg beskjeden her :
Conversion from string "9E" to type 'Byte' is not valid.
(i dette tilfellet var det for frekvensen 439700 som da utgjør
02 9E ED D0. (den blir multiplisert med 100 tross alt)
Seriekommunikasjonen er helt i boks, her er det kun konverteringen som
stanger..
Torbjørn.
>Det jeg nå ønsker, er at jeg på en lett måte får omgjort(om mulig) C4 ->
>F4 ?
Hvis jeg forstår deg rett, burde dette virke:
F4 = Convert.ToByte(C4, 16)
--
RoRo
HEH, way to go !!
Mange takk ☺☺☺