Variaveis string quando usadas com operador "+" concatena o resultado.
Vc deve trata-las como numeros primeiro.
dim valor17 as single
dim valor18 as single
dim soma as single
valor17 = csng(text01.text)
valor18 = csng(text02.text)
soma= valor17 + valor18