cs_JeffC1977
Messages postés928Date d'inscriptionvendredi 10 novembre 2000StatutMembreDernière intervention23 septembre 2023
-
2 mai 2006 à 18:56
Utilisateur anonyme -
3 mai 2006 à 10:06
Salut...
J'aimerais savoir s'il existe une façon pour rendre inaccessible un optbutton sans changer son apparence (optButton.Enable=False) ???
cs_JeffC1977
Messages postés928Date d'inscriptionvendredi 10 novembre 2000StatutMembreDernière intervention23 septembre 20234 2 mai 2006 à 19:21
Salut....
Ca ne fonctionne pas...
Ca fait mettre le Value à true... et dans ma Form Activate j'impose que tous les optButton soit à Value= False
J'attends de tes nouvelles....
If frmIndex.MousePointer = vbHourglass Then
optAssomption.Value = Not optAssomption.Value
optBerthier.Value = Not optBerthier.Value
optJoliette.Value = Not optJoliette.Value
optMontcalm.Value = Not optMontcalm.Value
optQuebec.Value = Not optQuebec.Value
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 200628 2 mai 2006 à 21:43
En fait, je n'ai pas d'autre solution, car ta demande ne correspond pas à un comportement normal de l'interface Windows ! Il y a bien la solution de se servir des API SetWindowLong() et consor ... mais je ne suis pas uin spécialiste de celles-ci alors je passe la main ...
CR
Vous n’avez pas trouvé la réponse que vous recherchez ?
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 3 mai 2006 à 07:14
salut,
Christophe te disait de mettre ce code dans l'évènement click de chaque option button (pour le rendre du même état qu'avant le click, une sorte de double-click plus ou moins...).
sinon :
Private Sub Command1_Click()
Dim Ctrl As Object
For Each Ctrl In Me
If TypeOf Ctrl Is OptionButton Then
Ctrl.Value = False
End If
Next Ctrl
End Sub