CheckBox coché alors info vers TextBox

[koukou40]

Bonsoir,
Je suis nouveau 😀 sur ce forum que je découvre avec émerveillement car il ruisselle d'infos très très utiles pour un débutant comme moi.
Cependant voici mon souci : dans un USF, j'ai placé 3 CheckBox (nommés respectivement "4H", "12H" et "20H"), et un TextBox (nommé Début). Si je coche sur un checkbox, j'aimerai que dans le textbox s'affiche soit biensûr "4H" ou "12H ou "20H", quelle est la solution ?

D'avance merci et à bientôt...pour d'autres questions !!!😉

koukou40

 

[justine]

Re : CheckBox coché alors info vers TextBox

bonsoir a tous, koukou40

sub checkbox1_click()
if checkbox1.value=true then textbox1.value="4H"
end sub

sub checkbox2_click()
if checkbox2.value=true then textbox1.value="12H"
end sub

sub checkbox3_click()
if checkbox3.value=true then textbox1.value="20H"
end sub

bonne continuation

 

[Cousinhub]

Re : CheckBox coché alors info vers TextBox

Bonsoir,
je pense qu'il vaudrait mieux que tu utilises les OptionButton
tu ne peux en sélectionner qu'un dans ton usf, ou dans une frame, et ensuite dans le code de tes Opt :

Private Sub OptionButton1_Click()
Début = OptionButton1.Caption
End Sub
Private Sub OptionButton2_Click()
Début = OptionButton2.Caption
End Sub
Private Sub OptionButton3_Click()
Début = OptionButton3.Caption
End Sub

un fichier exemple

 

[justine]

Re : CheckBox coché alors info vers TextBox

re pour completer une solution de plus qui elimine les confusions

sub checkbox1_click()
if checkbox1.value=true then
checkbox2.value=false
checkbox3.value=false
textbox1.value="4H"
end if
end sub

sub checkbox2_click()
if checkbox2.value=true then
checkbox1.value=false
checkbox3.value=false
textbox1.value="12H"
end if
end sub

sub checkbox3_click()
if checkbox3.value=true then
checkbox1.value=false
checkbox2.value=false
textbox1.value="20H"
end if
end sub


ceci a pour effet quand tu cliques sur une checkbox, ca efface les deux autres.
mais tu as interret d'utiliser les optionbutton
bonne continuation

 

[koukou40]

Re : CheckBox coché alors info vers TextBox

Merci à toi !

Cela fonctionne.

Bonne soirée

 

[koukou40]

Re : CheckBox coché alors info vers TextBox

Merci à vous deux !

Bonne soirée