Combo Box

[Rafael GAGA]

Eu coloquei um combo box em meu projeto e preciso que ele aceite digitar apenas dois dígitos, porém ele não tem a propriedade maxlentgh (a única forma que conheço), gostaria de uma dica de como fazer.

Obrigado pela atenção

Rafael GAGA

[Guest Guest]

Estranho o seu combo box não ter essa propriedade, a não ser que esteja usando um componente combo box sem ser do Visual Basic.

Tenta assim!

Form_Load

ComboBox1.MaxLength = 2

End Sub

[Graymalkin]

Estranho o seu combo box não ter essa propriedade, a não ser que esteja usando um componente combo box sem ser do Visual Basic.

Tenta assim!

Form_Load

ComboBox1.MaxLength = 2

End Sub

Mas, realmente não tem... Isso aí é valido só no VB.NET. No entanto, você pode utilizar o evento KeyPress para fazer algo assim:

    If KeyAscii <> 8 Then
        If Len(Combo1.Text) > 1 Then
            KeyAscii = 0
        End If
    End If

Abraços,

Graymalkin

[Rafael GAGA]

Consegui, mas não sei se por erro meu, só se aceita 1 dígito ou 3, tentei colocar ">= 3" (que habilita três digitos), "> 2" (que habilita 3 dígitos), ">= 2" (que habilita 1 dígito) .Eu sou iniciante e ficaria grato se alguém me ajudasse.

Obrigado pela atenção

[William Rodrigues]

Salve!

Estanho, pois teste o código do brother Graymalkin e deu certo. Veja:

Private Sub c_KeyPress(KeyAscii As Integer)
    If KeyAscii <> 8 Then
        If Len(c) > 1 Then
            KeyAscii = 0
        End If
    End If
End Sub

Só permite no máximo duas teclas.

Abraços,

William Rodrigues

[Graymalkin]

Salve!

Estanho, pois teste o código do brother Graymalkin e deu certo. Veja:

Private Sub c_KeyPress(KeyAscii As Integer)
    If KeyAscii <> 8 Then
        If Len(c) > 1 Then
            KeyAscii = 0
        End If
    End If
End Sub

Só permite no máximo duas teclas.

Abraços,

William Rodrigues

Exato, tem que ser ">1" porque uma tecla (a segunda) já é a que está sendo digitada e esse código é executado *antes* que ela seja inserida na Combo (ou seja, quando só existe um caracter na combo, então o código é executado).

Abraços,

Graymalkin