checkbox dans formulaire access

Version imprimable

27/11/2007, 11h34
vibalistic

checkbox dans formulaire access

Bonjour à tous,

j'ai un grand soucis. J'ai 10 checkbox dans un formulaire access. j'aimerai que:
5 checkbox renvoient chacune la même valeur 10 dans un textbox lorsque l'un d'entre eux est sélectionné
les 5 autres checkbox renvoient chacune la même valeur 15 dans le même textbox lorsque l'un d'entre eux est sélectionné.

lorsquun checkbox est selectionné, les autres ne doivent plus l'être. Comment faire.

J'ai besoins de vous, please!

Au travers du code.

Sur l'événement click de chaque Checkbox, tu mets le code suivant

Exemple checkbox1

Code:

1
2
3
4
5
6
7
8
9
if me.checkbox1 = true then 
    me.checkbox2 = false           ' met la valeur du checkbox à false
    me.checkbox2.enabled = false 'désactive le checkbox
   ..traiter les checkbox 3 à 5 
    me.txtbox1 = true
else
   me.checkbox2.enabled = true 'réactive le checkbox
   ..traiter les checkbox 3 à 5 
endif

endif

27/11/2007, 12h23
vibalistic
Merci JFC. Mais il ya un problème car il faut toujours programmer un à un les checkbox et si ya 100 checkbox on fait comment

l'idée serait de dire
Code:

1 2 3 4 5 6 7 8 9 if checkbox 1 = true then checkbox 1.value = 10 else les autres checkbox= false end if end sub
mais comment dire checkbox1= checkbox2 = checkbox... checkbox N pour qu'au click de n'importe laquelle de l'une d'entre elle, la valeur reçu dans le textbox soit la m^me?

Bonjour

Voici ce que tu devrais faire :

1 - Tu crées tes chekbox en créant un groupe d'option (aide toi de l'assistant pour le faire, c'est trés simple).
2 - Cela aura pour effet de répondre à ta derniére question, tu ne pourras en cocher qu'une à la fois.
3 - Chaque chekbox possède une propriété remarque (TAG), dans celles-ci tu mets la valeur que tu veux voir s'afficher dans ta texbox
4 - Les chekbox font parties d'un groupe, la propriété value de ceui-ci te donne la chekbox (1 pour la première et ainsi de suite).
5 - Voici un exemple

Création d'un groupe d'option (nommé Cadre0)
Création de 3 chekbox grâce à l'assistant (cocher3, cocher5, cocher7)
Un bout de code d'exemple sur le click de ce groupe d'options
Code:

1 2 3 4 5 6 7 8 9 10 Private Sub Cadre0_Click() Select Case Me.Cadre0.Value Case 1 MsgBox Me.Cocher3.Tag Case 2 MsgBox Me.Cocher5.Tag Case 3 MsgBox Me.Cocher7.Tag End Select End Sub
Lorsqu'une case se coche la valeur de tag (remarque s'affiche).

Voilà le principe.

Regarde du coté de Select ... case pour l'utilisation. Il te suffit de rajouter une case à cocher dans le groupe d'options, et une ligne dans le select case.