Files
SDL/SDL/Benutzerdefinierte Steuerelemente/UserControl2.vb

21 lines
665 B
VB.net

Public Class UserControl2
Public value = ""
Event MECLICK(sender As Object)
Event DEL(sender As Object)
Private Sub Label2_Click(sender As Object, e As EventArgs) Handles lblAuftr.Click, lblAbfBez.Click, lblAbfBez.Click
RaiseEvent MECLICK(Me)
End Sub
Private Sub Label1_Click(sender As Object, e As EventArgs) Handles lblAbfBez.Click
RaiseEvent MECLICK(Me)
End Sub
Private Sub lbl_Click(sender As Object, e As EventArgs) Handles lblNr.Click
RaiseEvent MECLICK(Me)
End Sub
Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click
RaiseEvent DEL(Me)
End Sub
End Class