[VB] Appel de procédure et fonction

bonjour,

sous visual basic je cré une fonction :
Private Sub req_manu() dans la form 1
puis je cré un bouton dans la form 2 et lorsque je clique dessus je souhaite appeler req_manu
Il me dit erreur de compilation : procédure sub ou fonction non définie

Quelle est l'erreur ?

Merci.

10 réponses

  1. Bonjour,

    Pour appeler des éléments d'une autre page/formulaire/feuille/..., il suffit de les préfixer.

    Ici, form1.nom_de_l_element suffira.

    Pour le commondialog, j'avoue ne pas savoir.

    Sir_DEC
    8
    1. salut,
      Ta fonction est définie comme Private dans le form1.
      Tu ne peux donc pas l'appeller du form2.
      Essaies en remplacant Private par Public (devant Sub).
      3
      1. Merci pour ta réponse,

        la syntaxe était correcte mais j'obtenais toujours la même erreur alors j'ai déclaré ma fonction dans un "module" et cela fonctionne maintenant...

        Merci de ton aide ++
        1
        1. Bonjour,

          J'ai le même problème. Le premier qui trouve prévient l'autre.

          Bill
          0
        2. @BillLa réponse a déjà été donnée...
          0
      2. Bonjour,
        Je ne maîtrise pas access et en voulant faire une recherche dans la base, j'ai eu le message : ERREUR DE COMPILATION: sub ou function non définie. Sous la petite fenêtre d'erreur, il y a le texte suivant:

        Private Sub rechercheNom_Click()

        Dim dbLocal As Database 'base de données actuelle
        Dim recEntreprise As DAO.Recordset 'le recordset qui contiendra le résultat
        Dim RecEntrepriseCherchee As QueryDef 'l'objet même décrivant la requête
        Dim nomEntrepriseCherchee As String
        Dim numeroEntrepriseCherchee

        nomEntrepriseCherchee = InputBox("Veuillez saisir un nom", "Recherche d'une Entreprise", XPos:=2000, YPos:=2000)

        Set dbLocal = CurrentDb()
        Set RecEntrepriseCherchee = dbLocal.QueryDefs("RRechercheEntrepriseNom")
        RecEntrepriseCherchee("Nom de l'entreprise") = nomEntrepriseCherchee
        Set recEntreprise = RecEntrepriseCherchee.OpenRecordset()
        u numeroEntrepriseCherchee = recEntreprise!NumEntreprise

        La phrase du début :
        Private Sub rechercheNom_Click() est en jaune

        et la phrase de fin : !NumEntreprise est en gris

        Je ne peux donc pas faire de recherche. Comment puis-je faire pour résoudre ce problème? Merci de votre aide...
        2
        1. Essaye d'exécuter en mode pas à pas pour voir précisément où est l'erreur, et si possible donnes-nous l'architecture générale de ton programme, n'y a-t-il que cette procédure, seule, qui est appelée ? Et sur quel événement ?
          1
          1. bjr

            je cherche la syntaxe qui permet de faire appel a une procédure stockée !
            je travaille sur une application ado.net (en mode decon) et je veux faire appel a une procédure mai j'arrive pas a faire cla
            '
            merci de m'écrire le code !
            0
            1. bjr voila j'ai creé une fonction Sub Lancer_impression(ByVal ListView As ListView) dans la form1
              dans la quelle il y a un bouton imprimer que lorsque je click dessus il fait appel à ma fonction le probleme qu'il me declare lors de l'appel de cette fonction compil erreur je vous empri j'en ai vraiment besoin merci d'avance
              0
              1. titi, comment veux-tu que l'on te réponde sans code ?
                0
                1. salut,

                  je veux faire un appel d'une procédure de form1 vers le form2.

                  et je veux afficher une image dans le commondialog pour insérer le photo de mes employés.

                  aussi les états d'aperçu de mes rapports pour mes emploiyés.
                  0
                  1. where is the solution i see just some blabla
                    1