Pb variable bool

Pb variable bool - VB/VBA/VBS - Programmation

Marsh Posté le 10-06-2006 à 12:32:20    

bonjour a tous
 
je vous explique mon problème :
j'ai une boite de dialogue que l'on va appeler BD_machin et une autre BD_truc
BD_machin contient une liste déroulante LD_machin et un bouton poussoir BP_machin
(j'ai reduit le probleme : mes boites contiennent bien entendu plusieurs autres éléments)
J'effectue une requete et en fonction des resultats, la variable test prend vrai ou faux. SI ma requete ne comporte pas de resultat, la liste LD_machin n'est pas remplie donc je ne peux pas la dérouler grace au test=faux.
Il n'y a donc pas de pb dans ce cas
Mon problème est quand je clique sur le bouton BP_machin. Je voudrais ne pas pouvoir cliquer lorsque le test=faux mais il s'avère qu'il est toujours vrai alors que je ne l'ai pas modifié entre temps.
Je ne sais pas d'où vient l'erreur. SI quelqu'un a une solution ... Merci d'avance
 
Dans BD_machin :
 
Private Sub Form_Activate()
......
Dim test As Boolean
......
If .... Then
        test=true
else
         test=false
end if
......
If test=false then
           LD_machin.LIstIndex=0  
end if
end sub
 
------------------------------------------
 
Private Sub BP_machin_Click()
 
If test=false then
BD_DetailCpte.Show 1
end if
 
End Sub
 
------------------------------------------

Message cité 1 fois
Message édité par ju65 le 10-06-2006 à 12:36:45
Reply

Marsh Posté le 10-06-2006 à 12:32:20   

Reply

Marsh Posté le 10-06-2006 à 18:22:23    

Aide en ligne : portée des variables

Reply

Marsh Posté le 10-06-2006 à 19:10:21    

En résumé: Place ta varibale Test en dehors de tes methodes, de ce fait sa porté devient globale sur tout ton objet.

Reply

Marsh Posté le 12-06-2006 à 20:56:00    

ju65 a écrit :

bonjour a tous
 
je vous explique mon problème :
j'ai une boite de dialogue que l'on va appeler BD_machin et une autre BD_truc
BD_machin contient une liste déroulante LD_machin et un bouton poussoir BP_machin
(j'ai reduit le probleme : mes boites contiennent bien entendu plusieurs autres éléments)
J'effectue une requete et en fonction des resultats, la variable test prend vrai ou faux. SI ma requete ne comporte pas de resultat, la liste LD_machin n'est pas remplie donc je ne peux pas la dérouler grace au test=faux.
Il n'y a donc pas de pb dans ce cas
Mon problème est quand je clique sur le bouton BP_machin. Je voudrais ne pas pouvoir cliquer lorsque le test=faux mais il s'avère qu'il est toujours vrai alors que je ne l'ai pas modifié entre temps.
Je ne sais pas d'où vient l'erreur. SI quelqu'un a une solution ... Merci d'avance
 
Dans BD_machin :
 
Private Sub Form_Activate()
......
Dim test As Boolean
......
If .... Then
        test=true
else
         test=false
end if
......
If test=false then
           LD_machin.LIstIndex=0  
end if
end sub
 
------------------------------------------
 
Private Sub BP_machin_Click()
 
If test=false then
BD_DetailCpte.Show 1
end if
 
End Sub
 
------------------------------------------


 
 
BP_machin.enabled=test
ou BP_machin.visible=test

Reply

Sujets relatifs:

Leave a Replay

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