IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Faire clignoter une zone de texte dans un formulaire


Sujet :

VBA Access

  1. #1
    Membre à l'essai
    Inscrit en
    Janvier 2007
    Messages
    34
    Détails du profil
    Informations forums :
    Inscription : Janvier 2007
    Messages : 34
    Points : 23
    Points
    23
    Par défaut Faire clignoter une zone de texte dans un formulaire
    Bonjour je cherche un code pour faire clignoter (changement de couleur:rouge et blanc ) une zone de texte dans mon formulaire quand la zone n'est pas vide.
    Merci d'avance pour votre aide

  2. #2
    Rédacteur/Modérateur
    Avatar de Jeannot45
    Homme Profil pro
    Retraité
    Inscrit en
    Octobre 2004
    Messages
    3 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Octobre 2004
    Messages : 3 871
    Points : 8 489
    Points
    8 489
    Par défaut Faire clignoter ...
    Bonjour WITER

    Pour faire cela il te faut utiliser la propriété "On Timer" du Formulaire

    tu places par exemple le code suivant

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Private Sub Form_Timer()
        If txtMonTexte <> "" Then
            With txtMonTexte 
                If .ForeColor= 0 Then
                    .Backcolor = 0
                    .Forecolor = 16777215
                Else
                    .Backcolor = 16777215
                    .Forecolor = 0
                End If
            End With
        End If
    End Sub
    Puis dans la propriété "Tmer Interval" tu indiques la vistesse de clignotement

    A+

    Jeannot

  3. #3
    Membre du Club
    Inscrit en
    Avril 2007
    Messages
    86
    Détails du profil
    Informations forums :
    Inscription : Avril 2007
    Messages : 86
    Points : 50
    Points
    50
    Par défaut
    presque pareil que Jeannot sauf que je modifierais un peu la fonction pour que : quand on est en train de taper le texte ça s'arrete de clignoter et que le fond soit blanc :

    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
    Private Sub Form_Timer() 
    with tonchamptexte
      If nz(.value,"")="" Then
        if nz(.text,"")="" then
           if .backcolor=16777215 then
                .backcolor=3000
           else
                .backcolor=16777215
           end if
         else
            .backcolor=16777215
         end if
       end if
    end with
    end sub
    un timer intervaél de 500 semble pas trop mal ça c'est à toi de voir

  4. #4
    Membre à l'essai
    Inscrit en
    Janvier 2007
    Messages
    34
    Détails du profil
    Informations forums :
    Inscription : Janvier 2007
    Messages : 34
    Points : 23
    Points
    23
    Par défaut
    Merci pour vos reponse, mais je débute an code acces, ou se trouve la proprieté "On Timer" du Formulaire et comment definir commme texte pour que la zone de texte clignote , une date

    Merci à vous deux pour votre aide et pour les codes, finalement j'ai trouvé en cherchant un petit peu, lolllll

  5. #5
    Membre confirmé Avatar de morobaboumar
    Homme Profil pro
    Enseignant
    Inscrit en
    Septembre 2009
    Messages
    1 128
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Septembre 2009
    Messages : 1 128
    Points : 495
    Points
    495
    Par défaut
    Citation Envoyé par WITER Voir le message
    Je débute an code acces, ou se trouve la proprieté "On Timer" du Formulaire et comment definir commme texte pour que la zone de texte clignote , une date
    Bonjour WITER,
    J'espère que vous avez évolué en matière d'Access. Sinon voila où trouver ce que vous recherchez:

    Nom : CaptureGestionCreditDette8.JPG
Affichages : 846
Taille : 113,7 Ko

    Dans la feuille de propriété du formulaire en mode création, voir dans l'onglet événement:
    Sur Minuterie et Intervalle Minuterie

    Pièce jointe exemple de texte et objet clignotants

    Bonne continuation.
    Cordialement.
    Fichiers attachés Fichiers attachés

Discussions similaires

  1. modifier source controle d'une zone de texte dans un état
    Par electrosat03 dans le forum Access
    Réponses: 3
    Dernier message: 20/03/2006, 11h04
  2. Réponses: 6
    Dernier message: 15/03/2006, 14h35
  3. Faire pivoter une zone de texte dans un état
    Par YLL dans le forum Access
    Réponses: 3
    Dernier message: 20/02/2006, 20h05
  4. Réponses: 5
    Dernier message: 04/10/2005, 22h42
  5. Réponses: 2
    Dernier message: 07/12/2004, 13h09

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo