German Short quadrieren und wurzel ziehen

[T0mee]

Hallo,

meine App empfängt ein paar Bytes via Bluetooth mit denen ich 'rechnen' möchte und das bekomme ich nicht hin...

data = Array As Byte(a(3),a(2)) '16bit uint
rr = conv.ShortsFromBytes(data)
Log("RR: " & rr(0))

rr(0) hat im Log den erwarteten Wert z.B. 800 ...wie kann ich damit rechnen?
double = Power(rr(0),2) funktioniert nicht :-( Muss ich aus rr(0) erstmal zu 'double' konvertieren?

 

[klaus]

Leider JA.

Dim dbl1, dbl2 As Double
dbl1 = rr(0)
dbl2 = Power(dbl1, 2)

 

[T0mee]

Ich war verwirrt, weil ich genau das probiert habe...
Jetzt fällt mir auf, das ich an einer Stelle versuche zu rechnen an der rr(0) noch gar keinen Inhalt hat - deshalb geht das nicht

Danke Klaus ...auch für den Schupps von dem Schlauch auf dem ich Stand