Text Box Help

[308holes]

Hello Im working on a Custom TextBox and im Stuck Im trying to have the Custom Control Select All the Text when it get Focus but its not working ??
i have tryied

    Protected Sub OnFocus(ByVal e As System.EventArgs)
        Me.SelectAll()
    End Sub

    Private Sub LemoIP_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Enter
        Me.SelectAll()
    End Sub

    Protected Overrides Sub OnEnter(ByVal e As System.EventArgs)
        Me.SelectAll()
    End Sub

    Private Sub LemoIP_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.TextChanged
        Me.SelectAll()
    End Sub