Visual Basic 6 - aumentare data

problema piccolo piccolo (almeno per Voi esperti) , grande grande (per me).
Ho 2 textbox , ed un pulsante , nella prima textbox mi compare la data attuale , mentre nella seconda text box vorrei che la data si incrementasse di un giorno PER VOLTA ogni volta che premo il pulsante ,
es. se premo una volta la data diventerebbe : 06/03/08 , se ripremo la data dovrebbe diventare 07/03/08 e cosi' via ....
Immagino che dovrei usare un ciclo for abbinato all'evento click del pulsante , ma non riesco a focalizzare il codice.

Private Sub Command1_Click()
    If Len(Text2.Text) = 0 Then
        Text2.Text = CDate(Text1.Text) + 1
    Else
        Text2.Text = CDate(Text2.Text) + 1
    End If
End Sub

Private Sub Form_Load()
    Text1.Text = Date
    Text2.Text = ""
End Sub

Grazie mille .
Mi spiegheresti(anche se ne ho dedotto l'utilita') la funzione CDate , a me fino ad oggi era sconoasciuta.

Avrai capito che serve a convertire il testo passato come parametro in una data ...