problems with key event

[octavia]

Anyone wants to help for my problems;

when i press ' key on keyboard', i want to show message in label.
but when i release that key, it should be leave blank in label.

It already handled out only ' press' event.
but the problem is on 'key releasing '
Who wants to help me, please? :)

[cguan_77]

use the keyup and key press event..

dont't know if this is what you mean

Private Sub Form_KeyPress(KeyAscii As Integer)
Label1.Caption = "My Label"
End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
Label1.Caption = ""
End Sub