Discussion :

[omzoway]

Bonjour
je dois créer un Timer en VB.net , normalement notre support de cours c'est en vb6 c'est pourquoi je ne puis trouver de solutions en faite 'jai fait tout le corps du programme seulement il y'a une erreur que je n'arrive pas à corriger
quand je saisis cette entête:

Code :

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

Private Sub tmrPapillon_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) tmrPapillon_Timer()

ça me marque comme erreur fin dinstruction attendu et pointe vers la fin de la phrase si vous pouvez m'aider s'il vous plait , Merci d'avance

[omzoway]

jai résolu ce probléme voici le corps de la boucle:

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
Private Sub tmrPapillon_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles tmrPapillon.Tick
        Static etatouvert As Boolean
        If imgAffiche.Top > 0 Then
            imgAffiche.Move(imgAffiche.Left + 20, imgAffiche.Top - 5)
            If etatouvert Then
                imgAffiche.Image = imgOuvert.Image
            Else
                imgAffiche.Image = imgFerme.Image
            End If
            etatouvert = Not etatouvert
        Else
            imgAffiche.Move(imgAffiche.Left = 8)
            imgAffiche.Move(imgAffiche.Top = 560)
        End If
 
    End Sub 
End Class

mais il subsiste toujours des erreurs identiques, elles sont 3 et ça me marque ce message:

Erreur 1 'Public Event Move(sender As Object, e As System.EventArgs)' est un événement. Il ne peut donc pas être appelé directement. Utilisez une instruction 'RaiseEvent' pour déclencher un événement. C:\Users\Omzo\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 17 13 WindowsApplication1

:s

[Treize_]

Bonjour,

J'ai l'impression qu'il aime pas tes "imgAffiche.Move()" ..

Tu as essayé sans les "Move" ?

Genre : imgAffiche.left +20
imgAffiche.Top -5

[omzoway]

jai éssayé mais ça ne marche pas aussi le probléme est bien dans le imgAffiche.Move

[Treize_]

Quel est le type de ton objet imgAffiche ?

Qu'est ce que tu cherche à faire avec tes Move ?

[omzoway]

jy suis arrivé ouuuuf en faite fallait juste saisir ce code

Code vb :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Private Sub tmrPapillon_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles tmrPapillon.Tick
        Static etatouvert As Boolean
 
        imgAffiche.Left = imgAffiche.Left + 20
        imgAffiche.Top = imgAffiche.Top - 5
        If etatouvert Then
            imgAffiche.Image = imgFerme.Image
        Else
            imgAffiche.Image = imgOuvert.Image
 
        End If
        etatouvert = Not etatouvert
 
 
    End Sub

maintenant l'objectif cest le faire bouger car le papillon est statique puis cest fini