Visual Basic 6 - aumentare data

Forum - Visual Basic 6 - aumentare data

mash_mash (Normal User)
Expert

Messaggi: 230
Iscritto: 25/07/2007

Postato alle 15:22
Mercoledì, 05/03/2008

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.

gantonio (Normal User)
Guru^2

Messaggi: 1532
Iscritto: 09/09/2007

Postato alle 15:42
Mercoledì, 05/03/2008

Codice sorgente - presumibilmente VB.NET

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

mash_mash (Normal User)
Expert

Messaggi: 230
Iscritto: 25/07/2007

Postato alle 16:31
Mercoledì, 05/03/2008

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

gantonio (Normal User)
Guru^2

Messaggi: 1532
Iscritto: 09/09/2007

Postato alle 18:15
Mercoledì, 05/03/2008

Testo quotato

Postato originariamente da mash_mash:
(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 ...