PDA

View Full Version : سوال: رویداد key down



reza69
جمعه 23 تیر 1391, 19:50 عصر
سلام من وقتی میخوام از کلید های جهت دار استفاده کنم برنامه عمل نمیکنه ولی وقتی از کلیدهای حروفی مثل ABC و.. استفاده میکنم برنامه اجرا میشه. واگر کلیدهای جهت دار رو بزنم و بعد از آن هر کدام از حروف روی کیبرد رو فشار بدم دیگه برنامه عمل نمیکنه دلیل چیه؟
اینم کدم
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
Select Case e.KeyCode
Case Keys.Right
Me.RectangleShape1.Left -= 2
Me.Label1.Text = "11111111111"
Case Keys.Left
Me.RectangleShape1.Left += 2
Case Keys.Up
Me.RectangleShape1.Top += 2
Case Keys.Down
Me.RectangleShape1.Top -= 2
Case Keys.A
Me.Label1.Text = "11111111111"
Case Keys.B
Me.Label1.Text = "22222222222"
End Select
End Sub

the king
شنبه 24 تیر 1391, 01:00 صبح
سلام من وقتی میخوام از کلید های جهت دار استفاده کنم برنامه عمل نمیکنه ولی وقتی از کلیدهای حروفی مثل ABC و.. استفاده میکنم برنامه اجرا میشه. واگر کلیدهای جهت دار رو بزنم و بعد از آن هر کدام از حروف روی کیبرد رو فشار بدم دیگه برنامه عمل نمیکنه دلیل چیه؟

به کدتون اضافه کنید :

Protected Overrides Function IsInputKey(ByVal keyData As System.Windows.Forms.Keys) As Boolean
Return True
End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
KeyPreview = True
End Sub