Problème UserControl

Question

Bonjour à tous, 

Je travaille en VB6 et j'ai un problème avec un Usercontrol (OCX) que j'ai créé. Ce contrôle est basé sur un textbox. En fait, la propriété SelLength ne fonctionne pas correctement avec mon contrôle. 

J'aimerais que lorsque le contrôle prend le Focus sélectionner 
le champ en entier.

Pour cela j'utilise le code suivant dans mon formulaire : 

Private Sub sTextField_GotFocus()
        sTextField.SelLength = Len(sTextField.Text)
End Sub

Ce code ne fonctionne pas avec mon contrôle mais bien 
avec un textbox normal. Quand je suis en debug et que je vérifie 
la valeur de SelLength elle contient bien la longueur du champ
mais rien n'est sélectionné.

Merci d'avance pour vos suggestions.

cboulas · Answer

Salut, essai plutôt de placer le gotfocus par rapport au contrôle lui même.

Chris...
Web : Firstruner - eMail :  [mailto:support@firstruner.com Support]

Renfield · Answer

Il te faut également définir le début de la selection :


Private Sub sTextField_GotFocus()
    With sTextField
        .SelStart = 0
        .SelLength = Len(.Text)
    End With
End Sub


Amusez-vous !  ;) 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS

Problème UserControl

2 réponses

Discussions similaires