DLL COMBOSENSE , LE COMBOBOX À SAISIE SEMI-AUTOMATIQUE PARFAIT !

Messages postés
589
Date d'inscription
jeudi 2 octobre 2003
Statut
Membre
Dernière intervention
29 avril 2008
- - Dernière réponse : cs_Nico52
Messages postés
35
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
11 mai 2007
- 14 sept. 2008 à 14:15
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/23147-dll-combosense-le-combobox-a-saisie-semi-automatique-parfait

Afficher la suite 
cs_Nico52
Messages postés
35
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
11 mai 2007
-
Faux en VB6 C'est pas plus long !!

Static NoSelectText As String ' texte tapé par l'utilisateur
Dim ia As Long ' compteur de boucle
Const RGBerror = 255 ' couleur du fond en cas d'erreur


With TxtClient '<== SEULE LIGNE A MODIFIER

' touche que l'on ne doit pas gérer dans cette procedure
If KeyCode = vbKeyUp Then Exit Sub ' utilisé par VB
If KeyCode = vbKeyDown Then Exit Sub ' utilisé par vb
If KeyCode = vbKeyLeft Then Exit Sub ' pour se déplacer
If KeyCode = vbKeyRight Then Exit Sub ' pour se déplacer

' action spéciale pour la touche BACK
If KeyCode <> vbKeyBack Then
NoSelectText = Mid(.Text, 1, Len(.Text) - .SelLength)
Else
If NoSelectText <> "" Then
NoSelectText = Mid(NoSelectText, 1, Len(NoSelectText) - 1)
End If
End If

' recherche de la correspondance
For ia = 0 To .ListCount - 1
If UCase(NoSelectText) = UCase(Mid(.List(ia), 1, Len(NoSelectText))) Then
.ListIndex = ia
Exit For
End If
Next

' selection de la partie que l'on a rajouté automatiquement
.SelStart = Len(NoSelectText)
.SelLength = Len(.Text)
End With
rapatonilabo
Messages postés
1
Date d'inscription
mercredi 19 avril 2006
Statut
Membre
Dernière intervention
19 avril 2006
-
Bonjour à tous!

Une petite question idiote de novice en la matière:
Comment est ce que je peux utiliser ce control combobox sur mon classeur excel????? Quels fichiers utiliser parmis la multitude que l'on trouve dans le fichier .zip???
J'attends avec impatience votre réponse ô maitres de la programmation car ce code m'intéresse vraiment bcp!!!

Merci
cs_Nonos
Messages postés
4
Date d'inscription
mardi 1 mai 2001
Statut
Membre
Dernière intervention
4 février 2006
-
GOTO --> .NET2
AutoCompleteMode (Suggest)
capuccino_fr
Messages postés
113
Date d'inscription
vendredi 5 mars 2004
Statut
Membre
Dernière intervention
11 février 2008
-
nickel ;) 8/10
ricomiracle
Messages postés
195
Date d'inscription
vendredi 19 novembre 2004
Statut
Membre
Dernière intervention
30 novembre 2009
-
Merci pour ta source...
Moi je cherche à réaliser avec un contrôle combobox une sorte de saisie semi-auto pointée. Je m'explique à la manière de visual studio, lorsque je tape la touche '.' la liste se déroule si le mot avant le point est reconnu comme ayant des attributs. Vous voyez ce que je veut dire...?
Il faut donc déplacer le combo à la suite du point (ou en dessous du mot taper)
Si il y en a qui on déja vu ça ou bien qui ont des idées, elles sont les bienvenues... Meric
Et l'option AutoCompletition existe ou pas alors?