الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أريد اي شخص تجربة هذا الكود

بدأه Eng.S.IDk في 2 ديسمبر 2010 · 1 رد · 407 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله ,,,

تلقيت سؤال وهو تحريك البوتون باستخدام الاحرف على الكيبور فعندما اضغط على حرف ال L يتحرك البوتون الى اليسار ,

وفعلا قمت ببرمجتها عندما كنت في الجامعة ولكن عندما انتقلت الى البيت حاولت برمجتها ولم اتمكن , ولا ادري ما هو السبب هل الخلل في البرنامج ام الخلل في الكود نفسة , فأرجو من اي شخص يمتلك الفيجوال بيسك يقوم بتجربة هذا الكود لدية وهل سيعمل تحريك للبوتون عندما تكون ضاغط على حرف اللام ام لا , طبعا يتحرك بشكل مستمر وليس لمرة واحدة ,,

هذا هو الكود

Private Sub Button1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button1KeyDown 
        If e.KeyCode = Keys.L Then 
            Me.Button1.Location = New Point(Me.Button1.Location.X - 1, Me.Button1.Location.Y)
end if
end sub

ارجو التجربة لمن لدية البرنامج . وهل ينفذ عنده ام لا '

طبعا يقوم بإضافة بوتون على الفورم ومن ثم اختيار الحدث KeyDown

تم تعديل هذه المشاركة بواسطة Eng.S.IDk في 2 ديسمبر 2010 في 20:55

#2

المشكلة في الحدث الذي وضعت فيه الكود

ضع الكود في حدث

form_KeyDown

مع تفعيل خاصية

KeyPreview

إلى القيمة

True

حتى يستجيب الإجراء حتى في حال أن يكون أي أداة أخرى هي المفعلة

مواضيع مشابهة