Discussion :

[Clo72]

Bonjour à tous

Ai créé un navigateur Web avec VB6 et j'aimerais que le curseur clignote à la fin de la TextBox (txtAddress)

Exemple: http://google.fr/

Code :

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

1
2
3
4
5
6
7
 
Private Sub txtAddress_GotFocus()
    With txtAddress
        .SelStart = Len(.Text)
        .SetFocus
    End With
End Sub

A la fin du Form_Load, ai mis

Code :

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

1
2
Me.Show
 txtAddress.SetFocus

Mais rien ne clignote, comme si txtAddress n'avait pas le focus...

Quelqu'un a-t-il une idée