Case option (bouton radio)

Case option (bouton radio) - VB/VBA/VBS - Programmation

Marsh Posté le 07-09-2005 à 10:47:29    

salut, j'ai une forms contenant plusieur case option (ou bouton radio), opt1,opt2,opt3.....opt16. et je souhaiterais qu'à chaque fois que je clique sur un des boutons d'option (opt1 par exemple), tout les autres deviennent inactif. Ceux ci redeviendraient actifs lorsque j'aurai recliquer sur opt1. le truc c'est que j'ai 16 boutons. si j'en avais que 2 (opt1 et opt2) je ferai :
 
 
Private Sub opt1_AfterUpdate()
If Me.opt1 = True Then
Me.opt2.Enabled = False
Else
Me.opt2.Enabled = True
End If
End Sub
 
Private Sub opt2_AfterUpdate()
If Me.opt2 = True Then
Me.opt1.Enabled = False
Else
Me.opt1.Enabled = True
End If
End Sub
 
mais bon avec 16 ça devient chiant. quelq'un aurait une astuce ? merci

Reply

Marsh Posté le 07-09-2005 à 10:47:29   

Reply

Marsh Posté le 07-09-2005 à 11:30:23    

utilise une collection de controles


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 17-02-2006 à 14:09:10    

Deux solutions :
1- Regroupe les dans une même frame
2- Donne la même chaîne de caractères à la propriété groupname pour chaque bouton
Ils agiront en bloc et un seul sera activé


---------------
Il vaut mieux mettre les pieds dans le plat en société que de mourir tout seul !!!
Reply

Sujets relatifs:

Leave a Replay

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