Somma di valori di due textbox

[r4gtl]

Ciao a tutti!
Sto cercando di metter in uno userform un textbox che riporti il risultato della somma di altri due textbox. Allora, in un textbox ho una data, in un altro ho la modalità di pagamento (30, 60, 90 GG) e nel terzo textbox dovrei indicare la data di scadenza. Come si fa a fare una somma tra textbox?
Ciao

[grullo]

io ho fatto questo esempio:
in un userform metto 3 textbox e un commandbutton
Nel textbox1 metto la data, nel textbox2 i giorni (multipli di 30) e premendo sul command faccio comparire la data di scadenza nel textbox3.

Private Sub CommandButton1_Click()
Dim mese As Integer
Dim giorno As Integer
Dim anno As Integer
mese = Month(TextBox1.Text)
giorno = Day(TextBox1.Text)
anno = Year(TextBox1.Text)
Dim numGiorni As Integer
Dim numMesi As Integer
numGiorni = TextBox2.Text
numMesi = Fix(numGiorni / 30)
mese = mese + numMesi
If mese > 12 Then
mese = mese - 12
anno = anno + 1
TextBox3.Text = giorno & "/" & mese & "/" & anno
Else
TextBox3.Text = giorno & "/" & mese & "/" & anno
End If
End Sub


PS: se il numero di giorni della scadenza non dovesse essere un multiplo di 30 (un mese) occorre modificare un po il codice!

[r4gtl]

Grazie 1000! Adesso funziona il discorso. Però ho provato a fare in modo che il textbox indicasse la data con gg/mm/aaaa (xchè adesso il mese lo indica ad una sola cifra) inserendo la procedura indicata in un'altra mail:
Dim a As date
Texbox1=Format(a, "dd/mm/yyyy")
però esce una data strana.
E se volessi usare format per un numero?
Tipo indicare
Textbox1=Format(n,"#,##0,00")
è possibile?
Ciao