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

VB 6 et antérieur Discussion :

[VB6] pas de réponse du code


Sujet :

VB 6 et antérieur

  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    10
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2006
    Messages : 10
    Points : 7
    Points
    7
    Par défaut [VB6] pas de réponse du code
    En fait je veux ecrire (dans un formulaire) une valeur dans un champ txt en fonction d'un autre champ txt
    voila mon code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Private Sub Lblmanquant_BeforeUpdate()
    Dim taux As Single
     
    Taux = Me.Lbltaux
     
    if Tau<1 Then
          Me .Lblmanquant = "Manquant"
         Else
         Me.Lblmanquant = "bon"
    End If
    End Sub
    le champ Lblmanquant ne me renvoi rien et je ne voi pa pourkoi
    merci d'avance

    Balises Code ajoutées par zazaraignée

  2. #2
    Expert confirmé
    Avatar de zazaraignée
    Profil pro
    Étudiant
    Inscrit en
    Février 2004
    Messages
    3 174
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2004
    Messages : 3 174
    Points : 4 085
    Points
    4 085
    Par défaut
    Salut

    Fait les corrections suivantes:
    Ta varaible taux est plus loin Taux puis Tau: Corrige pour rendre uniforme
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Private Sub Lblmanquant_BeforeUpdate()
    Dim taux As Single
    
    taux = Me.Lbltaux
    
    if taux <1 Then
          Me .Lblmanquant = "Manquant"
         Else
         Me.Lblmanquant = "bon"
    End If
    End Sub
    Et pour éviter ce genre d'embrouilles, ajoute toujours ceci
    au début de la zone Déclarations de ton code.

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    10
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2006
    Messages : 10
    Points : 7
    Points
    7
    Par défaut
    excuse moi il s'agit d'une erreur de copie les variables sont identiques

Discussions similaires

  1. VB6: Pas de sécurité macro
    Par rupeni dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 25/11/2005, 16h57
  2. [vb6] Saisie de combo par code
    Par damned3 dans le forum VB 6 et antérieur
    Réponses: 8
    Dernier message: 02/10/2005, 13h59
  3. [VB6] comment renvoyer un exit code en VB6 ?
    Par VVE dans le forum VB 6 et antérieur
    Réponses: 5
    Dernier message: 13/05/2004, 14h30

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