Discussion :

[gregm954]

Bonjour à tous ,

j’essaie de faire varier une variable à l'aide d'un scrolbar au format heure ( entre 18h00 et 6h00 du matin), mais je galère comme pas possible.
Dans l'initialisation de la Winform j'ai mis le code suivant:

Code :

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

1
2
 t = #6:00:00 PM#      
        Label3.Text = t

déclaration de la variable: Dim t As New DateTime. cela m'affiche 18:00 dans le label3: là ça va!!

ensuite j'ai mis le code suivant:

Code :

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

1
2
3
 Private Sub HScrollBar1_Scroll(sender As Object, e As ScrollEventArgs) Handles HScrollBar1.Scroll
        Label3.Text = Format(HScrollBar1.Value.ToString, "hh:mm")
    End Sub

évidement çà ne fonctionne pas , facile à faire en VBA mais en VB ça se complique!!

Merci pour votre aide
Greg

[ebastien]

Bonjour,
La première idée qui me vient serait de créer une variable DateTime avec la valeur initiale (18h00) et lors du changement du Trackbar de calculer l'heure à l'aide de la valeur initiale :

Code :

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

1
2
3
4
Private Sub TrackBar1_Scroll(sender As Object, e As EventArgs) Handles TrackBar1.Scroll
  t = tInitial.AddMinutes(TrackBar1.Value)
  Label1.Text = t.ToString("HH:mm")
End Sub

Le Trackbar ayant une valeur max de 720 qui est le nombre de minutes dans 12h.
D'ailleurs, le Trackbar est plus adapté que le scrollbar pour ce genre de truc.

[gregm954]

Merci Ebastien,
Première idée et la bonne, ça fonctionne parfaitement.
Merci encore
Greg