Discussion :

[qwertyuiop]

Bonjour a tous ,
J'essaye de créer un petit programme (mais ne sachant pas trop programmer en VB c'est dur )

Voici mon

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If CheckBox1.Checked = False Then
            Me.Hide()
            Timer1.Enabled = True
            Timer2.Enabled = True
            Timer3.Enabled = True
            Timer4.Enabled = True
            Timer5.Enabled = True
            Timer6.Enabled = True
            Timer7.Enabled = True
            Timer8.Enabled = True
        Else
            Me.Hide()
            Timer1.Enabled = True
            Timer2.Enabled = True
            Timer3.Enabled = True
            Timer4.Enabled = True
            Timer5.Enabled = True
            Timer6.Enabled = True
            Timer7.Enabled = True
            Timer8.Enabled = True
        End If
 
    End Sub

Voila , techniquement si la checkbox n'est pas coché cela active mes Timers et cache le programme , seulement sa ne marche pas automatiquement (je suis obliger de cocher/décocher une fois la checkbox pour que sa marche )

Si quelqu'un a une réponse ....

[M E H D I]

Salut,

Je te fais savoir que ton code renvoie true quelque-soi l'état du CheckBox.!!!

techniquement si la checkbox n'est pas coché cela active mes Timers et cache le programme

A quel moment tu désire activer tes Timer? Est-ce au moment ou ton programme est lancé?

seulement sa ne marche pas automatiquement (je suis obliger de cocher/décocher une fois la checkbox pour que sa marche )

Je n'ai pas bien compris ta phrase!!

[qwertyuiop]

Ok , les Trues sont corrigés

Sinon je voudrait que sa active les Timers au lancement du programme enfaite dans l'idéale faudrait que les Timers s'activent tout seul mais je ne sait pas comment faire ....

[M E H D I]

Dans ce cas tu dois écrire ton code dans le Form_Load

L'evennement Form_Load sera exécuté dés le lancement de ton programme, tu peux mettre l'etat initial de tes CheckBox à true dans le Form_Load les timers se lanceront automatiquement.

Code :

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

1
2
3
4
5
Private Sub Form_Load()
 
 *****code*****
 
End Sub

[qwertyuiop]

Ok cool sa a l'air de marcher
Y a plus qu'un petit détail , j'aimerais aussi que quand la checkbox est cocher sa cache le programme , or sa ne fait rien ....

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        CheckBox1.Checked = True
 
End Sub
 
 
 
 
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If CheckBox1.Checked = True Then
            Me.Hide()
            Timer1.Enabled = True
            Timer2.Enabled = True
            Timer3.Enabled = True
            Timer4.Enabled = True
            Timer5.Enabled = True
            Timer6.Enabled = True
            Timer7.Enabled = True
            Timer8.Enabled = True
        Else
            Timer1.Enabled = False
            Timer2.Enabled = False
            Timer3.Enabled = False
            Timer4.Enabled = False
            Timer5.Enabled = False
            Timer6.Enabled = False
            Timer7.Enabled = False
            Timer8.Enabled = False
        End If
 
    End Sub

Y a un problème dans le code ???

[DAUDET78]

une simple réflexion .... utiliser 8 timers ? Ce n'est pas de la bonne programmation.
Je ne sais pas à quoi ils servent, mais normalement, on utilise 1 (ou 2) timer et on utilise celui-ci pour en déduire les autres tempos (avec une variable static locale qui sert à faire les sous multiples)