Como detectar mudanças no texto de TextBox e habilitar ou desabilitar um botão

'Este exemplo mostra como habilitar ou desabilitar um
'botão baseado no conteúdo de um TextBox. Para reproduzir,
'coloque um botão chamado "Button1" e uma caixa de texto
'em um formulário. Defina a propriedade Enabled do botão
'como False.

Public Class Form1

  Private Sub TextBox1_TextChanged(ByVal sender As System.Object, _
     ByVal e As System.EventArgs) Handles TextBox1.TextChanged

    'Habilita ou desabilita o botão dependendo do
    'tamanho do texto do TextBox
    If TextBox1.TextLength = 0 Then
      Button1.Enabled = False
    Else
      Button1.Enabled = True
    End If

  End Sub
End Class