کار با keypress

[www.pc3enter.tk]

سلام دوستان عزیز می خواستم بدانم چگونه می توانم از keypress ستفاده کنم
به طور مثال :
وقتی دکمه ی R را فشار می دهم صفحه قرمز و وقتی دکمه ی G را فشار می دهم صفحه سبز شود.
لطفا اگر می توانید جواب دهید باتشکر :متفکر:

[parselearn]

اصول كار بسيار سادست

در صورتي كه روي فرم شي باشد
پروپرتي KeyPreview را True كنيد در غير اين صورت لازم نيست

رويداد:


Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 82 Then 'R
Me.BackColor = &H8080FF 'Red
ElseIf KeyAscii = 71 Then 'G
Me.BackColor = &H8000& 'Green
End If

MsgBox KeyAscii
End Sub