Pb de transfert de variables entre deux Form (VB)

Pb de transfert de variables entre deux Form (VB) - Programmation

Marsh Posté le 06-01-2002 à 17:55:38    

Voilà mon pb j'utilise deux form: une pour la partie logiciels, et une autre pour saisis de valeur. Ces données je les mets dans un tableau. Le pb c'est que le tableau n'a une durée de vie que pour la Form il a été créer. J'ai donc besoin de récupérer mes données de la Form2 pour les intégrer à la Form1. Pour celà je veux passer par une Public Sub (dans Form1) par "Call" mais il me dis : Procedure Sub ou fonction non définie. Ki peut m'aider ??
 
Form2 :
Private Sub SaisieClient_Change()
    TemoinAbt = False
    NomUtilisateur = SaisieClient.Text
    Call maj
End Sub
 
Form1
Public Sub maj()
 
    TabPoste(Index + 2, 4) = NomClient(Index).Text = NomUtilisateur
    TabPoste(Index + 2, 3) = TemoinAbt
 
 
End Sub

Reply

Marsh Posté le 06-01-2002 à 17:55:38   

Reply

Marsh Posté le 06-01-2002 à 22:12:51    

Ca marchera pas, par le simple fait que tu ne peut appeler une procédure d'une form si tu n'est pas dans la form elle même
par exemple form1 ne pourras appeler aucune procédure de ton form2 même si tu la déclare en publique
Ce que tu peux faire c'est créer un module tu place ton code la dedans en publique et c'est bon, avec une procédure dans un module, tu peut l'appeler de n'importe quelle form ou module

 

[edtdd]--Message édité par Liquid--[/edtdd]

Reply

Marsh Posté le 07-01-2002 à 11:04:13    

De plus dans un module, les variables declarées sont publique a toutes l'application.

Reply

Marsh Posté le 09-01-2002 à 19:37:50    

sinon tu crée une sub dans to form réceptrice qui fait l'allocation du paramètre vers la variable

Reply

Marsh Posté le 09-09-2009 à 14:33:28    

stampouille a écrit :

Voilà mon pb j'utilise deux form: une pour la partie logiciels, et une autre pour saisis de valeur. Ces données je les mets dans un tableau. Le pb c'est que le tableau n'a une durée de vie que pour la Form il a été créer. J'ai donc besoin de récupérer mes données de la Form2 pour les intégrer à la Form1. Pour celà je veux passer par une Public Sub (dans Form1) par "Call" mais il me dis : Procedure Sub ou fonction non définie. Ki peut m'aider ??
 
Form2 :
Private Sub SaisieClient_Change()
    TemoinAbt = False
    NomUtilisateur = SaisieClient.Text
    Call maj
End Sub
 
Form1
Public Sub maj()
 
    TabPoste(Index + 2, 4) = NomClient(Index).Text = NomUtilisateur
    TabPoste(Index + 2, 3) = TemoinAbt
 
 
End Sub


 
Il faut justement appeler ton procedure avec : Call Form1.maj() c'est tout. merci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed