Visual Basic - Numeros con VB6

Hola
tengo un problemita con VB6.... necesito hacer operaciones en las ke se manejen 2 numeros despues del punto decimal.... en este caso serian centavos...
necesito sacar el IVA a X numero manejando 2 unidades despues del punto decimal
como hago esto???
ahorita tengo esto:
Dim a as double
Dim b as double
a=0.1
a=val(text1.text) * val(a)
b=val(text1.text) - val(a)
text2.text=a
text3.text=b

algo asi... y con eso eso obtengo resultados con un solo numero despues del punto decimal...
ok espero me haya explicado... podrian ayudarme???
gracias... bye

Hola
Probá con:
a = 0.1
a = Val(Text1.Text) * a
b = Val(Text1.Text) - a
Text2.Text = Format(a, "0.00")
Text3.Text = Format(b, "0.00")

Tal vez funcione
Saludos

Verifica la configuración regional del equipo, ya que tiene toda la pinta de que en los textboxes se está introduciendo 2,23 , por ejemplo, entonces la función val se encuentra con una coma que interpreta que no forma del número y devuelve 2.

Si es así y en la configuración regional tienes, como separador decimal, la coma prueba sustituyendo val por cdbl, debería funcionar.