Private Sub Feld_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles l1.Click, l2.Click, l3.Click, l4.Click, _
      l5.Click, l6.Click, l7.Click, l8.Click, l9.Click, l10.Click, l11.Click, _
      l12.Click, l13.Click, l14.Click, l15.Click, l16.Click, l17.Click, _
      l18.Click, l19.Click, l20.Click, l21.Click, l22.Click, l23.Click, _
      l24.Click, l25.Click, l26.Click, l27.Click, l28.Click, l29.Click, _
      l30.Click, l31.Click, l32.Click, l33.Click, l34.Click, l35.Click, _
      l36.Click, l37.Click, l38.Click, l39.Click, l40.Click, l41.Click, _
      l42.Click, l43.Click, l44.Click, l45.Click, l46.Click, l47.Click, _
      l48.Click, l49.Click, l50.Click, l51.Click, l52.Click, l53.Click, _
      l54.Click, l55.Click, l56.Click, l57.Click, l58.Click, l59.Click, _
      l60.Click, l61.Click, l62.Click, l63.Click, l64.Click, l65.Click, _
      l66.Click, l67.Click, l68.Click, l69.Click, l70.Click, l71.Click, _
      l72.Click, l73.Click, l74.Click, l75.Click, l76.Click, l77.Click, _
      l78.Click, l79.Click, l80.Click, l81.Click
        (...)
    End Sub