Oppure

Loading
27/05/09 12:01
LoganShile
Vorrei calcolare la differenza di due date inserite dentro una textbox1 e textbox2, e rilasciare la differenza tramite un MessageBox...come devo fare ?
aaa
27/05/09 13:08
theprogrammer
aaa
27/05/09 19:53
Jeremy
Postato originariamente da theprogrammer:

lmgtfy.com/


:cheer::rofl::rofl:
che figata!!! fortissimo sto link .... come funziona???
Giuro che d'ora in poi userò solo quello.

Ultima modifica effettuata da Jeremy 27/05/09 19:54
aaa
27/05/09 21:05
lorenzo
Postato originariamente da Jeremy:

Postato originariamente da theprogrammer:

lmgtfy.com/


:cheer::rofl::rofl:
che figata!!! fortissimo sto link .... come funziona???
Giuro che d'ora in poi userò solo quello.




:rotfl::rotfl::rotfl::rotfl::rotfl::rotfl::rotfl::rotfl::rotfl::rotfl:

theprogrammer, sei un vero genio :rofl::rofl::rofl:
Ultima modifica effettuata da lorenzo 27/05/09 21:06
aaa
28/05/09 9:55
LoganShile
Lo conoscevo gia sto link di google che te lo cerca al posto tuo....Cmq ....Sto vedendo un pò il codice per il programma che devo creare...
Ultima modifica effettuata da LoganShile 28/05/09 15:22
aaa
28/05/09 10:10
the_angel
Jeremy,
basta cambiare la query string!!

E' molto carino!

aaa
28/05/09 11:06
Jeremy
Postato originariamente da LoganShile:

Vorrei calcolare la differenza di due date inserite dentro una textbox1 e textbox2, e rilasciare la differenza tramite un MessageBox...come devo fare ?


Ciao.
Il link lo conosci .... ma non lo hai usato :pat::pat:
Converti i valori delle textbox in Data(o meglio ...usi 2 datetimepicker ... (vedi post recente sulle conversioni di tipo)) e ne fai la differenza con la funzione DateDiff.

    
Dim a As Date = Date.Parse("30/05/09") oppure Textbox1.text
Dim b As Date = Date.Parse("01/05/09") oppure Textbox2.text
Dim c As Long = DateDiff(DateInterval.Day, b, a)


Facci sapere...
Ciao
aaa
28/05/09 15:20
LoganShile
Così:
Public Class Form1
Dim data As New DateTime(2008, 3, 20, 10, 20, 5)
Dim data2 As New DateTime(2008, 5, 20, 11, 21, 7)
'ottengo la differenza tra due date
Dim diff As TimeSpan = data2.Subtract(Data)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("Giorni: " & diff.Days)
MessageBox.Show("Ore: " & diff.Hours)
MessageBox.Show("Minuti: " & diff.Minutes)
MessageBox.Show("Secondi: " & diff.Seconds)
'differenza in un unico passaggio
MessageBox.Show(diff.ToString())
End Sub
End Class
Ma così mi da il risultato sempre lo stesso...
aaa