CheckBox devient un OptionButtonRésolu

Question

Salut

Est-il possible d'utiliser un checkBox comme un OptinButton.

C'est-&#224;-dire qu'un seul checkbox peut &#234;tre coch&#233; &#224; la fois. Si un est coch&#233; les autres se d&#233;cochent.

J'airais besoin de faire ca car les utilisateurs de mon prog ont certaines demandent sp&#233;cial et ils trouvent que la visibilit&#233;e de l'optionbutton est plut&#244;t ordinaire comprativement au checkbox

merci d'avance

VisualBoinet · Accepted Answer

Voila c'est fait :)


Donc il faut bien faire ce que je t'ai dit juste au dessus pour t'eviter d&#233;j&#224; d'avoir quatre fois le m&#234;me code. et tu met ceci :


PS : je l'ai fait avec 4 checkbox toute les 4 nomm&#233;es Check1 et ayant pour indice de 0 &#224; 3




Private Sub Check1_Click(Index As Integer)


    Dim i As Integer


    


    For i = 0 To 3


        If i <> Index Then


            If Check1.Item(i).Value = 1 Then


                Check1.Item(i).Value = 0


                Exit Sub


            End If


        End If


    Next i


    Check1.Item(Index).Value = 1





End Sub



Voila A pluche

Bon courage pour le reste :)

VisualBoinet · Answer

Je pense qu'avec un petit algo du genre :



Si checkbox coch&#233; alors rendre les autres inaccessible finsi



ca devrait etre faisable...



Pour savoir si elle est coch&#233;e utilise la propriete value, et pour la rendre inaccessible c'est enabled.

VisualBoinet · Answer

Le probleme c'est que si tu les rends pas enabled ca fera une boucle.
La solution a adapt&#233;e serait donc de mettre toutes tes checkbox avec le
m&#234;me nom et de creer un groupe. Ensuite tu leur mets un indice
diff&#233;rents. Je regarde si jarrive &#224; te faire ca aujourd'hui &#224; mon
travail et je te redis quoi :)



A plus

CheckBox devient un OptionButton

3 réponses

Discussions similaires