[quote:ee79125e0e]In the past with assembly I use the routine bin2bcd16 for that propose. [/quote:ee79125e0e]
You can use
[code:1:ee79125e0e]Dim Number As Word
Dim Tempw As Word
Dim Hundreds As Word
Dim Tens As Byte
Dim Units As Byte
Number = 876
Hundreds = Number / 100
Tempw = Number Mod 100
Tens = Tempw / 10
Units = Tempw Mod 10[/code:1:ee79125e0e]
↧