in vb.net wie erziehe ich ein click-Ereignis für ein label

Ich habe mehrere labels alle codiert als solche:

Public assessment_menu_button As New Label
Public current_label_clicked As New Label

AddHandler assessment_menu_button.Click, AddressOf click_assessment_menu_button

Private Sub click_assessment_menu_button(ByVal sender As System.Object, 
                                         ByVal e As System.EventArgs)
   current_label_clicked = sender
   ' do some other stuff
End Sub

Dann später in meinem Programm, ich habe eine Sub, die braucht, um eine klicken Sie, auf welchem label wurde in current_label_clicked und heben Sie ein click-Ereignis auf. So etwas wie

Private Sub whatever()
    current_label_clicked.performClick()
End Sub

aber man kann das nicht mit labels.

Also wie erhöhe ich das click-Ereignis für das label?

Dank.

InformationsquelleAutor John | 2013-08-27
  1. 4

    Nehmen wir an, Ihr label namens Label1.

    Dieser Sub ist der Sub, die ausgeführt wird, wenn Sie klicken Sie auf die Beschriftung.

    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click

End Sub

    Um ein label klicken, Sie brauchen nur zu rufen, dass event.

    Label1_Click(Label1, Nothing)

    Ist es 🙂

    • Danke für die info, aber ich habe einige buttons und ich möchte nicht eine separate Funktion für jede Taste. Ich bin versucht, eine einzelne Funktion für alle Etiketten und eine einzelne variable für die Referenz auf ein, auf die geklickt wurde. Wenn die "auf" - Unterroutine aufgerufen wird, nur mit welchem label wird durch den Variablen, und führen Sie eine click-Ereignis für ihn.
    • Dies würde funktionieren, wenn ich könnte "...) Behandelt sender.Klicken Sie auf", aber das gibt mir eine Fehlermeldung.
    • Wenn Sie haben 3 Etiketten Namen Label1, Label2 und Label3 Sie können eine Funktion erstellen, mit der Sie auf alle diese Etiketten. ` Private Sub Label_Click(sender As Object, e As EventArgs) Handles Label1.Klicken Sie Auf, Label2.Klicken Sie Auf, Label3.Klicken Sie auf " hier etwas End Sub`
    • OK, habe es herausgefunden. Ich kann einfach lassen Sie die "Handles" - Anweisung und es funktioniert genauso gut.
    • Anscheinend muss ich warten 8 Stunden für die post meiner letzten code als Antwort, aber im Grunde änderte ich meine Berufung routing werden die gleichen wie deine (William), aber mit meinem eigenen Namenskonvention.
    • Glücklich zu wissen, dass du dein problem gelöst 🙂

    InformationsquelleAutor William Gérald Blondel
  2. 1

    Gilt es als schlechte form zu nennen, die event-handler-Methode direkt. Den code, den Sie aufrufen müssen, wenn das label geklickt wird, in eine Methode und rufen diese Methode aus den label-click-handler, und das was auch immer Methode:

    Private Sub click_assessment_menu_button(ByVal sender As System.Object, ByVal e As System.EventArgs)
    runLabelCode(sender)

    'other code here
End Sub

Private Sub runLabelCode(sender As Label)
    current_label_clicked = sender

    'other code here
End Sub

'elsewhere in the code
Private Sub Whatever()
    runLabelCode(Label1, Nothing)
End Sub
    InformationsquelleAutor Chris Dunaway
Schreibe einen Kommentar