WAP to find the events

Private Sub Form_Click()
Form1.Caption = "Form was clicked"
End Sub

Private Sub Form_DblClick()
Form1.Caption = "Form was double clicked"
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
Form1.Caption = "Key was press on keyboard"
End Sub


Posted by: Wasim Javed