Codes visual basic

Fermé
bnjdd7 Messages postés 5 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 juin 2013 - 25 févr. 2013 à 16:53
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 3 mars 2013 à 00:32
Bonjour,

ya t'il des codes en VB qui permettent de faire clignoter des images?

A voir également:

6 réponses

ShayFmw Messages postés 106 Date d'inscription samedi 12 janvier 2013 Statut Membre Dernière intervention 10 juillet 2013 43
25 févr. 2013 à 18:47
VB.NET 2010 ... ?
0
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
25 févr. 2013 à 19:19
Bonjour,
Un code dédié n'existe pas, tu dois faire ça avec un timer en changeant les caractéristiques du contrôle.
A+
0
bnjdd7 Messages postés 5 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 juin 2013
1 mars 2013 à 11:29
non
je parle de VB 6
0
bnjdd7 Messages postés 5 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 juin 2013
1 mars 2013 à 11:32
je comprend
et comment dois je proceder? disant avoir une idees sur les codes je suis encore debutant
0
Bonjour,

Une idée, rendre l'image visible / invisible avec une bonne temporisation, ça peut faire son effet.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
ShayFmw Messages postés 106 Date d'inscription samedi 12 janvier 2013 Statut Membre Dernière intervention 10 juillet 2013 43
Modifié par ShayFmw le 2/03/2013 à 19:55
Et bien par exemple,
Il faut deux timers, réglés par exemple sur 1000 ms (soit une seconde d'intervalle) : Timer1 et Timer2. Et une image, PictureBox1

Dans le formload de ton application, tu start le premier timer et tu mets en visibilité vraie l'image

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

PictureBox1.Visible = True 'on affiche l'image au début
Timer1.Start() 'on démarre le premier timer

End Sub

Après, le tick du premier timer va passer en False la visibilité de la picturebox, il va stop le timer1, et lancer le timer 2.

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
PictureBox1.Visible = False 'on cache l'image
Timer1.Stop() 'on stop ce timer
Timer2.Start() 'on active l'autre timer2
End Sub

Et le timer 2 va faire la même mais à l'inverse, c'est une boucle entre ces deux timers.

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
PictureBox1.Visible = True 'on affiche l'image
Timer2.Stop() 'on stop ce timer2
Timer1.Start() 'on restart l'autre timer1
End Sub

Après, il suffit que tu joues sur la configuration du timer au niveau du temps (là c'est réglé à 1000ms = 1s) si tu souhaites changer la fréquence de "clignotement"

Bonne soirée
Passionné d'informatique et de jeux vidéos.
0
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
3 mars 2013 à 00:32
Bonjour,
@ShayFmw -> pourquoi 2 timers ?
Tu m'oblige à rectifier... :(
Ouvrir un nouveau projet WindowsForm
Ajouter un contrôle Timer.
Coller dans la classe de la forme...
Public Class Form1

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Static D As Boolean
        If D Then
            Me.BackColor = Color.Red
            D = False
        Else
            Me.BackColor = Color.Yellow
            D = True
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Enabled = True
        Timer1.Interval = 1000 'Pour une seconde
    End Sub
End Class

En lieu et place de la coloration de la forme tu peu adapter au contrôle que tu veux.
A+
0