Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles TextBox1.TextChanged
         If Not TextBox1.Text = "" Then
            Button1.Enabled = True
        Else
            Button1.Enabled = False
        End If
    End Sub

Wenn alle Stricke rei?en, dann h?ng ich mich auf. ~ Karl Kraus