Quindi questo

codice:
Private Sub Form_Unload(Cancel As Integer) 
Form2.Text3 = Label2.Caption  
End Sub
non ti serve a nulla ...

Se devi fare la somma, devi scrivere diversamente, ovvero

Text3.Text = CStr(CDbl(Text3.Text) + CDbl(Label2.Caption))

ma queste sono le basi basi del linguaggio ... come mai non le studi?