Discussion :

[Lucas42]

Bonjour , j'ai un petit soucis , j'ai mi sur une form 4 optionButton , mais le soucis , c'est que qd cette form s'ouvre , l'OptionButton1 se valide automiquement , comment faire pour qu'aucun des optionbutton se valide lors de l'ouverture de la form ??

merci d'avance
amicalement lucas

[SfJ5Rpw8]

? pour moi le principe des options boutons c'est qu'il faut avoir obligatoirement une (et une seule ) option de sélectionné ..?

Rajoute une 5° Option : Pas de Vanne

[Lucas42]

ok merci , je savais pas que qu'il y avai tt le tps un option boutton de cocher ^^
merci

[Lucas42]

ya pas un code plus condensé pour ecrire la mm chose ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Image1_Click()
menu.Show
End Sub
Private Sub Image2_Click()
menu.Show
End Sub
Private Sub Image3_Click()
menu.Show
End Sub
Private Sub Image4_Click()
menu.Show
End Sub

[SfJ5Rpw8]

je suis pas sur qu'une option à 1 soit obligatoire... , mais dans l'éditeur de Form ... elles sont comment tes options ...? ne peu tu pas les modifier en modifiant la propriété value ? ...


PS : j'ai pas VB6 sous la main ... en VBA on peu avoir toutes les options à False...

[Lucas42]

voila ce ke j'ai mis pour chacun des bouttons

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Option2_Click()
If Option2 = True Then
CHGT = 0
End If
End Sub
Private Sub Option3_Click()
If Option3 = True Then
CHGT = 1
End If
End Sub
Private Sub Option4_Click()
If Option4 = True Then
CHGT = 2
End If
End Sub
Private Sub Option5_Click()
If Option5 = True Then
CHGT = 3
End If
End Sub

[jmfmarques]

1) Sous VB également, on peut décider de n'avoir aucun bouton coché
2) pour ce qui est du 2ème problème :
la solution est un groupe de contrôles indexés et tonmachin.show dans l'événement click de ce seul groupe.

[jmfmarques]

Pareil pour tes boutons d'option :
un groupe indexé !