Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ng
Salut,
'//Via le vrai type date Dim dtDate1 As Date, dtDate2 As Date dtDate1 = #1/12/2002# dtDate2 = #1/12/2002# '// If dtDate1 = dtDate2 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If '//DateDiff If DateDiff("d", dtDate1, dtDate2) = 0 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If
'//Via des des strings Dim strDate1 As Date, strDate2 As Date strDate1 = "12/01/2002" strDate2 = "12/01/2002" '// If strDate1 = strDate2 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
[aicfr] a écrit :
bonjour,
J'aimerai savoir si deux variable date contiennent la meme date, comment puis je faire ?
exemple: str1Úte1 str2= date2
if str1=str2 then .....
Cordialement, aicfr
Salut,
'//Via le vrai type date
Dim dtDate1 As Date, dtDate2 As Date
dtDate1 = #1/12/2002#
dtDate2 = #1/12/2002#
'// If dtDate1 = dtDate2 Then
Debug.Print "Identique"
Else
Debug.Print "Pas Identique"
End If
'//DateDiff
If DateDiff("d", dtDate1, dtDate2) = 0 Then
Debug.Print "Identique"
Else
Debug.Print "Pas Identique"
End If
'//Via des des strings
Dim strDate1 As Date, strDate2 As Date
strDate1 = "12/01/2002"
strDate2 = "12/01/2002"
'// If strDate1 = strDate2 Then
Debug.Print "Identique"
Else
Debug.Print "Pas Identique"
End If
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
[aicfr] <kheraud@cartolux-thiers.com> a écrit :
bonjour,
J'aimerai savoir si deux variable date contiennent la meme date,
comment puis je faire ?
'//Via le vrai type date Dim dtDate1 As Date, dtDate2 As Date dtDate1 = #1/12/2002# dtDate2 = #1/12/2002# '// If dtDate1 = dtDate2 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If '//DateDiff If DateDiff("d", dtDate1, dtDate2) = 0 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If
'//Via des des strings Dim strDate1 As Date, strDate2 As Date strDate1 = "12/01/2002" strDate2 = "12/01/2002" '// If strDate1 = strDate2 Then Debug.Print "Identique" Else Debug.Print "Pas Identique" End If
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
[aicfr] a écrit :
bonjour,
J'aimerai savoir si deux variable date contiennent la meme date, comment puis je faire ?