Adicionar evento click em cada controle textbox no form

Question

Quero fazer um selectall() em todos os textbox do meu form

Para evitar de abrir 1 por 1 em cada  evento click de cada textbox colocar o codigo, queria fazer isso em um loop

Mas não estou conseguindo achar os textbox dentro do form

    Private Sub txt_Click(sender As Object, e As EventArgs)
        Dim txt = DirectCast(sender, TextBox)
        txt.SelectAll()

    End Sub

    Private Sub FRM_CADUSUARIO_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim txt As New TextBox
        For Each txt In Me.Controls
            AddHandler txt.Click, AddressOf txt_Click
        Next
    End Sub