Vous devez être membre et vous identifier pour publier un article.
Les visiteurs peuvent toutefois commenter chaque article par une réponse.

[VB] Boutons radio (cochés ou pas?)

Astuces de l’Infobrol (Développement)Article publié le 09/05/2005 18:57:31


Comment savoir quelle bouton radio est coché sans les tester un par un ?

Deux méthodes possibles:



Utiliser les opérateurs



  1. MsgBox Op_Condition(Op_Condition(0) * 0 - Op_Condition(1) * 1 - Op_Condition(2) * 2 - Op_Condition(3) * 3).Caption

Valable si on connaît à l’avance le nombre de boutons radios.

Créer une fonction



  1. Private Function QuelleCoche(ObjOptionButton As Variant) As Integer
  2. Dim Ctrl As Control
  3. Dim i
  4. For Each Ctrl In ObjOptionButton
  5. If Ctrl = True Then QuelleCoche = i
  6. i = i + 1
  7. Next
  8. End Function
  9. Exemple d'appel
  10. MsgBox QuelleCoche(Option1)


Appel -› Appeler la fonction "Quellecoche" en passant le nom du controle OptionButton
Réception -› Retour d'un entier





Avatar :: Akira Sato Un article de Akira Sato

Source : www.trucsastuces.com


Sélection, tri et recherche d'articles
FILTRER :
TRIER :1er critère : 2e critère :
CHERCHER : Dans les titres Dans le contenu


[Afficher les liens en fonction des critères du formulaire ci-dessus]

Nederlandse vertaling

U hebt gevraagd om deze site in het Nederlands te bezoeken. Voor nu wordt alleen de interface vertaald, maar nog niet alle inhoud.

Als je me wilt helpen met vertalingen, is je bijdrage welkom. Het enige dat u hoeft te doen, is u op de site registreren en mij een bericht sturen waarin u wordt gevraagd om u toe te voegen aan de groep vertalers, zodat u de gewenste pagina's kunt vertalen. Een link onderaan elke vertaalde pagina geeft aan dat u de vertaler bent en heeft een link naar uw profiel.

Bij voorbaat dank.

Document heeft de 13/09/2004 gemaakt, de laatste keer de 26/10/2018 gewijzigd
Bron van het afgedrukte document:https://www.gaudry.be/nl/ast-rf-238.html

De infobrol is een persoonlijke site waarvan de inhoud uitsluitend mijn verantwoordelijkheid is. De tekst is beschikbaar onder CreativeCommons-licentie (BY-NC-SA). Meer info op de gebruiksvoorwaarden en de auteur.