empecher la modification du texte des combobox

Version imprimable

11/06/2007, 10h14
pierre2410

empecher la modification du texte des combobox

bonjour,
comment empecher la modification du texte des combox afin d'eviter la possibilité de rentrer nimporte quoi dans ma base ?
lorsque je met "locked" a true, on ne peux pas modifier le texte mais on ne peut rien selectionner
avez eu une solution ?
cordialement
pierre
11/06/2007, 10h51
OhMonBato

Change la propriété Style à "2" (DropDownList)

Ou alors tu bloques les entres dans le textebox.
Code:

1 2 3 4 Private sub Text1_keypress (keyascii as integer) keyascii = 0 end sub

13/06/2007, 18h46
zazaraignée
Citation:
Envoyé par sovo

Ou alors tu bloques les entres dans le textebox.

Code:

1 2 3 4 Private sub Text1_keypress (keyascii as integer) keyascii = 0 end sub
mais ce faisant, tu bloques aussi la possibilité de sélectionner un item juste en tapant les premières lettres.
13/06/2007, 19h22
sovo

Oui c vrai. Mais est que c'est vraiment necessaire, enfin je veux dire est qu'il le veux vraiment ?? car en lisant sont message ne vois pas paraitre un truc de ce genre.
13/06/2007, 19h47
OhMonBato

Je veux pas me la péter, mais ma réponse n'est elle pas la plus simple ? :D
13/06/2007, 22h11
zazaraignée

Citation:

Envoyé par OhMonBato

Je veux pas me la péter, mais ma réponse n'est elle pas la plus simple ? :D

oui, moi je crois. (Ho-la-la! j'ai l'impression, d'être à l'église, là!)
13/06/2007, 22h23
OhMonBato

Va en paix Zaza ! :mrgreen:
14/06/2007, 10h31
pierre2410

merci a vous pour les reponses, jai utilisé la methode de ohmonbato, cest exactement ce que je cherchais

Bonjour,

je cherche exactement à faire ceci. cependant je n'y arrive pas. Je commence par charger ma combo puis je la met en read only mais j'ai un retour d'erreur "can't assigne read only property"
voila mon code #

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
sql = "SELECT CodeFourn From fournisseurs ;"
    Set record = stock.OpenRecordset(sql, dbOpenDynaset)
    If record.RecordCount <> 0 Then
        Do Until record.EOF
            CboFournisseur(0).AddItem record![CodeFourn]
            CboFournisseur(1).AddItem record![CodeFourn]
            CboFournisseur(2).AddItem record![CodeFourn]
            CboFournisseur(3).AddItem record![CodeFourn]
            CboFournisseur(4).AddItem record![CodeFourn]
            CboFournisseur(5).AddItem record![CodeFourn]
        record.MoveNext
        Loop
    End If
    record.Close
    Dim i As Integer
    For i = 0 To 5
        CboFournisseur(i).Style = 2
    Next i

Merci d'avance pour votre aide

Cordialement
Pierre

10/01/2008, 14h13
imparator_42

:aie: Comment on fait pour qu'on pisse rentrer que "des chiffres" dans un textbox?
la meme question pour "des lettres"?
('si possible' la meme question pour "des signes etc..."?)

Sympa de repondre , merci davance
10/01/2008, 17h27
ProgElecT

Regardes du coté de Vos contributions VB6 entre autre [Trucs & Astuces] Forcer les touches clavier en numerique devrait te permetre d'arriver à tes fins.