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

Access Discussion :

fonction visual basic


Sujet :

Access

  1. #1
    Membre à l'essai
    Homme Profil pro
    Inscrit en
    Février 2005
    Messages
    27
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 27
    Points : 14
    Points
    14
    Par défaut fonction visual basic
    Bonjour,
    voila j'ai une petite question :
    es ce que en visual basic je peux faire une fonction qui renvoie un tableau

    si oui comment?
    merci

  2. #2
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 038
    Points
    20 038
    Par défaut
    ?? comment un truc du genre :

    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
     
    Function MonTableau(iTaille) As Variant
      Dim t() As Integer
      Dim iX As Integer
      ReDim t(0 To iTaille)
      For iX = 0 To iTaille
        t(iX) = iX
      Next
     MonTableau = t
    End Function
    Sub test()
     Dim T1() As Integer
     T1 = MonTableau(10)
      For i = 0 To 10
       Debug.Print T1(i)
      Next
    End Sub

  3. #3
    Expert éminent sénior

    Avatar de Tofalu
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Octobre 2004
    Messages
    9 501
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : Associations - ONG

    Informations forums :
    Inscription : Octobre 2004
    Messages : 9 501
    Points : 32 311
    Points
    32 311
    Par défaut
    Tout dépend de la version d'Access.

    A partir de 2000 :

    Function returnTab() As Integer()
    Dim i(2) As Integer
    i(0) = 1
    i(1) = 2
    returnTab = i
    End Function

    Sub essai()

    MsgBox returnTab()(1)

    End Sub

  4. #4
    Membre à l'essai
    Homme Profil pro
    Inscrit en
    Février 2005
    Messages
    27
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 27
    Points : 14
    Points
    14
    Par défaut
    merci beaucoup oui c'est exactement ca

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 4
    Dernier message: 26/07/2012, 09h02
  2. Equivalence fonction Get de visual basic
    Par berpi dans le forum Débuter
    Réponses: 4
    Dernier message: 10/02/2008, 23h50
  3. [Visual Basic 6] Définition fonction PV()
    Par ketthos dans le forum Windows
    Réponses: 2
    Dernier message: 04/07/2007, 11h17
  4. Créer une fonction Visual Basic
    Par Kleer dans le forum VBA Access
    Réponses: 1
    Dernier message: 09/02/2007, 10h00
  5. Créer une fonction Visual Basic
    Par Kleer dans le forum VBA Access
    Réponses: 5
    Dernier message: 08/02/2007, 22h13

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