HEX in DEZ mit fehler ?

Moin,
Ich wandel mit: Label4 = Val("&h" + zld(3)) den Hexadezimal wert aus zld(3) in ein dezimalwert und schreibe in direkt in das label.
Das funktioniert auch zu 99%. Bis zu dem moment wo in zld(3) = C6E8 steht. Der Windows rechner macht aus c6e8 = 50920. VB mit der Befehlszeile macht aber aus c6e8 = -14616. Kann mir jemand sagen warum ?

mfg jonny

Hallo,

Den Fehler verursacht Val(). Damit wandelst Du hier die Zahl in ein Inetger mit einem Vorzeichenbit. Gib an, daß das Ergebnis ein Double ist und das Problem ist weg.

Me.Caption = CDbl("&hc6e8")

Gruß Rainer