Ereignisse

Programmierung Ereignisse: Click, DblClick, MouseMove, KeyDown, KeyUp, KeyPress, Change
Private Sub cmdKlicken_Click()
MsgBox Prompt:="Click-Ereignis erhalten!", Title:="Click-Ereignis eingetreten", Buttons:=vbExclamation
End Sub
Private Sub Form_Click()
MsgBox Prompt:="Formular hat Click-Ereignis erhalten!", _
Title:="Ereignis eingetreten", Buttons:=vbExclamation
End Sub
Private Sub lstEreignisse1_Click()
lstEreignisse1.Clear
End Sub
Private Sub lstEreignisse2_Click()
lstEreignisse2.Clear
End Sub
Private Sub picAusgabe_Click()
lstEreignisse1.AddItem "Bildfeld wurde angeklickt"
End Sub
Private Sub picAusgabe_DblClick()
lstEreignisse1.AddItem "Bildfeld wurde doppelt angeklickt"
End Sub
Private Sub picAusgabe_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If chkMouseMove.Value Then lstEreignisse1.AddItem "Mauszeiger bei: " & X & "," & Y
End Sub
Private Sub txtEingabe_Change()
lstEreignisse2.AddItem "Change-Ereignis"
End Sub
Private Sub txtEingabe_Click()
lstEreignisse2.AddItem "Click-Ereignis"
End Sub
Private Sub txtEingabe_DblClick()
lstEreignisse2.AddItem "DblClick-Ereignis"
End Sub
Private Sub txtEingabe_KeyDown(KeyCode As Integer, Shift As Integer)
lstEreignisse2.AddItem "KeyDown-Ereignis"
End Sub
Private Sub txtEingabe_KeyPress(KeyAscii As Integer)
lstEreignisse2.AddItem "KeyPress-Ereignis"
End Sub
Private Sub txtEingabe_KeyUp(KeyCode As Integer, Shift As Integer)
lstEreignisse2.AddItem "KeyUp-Ereignis"
End Sub

Mehr Tipps: Tab-Reihenfolge

Sponsoren und Investoren

Sponsoren und Investoren sind jederzeit herzlich willkommen!
Wenn Sie die Information(en) auf dieser Seite interessant fanden, freuen wir uns über eine kleine Spende. Empfehlen Sie uns bitte auch in Ihren Netzwerken (z. B. Twitter, Facebook oder Google+). Herzlichen Dank!

Nach oben Sitemap
Impressum & Kontakt