Discussion :

[law56100]

Bonjour

J'aimerai bloqué la saisie dans ma combobox.

ALORS voici mon code (le nom de ma combobox = ComptesAux):

Code :

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

1
2
3
4
5
6
7
8
9
10
    ADD_Comptes.Open "SELECT TPAR FROM COMPTES WHERE TCPT ='" & ComptesGen.Value & "' ORDER BY TPAR", ConnCACAO, adOpenStatic, adLockReadOnly
    If Not ADD_Comptes.EOF Then
        Do While Not ADD_Comptes.EOF
            If ADD_Comptes("TPAR") <> "" Then
                ComptesAux.AddItem ADD_Comptes("TPAR")
            End If
            ADD_Comptes.MoveNext
        Loop
    End If

J'aimerai bloquer la saisie, c'est à dire que l'utilisateur pourra choisir un élément de la liste mais pas en rajouter. Et si possible garder le racourçi clavier.

J'ai essaié ComptesAux.MatchRequired mais ne repond pas a mes critères et en plus il affiche un message.

cordialement law56100

pour bloqué la saisie cela fonctionne mais mon racourci clavier ne marche plus
ComptesAux.Style = fmStyleDropDownList

[ucfoutu]

pour bloqué la saisie il cela fonctionne mais mon racourci clavier ne marche plus
ComptesAux.Style = fmStyleDropDownList

Remets alors le style comme il était et joue avec l'évcènement Keypress, dans lequel il te suffira de mettre :

Code :

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

KeyAscii = 0