[clos] VB6 affichage temporiséFermé

Question

j voudrais que l'une des trois rubrique prend une couleur différente affin de distinguer l'équipe de travail en cour. j'modifier plusieurs fois mon programme et ça marche pas. " Dim i, j, k, l As Integer Private Sub Timer1_Timer() Time.Caption = Now Label2.Caption = Hour(Time) & "h _à_" & Hour(Time) + 1 & "h" End Sub Private Sub Timer2_Timer() i = 6 j = 13 k = 22 l = 45 If Hour(Time) >= i & Hour(Time) < j Then Equipe_1.BackColor = &HC000& Else Equip_1.BackColor = &H8000000A End If If Hour(Time) >= j & Hour(Time) < k Then Equipe_2.BackColor = &HC000& Else Equipe_2.BackColor = &H8000000A End If If Hour(Time) >= k & Hour(Time) < i Then Equipe_3.BackColor = &HC000& Else Equipe_3.BackColor = &H8000000A End If End Sub " badbign badboom

cs_Julien39 · Answer

Bonjour,

Commence par dire bonjour et explique clairement ce qui se passe, ce n'est pas à nous de deviner et/ou de te proposer un code qui fonctionne.

Sujet clos

[clos] VB6 affichage temporisé

1 réponse

Discussions similaires