Visual Basic - problema de sumas

Tengo una aplicacion de VB 6.0 con matriz de textbox enfocada a una tabla de acces 97.
Mi problema es que quiero que se rellene algunos text con la suma o la resta de otros. Lo que he hecho en el gotfocus de text1 es:
text1(3)=text1(1)-text1(2)
text1(6)= text1(4)+text1(5)
El resultado de la resta me lo da perfecto pero el de la suma añade las cantidades a continuacion como si fueran cadenas de caracteres.
Ejm: 5-2=3
5+2=52
Y me estoy volviendo loco. He provado nombrando variables de tipo sigle y nada, la suma no sale.

Intenta con esto:

text1(3).Text=CDbl(text1(1).Text)-CDbl(text1(2).Text)
text1(6).Text=CDbl(text1(4).Text)+CDbl(text1(5).Text)

El operador + además de sumar funciona como concatenador en el caso de cadenas de caracteres.