Ciao Monica

scusa ma c'è una cosa che non capisco, perchè dai alla variabile a due valori differenti? mi spiego.

Prima dichiare a=text1.text
dopo, alla stessa variabile passi il valore
a = CInt(Text1) + CInt(Text2)
sinceramente non capisco.

se vuoi solo fargli fare un'operazione, prima di tutto non dichiari la variabile come variant, perchè è uno spreco di memoria, visto che sai già che all'interno delle text box non metterai stringhe ma solo numeri, al massimo la dichiari come long, per essere sicura che non ti dia errore di overflow
E in secondo luogo nel command button, puoi semplicemente mettere

dim lngA as long 'Perchè è più leggibile nel codice

'Controlla che i valori immessi siano numeri
If Not IsNumeric(Text1) Or Not IsNumeric(Text2) Then

MsgBox "Attenzione: digitato un valore non numerico!", vbCritical, "Messaggio di errore"

'Cancella il contenuto delle caselle di testo
Text1.Text = ""
Text2.Text = ""
Exit Sub

End If

'Somma i valori presi dalla casella di testo
lngA=Text1.text + Text2.text

'Comunica il risultato
msgbox lngA