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 :

affectation d'une variable à une function


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    149
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 149
    Par défaut affectation d'une variable à une function
    bonjour à tous,
    j'ai un morceau de code vb et y a un truc que je ne comprends pas. Je vous donne ce bout de code
    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
    18
    19
    20
    21
    22
    Public Function WriteLogMessage(Message As String, Optional TypeMessage As MessageTypeEnum = LOG_INFO) As String
    Dim CodeTypeMessage As String
        
        WriteLogMessage = Message 
        
        Select Case TypeMessage
            Case LOG_WARNING:  CodeTypeMessage = "WRN"
            Case LOG_ERROR:    CodeTypeMessage = "ERR"
            Case LOG_INTERNAL: CodeTypeMessage = "INT"
            Case LOG_BULLE:    CodeTypeMessage = "BUL"
            Case Else:         CodeTypeMessage = "LOG"
        End Select
        
        If mTraitement = 0 Then
            
            WriteLn "TSK", "Inconnue ???", 1
        End If
        
        WriteLn CodeTypeMessage, Message, 3
        
    End Function
    ce que je ne comprends pas c'est la ligne en rouge? Que fait-elle? Elle affecte la valeur de la variable "Message" à la function "WriteLogMessage"? si oui dans quel but ?
    Ou c'est pour dire que la function retourne la valeur de "Message" à la fin du traitement.
    Veuillez m'aider SVP.

  2. #2
    Membre Expert
    Avatar de Delbeke
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    2 675
    Détails du profil
    Informations personnelles :
    Âge : 72
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 2 675
    Par défaut
    C'est une syntaxe de vb, signalant que la fonction retourne cette valeur

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Private Function MaFonction(MonParametre as String) as string
       '....
       MaFonction =  ResultatDeMesCalculs  ' la fonction MaFonction va retourner ResultatDeMesCalculs  
    End Function

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    149
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 149
    Par défaut
    merci pour ton message Delbeke;

    Mais ce qui m'embete, c'est que dans mon cas, y a aucun traitement pour la variable "Message" passée en paramètre. Cela veut dire que la function retourne exactement la même chose que ce qu'elle a reçu en paramètre. Je n'en vois pas trop l'utilité.

Discussions similaires

  1. affecter le résultat d'une requete à une variable globale
    Par Giuseppe24 dans le forum Développement de jobs
    Réponses: 4
    Dernier message: 26/03/2010, 14h13
  2. affecter le resultat d'une requete à une variable
    Par thor18 dans le forum VBA Access
    Réponses: 13
    Dernier message: 22/11/2007, 16h40
  3. Affecter le résultat d'une requête à une variable
    Par PSYcoZZ dans le forum VB 6 et antérieur
    Réponses: 1
    Dernier message: 10/02/2007, 13h27
  4. affecter le résultat d'une requête à une variable
    Par zut94 dans le forum MS SQL Server
    Réponses: 1
    Dernier message: 06/10/2005, 17h21
  5. Affecter résultat SQL d'une requête à une variable
    Par bozolozo dans le forum Requêtes et SQL.
    Réponses: 2
    Dernier message: 02/01/2005, 17h37

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