Timer vb net

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:

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 :ccool:

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

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:

Citation:

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

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

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

Quel est le type de ton objet imgAffiche ?

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

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

Code:

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 :D