Discussion :

[stracoma]

Bonsoir les amis.
Je demande votre aide pour résoudre un problème:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Module Module1
 
    Sub Main()
        Dim RDV As Date
        RDV = "04/03/2016"
        Dim result As Integer = Date.Compare(RDV, Date.Now)
        Console.WriteLine(RDV)
        Console.WriteLine(Date.Now)
        Console.WriteLine(result)
        Console.ReadKey()
 
    End Sub
 
End Module

Aujour'hui nous somme le 04/03/2016.
Ce code me donne result = -1.
Donc très probablement , le programme compare, en plus des jours, les heures, les minutes et les secondes.
Comment faire pour forcer le programme à ne comparer que les jours, et donc avoir result=0
Merci à vous et bonne soirée

[Buzzak]

Rajoute une .Date à la fin de Date.Now.Date

MSDN

Bonne chance!

[stracoma]

Bonjour
Merci infiniment Buzzak, avec Date.Now.Date, ça marche
problème résolu