Visual Basic - decimales

hola es algo q no lo puedo resolver...
en el sig codigo, yo quiero q me muestr en el action las suma de los numeros con decimales.
Ej, si tengo 1,5 + 1,5 me da 30 y no 3,00 o 3
Alguien podria decirme como resolverlo?

Gracias

Private Sub Command1_Click()
Dim adicion As Single
adicion = CInt(Text1.Text) + CInt(Text2.Text)

MsgBox adicion

Los decimales son con puntos, no con coma.

Por favor...
Si es punto o coma depende de la Configuracion regional que tenga la pc. Ese no es mi problema...

Hola :
Perdoname que te moleste , pero encontré una respuesta tuya en la web del programador sobre decimales y te cuento mi problema a ver si me puesdes ayudar.
Quiero ingresar importes con solamente dos decimales en una caja de texto y que cuando uno quiera ingresar más de dos decimales no lo permita.
Desde yá muchas gracias.