В зависимости от типа данных вы всегда можете использовать валюту, которая имеет вид десятичной дроби (19,4) или 15 цифр слева от десятичной точки и 4 справа.
В VB6 попробуйте использовать вариант типа данных и привести ваши числа к этому с помощью CDec, как в:
Dim myDec As Variant
myDec = CDec(1.234)
Посмотрите, работает ли это.