Discussion :

[new_wave]

Bonjoiur,

J'ai crée un combobox mais aimerais saisir dedans des données et tester la validité de ces données.

On me dit que pour cela je dois selectionner la propriété 'list' dans celle du combobox.
Mais je vois que cela ne suffit pas. pour me permettre de saisir dans le combobox
Dans quelle mesure dois ej utiliser la propriété additem.
J'ai lu que un combobox dépendant d'un controle data ne gère pas cette méthode.

Une fois que la saisie est possible j'aimerais tester las valeurs saisies dans ce combobox.
Pourriez vous m'aindiquer avec quelle méthode.

Merci beaucoup de votre aide.

Nathalie

Pouuriez vous m'aider sur ce point

[sovo]

essais d'etre un peut plus precis , qu'entends tu par Verifier ?

la propriete additem peut marche mais il y a moins difficile.

[new_wave]

Bonjour,

J'aimerais que la valeur saisie dans cette combobox réponde à ces conditions :

elle doit avoir ses trois premiers caractères qui sont ceux des nombres du plan comptable qui sont dans cete combobox.
Ex : dans cette combo on trouve les numéros suivants 60200, 60300
Un utilisateur pourra saisir 60210 mais ne pourra pas saisir 61300 car le compte 613 n'existe pas parmi. les nombres de ce plan comptable existnat dans cette combo.

J'espère que cela est plus clair à présent.
Merci beaucoup de votre aide.
Cordialement.
Nathalie

[leteltel]

ton combobox doit etre en style : dropwdown combo et ensuite gérer dans l'evenement keypress chaque frappe de caractère

[jmfmarques]

Donne donc tes instructions de contrôle de saisie dans l'événement Keypress en contrôlant la veleur de Keyascii par rapport au début de la saisie...

[new_wave]

Rebonjour,

j'ai changé le style de la combobox en dropdown combo mais je ne parviens toujours pas à saisir à l'intérieur.
Pourquoi cette difficulté?

sinon, pour pouvoir tester les caractères saisis j'ai écrit cette procédure :

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub Combo1_KeyPress()
 
If Mid$(Combo1.Text, 1, 3) = Mid$(Dynplan.Fields("PLANSRU"), 1, 3) Then Combo1.AddItem (Combo1.Text)
Else
MsgBox "le nombre saisi ne peut correspond pas à un compte comptable du plan sru", vbExclamation
 
 
End Sub

Et à la compilation je reçois ce message : "la déclaration de la procédure ne correspond pas à la description de l'évènement ou d ela procédure de même nom


Si tu pouvais m'aider sur ce point, je t'en serais très reconnaissante.

Bien cordialement.
Nathalie

[new_wave]

Le test ne porte pas sur chaque caractère mais sur une suite de caractères.
Je me demande si la procédure keypress correspond bien.

Voici le code inséré dans la procédure 'entree'

Code :

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

1
2
3
4
5
6
 
 
If Mid$(Combo1.Text, 1, 3) = Mid$(Dynplan.Fields("PLANSRU"), 1, 3) Then Combo1.AddItem (Combo1.Text)Else
MsgBox "le nombre saisi ne peut correspond pas à un compte comptable du plan sru", vbExclamation
 
  End If

n'est il pas plus exact de tester la valeur de la chaine de caractères au niveau de cette procédure .
Cette procédure teste la valeur saisie dans un autre textbox et affiche une valeur de combobox correspondant.

Merci beaucoup de ton aide.
Cordialement.

Nathalie

[leteltel]

en concatenant le contenu actuel de la combobox et l'ascii de la touche frappée tu peut verifier ce que tu recherche

[zazaraignée]

Bof...

Moi qui suis parresseuse comme ça ne se peut pas... couplerais un combo tout simple (drop down list) avec un MaskEdit (Microsoft Masked Edit Control). Je gèrerais la validité du contenu par sa propriété Mask et l'ajout dans la liste par l'événement KeyPress sur la touche entrée... Mais bon... C'est comme je vous dis. J'suis paresseuse.

Quand je dis que je le couplerais... bien... Je veux dire que je le placerais par dessus pour ne voir que la flèche du combo et quand la valeur de celui ci changerais, j'afficherait la sélection dans le MaskEdit... Mais finalement, pour un truc de paresseuse, c'est peut-être tordu...

Je laisse tout de même ma proposition. Des fois que ça intéresserait...

[sovo]

tu peux aussi faire un test apres avoir entrer le nombre. donc dans le Combo1_Lostfocus je croit que ca peut

[jmfmarques]

La proposition de zaza me parait très sage (parole de demi-corse)