Bloquear TextBox sin cursor

Private Sub TextBox_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tb_ruta.Enter
        TextBox1.Enabled = False
        TextBox1.Enabled = True
    End Sub