group checkbox

Question

bonjour 
je vais parler de mon probleme .
j'ai 6 checkbox sur une form.je veux realiser l'operation suivante:si je coche 4 parmi eux les deux autres seront desactivé automatiquement jusque la c faisable .
Mais si je decoche une parmi les quatres cochés les checkbox desactivés reviennent actif?
comment feari-je?
merci d'avance!!

jrivet · Answer

Salut, Il suffit de faire un test sur tout tes checkbox activés pour verifier si ils sont tous cochés: 1- si ils sont tous cochés alors les deux derniers sont inactifs (enable = False) 2- si ils ne sont pas tous cochés alors les deux derniers sont actifs (enable = True) En supposant que tu aies un groupe de checkbox appelé choix avec les index allant de 0 à 5 essaie le code suivant. Private Sub Choix_Click(Index As Integer) Dim i As Integer Dim TousCocher As Boolean TousCocher = True For i = 0 To 3 If Choix(i).Value = 0 Then TousCocher = False Exit For End If Next i Choix(4).Enabled = Not TousCocher Choix(5).Enabled = Not TousCocher End Sub Coloration syntaxique automatique [AFCK] Ce n est pas tres optimisé mais ca donne une idée @+, Julien Pensez: Moteur de Recherche, Réponse Acceptée

jrivet · Answer

Re,

essaie d'adapt&#233; car je n'avais pas vu que c'&#233;tait du .net (Va falloir que je fasse attention a ce nouvelle version du forum)...

Excuse.

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

NHenry · Answer

Bonjour

Doublon avec : http://www.vbfrance.com/infomsg_CHECKBOX_739276.aspx
&#233;vite de faire un rafraichissement quand tu cr&#233;&#233; un sujet, c'est d&#233;routant, on ne sait plus o&#249; r&#233;pondre.

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en priv&#233;
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

jsem2k1 · Answer

Avec le DotNet il n'est plus possible de faire des tableau de controle comme en vb6. :( Domage. Toutefois il est possible de redirigé toute ( ou presque) les Handles des évènemenr de différant controle vers une seule procédure. Cool 

Moi ce que je te suggère c'est de créé une variable nChked as integer qui va contenir le nombre de check box qui son coché
faire un tableau qui vas contenir tous les checkbox et de regiriger tout les évènement CheckedChanged ver une meme procédure

sa donne a peu près sa

Public Class Form1
    Public ChkBox(5) As CheckBox
    Dim nChked As Integer
    
Public Sub New()

        ' This call is required by the Windows Form Designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.

        ChkBox(0) = CheckBox1
        ChkBox(1) = CheckBox2
        ChkBox(2) = CheckBox3
        ChkBox(3) = CheckBox4
        ChkBox(4) = CheckBox5
        ChkBox(5) = CheckBox6

        For i As Integer = 0 To 5
            AddHandler ChkBox(i).CheckedChanged, AddressOf Me.ChkBox_ChkChange
        Next
   End Sub

    Private Sub ChkBox_ChkChange(ByVal sender As Object, ByVal e As System.EventArgs)
        If sender.ToString.EndsWith("0") Then
            nChked -= 1
        Else
            nChked += 1
        End If

        If nChked = 4 Then
            For i As Integer = 0 To 5                If ChkBox(i).Checked False Then ChkBox(i).Enabled False
            Next
        ElseIf nChked = 3 Then
            For i As Integer = 0 To 5                If ChkBox(i).Enabled False Then ChkBox(i).Enabled True
            Next
        End If
    End Sub

End Class

Bonne chance

Group checkbox

4 réponses

Votre réponse

Discussions similaires