Visual Basic - problema con numeros decimales

Dim a As Double
a = InputBox("numero", "ya")
List1.AddItem a

Eso es lo que hice,
introduzco los datos de entrada utilizando el punto decimal con las teclas calculadora (lado derecho del teclado).
Ejemplo:
15.5
0.01
Y lo que me muestra el List1 es:
155
1
Entonces lo que pasa es que no reconoce el punto decimal, el unico modo que lo reconoce es digitando la coma del teclado (cerca a la barra espaciadora)
asi
15,5
0,01
Que me sugieren por favor:

Hola Miguel, el problema lo tienes en la configuración regional de cifras del windows. Seguramente tengas puesto el separador decimal la "," y el separador de miles el ". ", ponlo al revés y prueba.
Saludos.