Bonjour
J'ai un label qui affiche l'heure système en temps réel sous format HH :mm :ss et un 6 autre label qui affichent d'autres horaires par ex : 06 :00 /07 :30 / 13 :30 / 16 :50 / 19 :45 / 20 :55 (donc format HH :mm)
Mon souci c'est cette erreur : quand je soustraire l'heure système du l'autre label il m'affiche Date2 ne peut pas être converti en Date.
Voila le code qui ne fonctionne pas. Pour info Secheure est une fonction qui converti le secondes en hh :mm :ss.
Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick
Dim s6, n6 As String
If LabelNow.Text > ChuruqHeure.Text and LabelNow.Text < DohrHeure.Text Then
s6 = DateDiff("s", ChuruqHeure.Text, LabelNow.Text)
n6 = secheure(s6)
Label21.Text = "Churuq depuis " & n6'objectif calculer le temps passé depuis le Churuq(07 :30 )
ElseIf LabelNow.Text < ChuruqHeure.Text and LabelNow.Text > FajrHeure.Text Then
s6 = DateDiff("s", LabelNow.Text, ChuruqHeure.Text)
n6 = secheure(s6)
Label21.Text = "Il reste au Churuq " & n6'objectif calculer le temps restant jusqu'au Dohr.(13 :30)
End If
`LabelNow.Text= l'heure système en temps réel sous format HH :mm :ss
End Sub
--
merci d'avance