Sub Page_Load(obj as object, e as eventargs)
     'Weitere Aktionen durchführen
     DataBind()
  End Sub

  sub Senden_Click(obj as object, e as eventargs)
     if Text1.TextChanged then
     Label1.DataBind()
     end if
  end sub