منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار (/showthread.php?tid=15143)



ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - A 7 B K - 18-03-16

 اريد كود بالفيجوال بيسك6 وهذا الكود لتنفيذ الامر التالي

يقوم بوظيفة الضغط على اف تسعه بشكل متكرر حسب الوقت اللي تحطه في هذا الكود
يعني لو فتحنا فورم جديد في الفيجوال بيسك6 وقمنا بوضع زر وكتبنا عليها اف تسعه 
اريد الكود اللي ادخله بهذا الزر لكي ينفذ هذه الوظيفه والتي هي الضغط على اف تسعه 
بس اريد عندما اضغط على الزر مره واحده بعدها ينفذ الامر وهو الضغط على اف تسعه تلقائياَ كل ثلاث ثواني
او اربع ثواني على حسب ما نحدد بالبرمجه واريد زر ثاني وهو ايقاف اف تسعه ويقوم هذا الزر بايقاف عملية 
الضغط على اف تسعه تلقائياَ اللي ينفذها الزر الاول هل فهمتني كل ما اريده هو الكود البرمجي اللي اضعه في الزر الاول
اللي سميته اف تسعه وكود للزر الثاني وهو ايقاف اف تسعه اتمنى يكون طلبي واضح واشكرك مره اخرى منتظر الرد ,.

مستحيل منتدى واسمه فيجوال بيسك وما احد يجاوبني
اتمنى اللي عنده جواب لا يبخل علينا لو تكرمتوا علينا اشكركم جزيل الشكر,


RE: ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - Ahmed_Mansoor - 18-03-16

أهلا أخي الكريم , ضع هذا الجزء من الكود في أعلى كود الفورم :

PHP كود :
Private Declare Sub keybd_event Lib "USER32" (ByVal bVk As ByteByVal bScan As ByteByVal dwFlags As LongByVal dwExtraInfo As Long)

Private Const 
KEYEVENTF_KEYUP = &H2
Private Const KEYEVENTF_KEYDOWN = &H0
Private Const VK_F9 = &H78 

وضع هذا الكود في زر الضغط المستمر على زر F9 :

PHP كود :
Call keybd_event(VK_F90KEYEVENTF_KEYDOWN0

وضع هذا الكود في زر إلغاء الضغط على زر F9 :

PHP كود :
Call keybd_event(VK_F90KEYEVENTF_KEYUP0



RE: ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - A 7 B K - 18-03-16

اهلاَ اخي واشكرك على جهدك ومتابعتك للموضع بس اخي ما ضبط معي
وطبقت مثل ما قلت بس ما ضبط لو توضح اكثر او بالصور تسوي الشرح لو سمحت
وبعدين انا اريد بس تضغط زر في واجهة الفورم اللي هو اف تسعه اضغطه مره واحده وهو بعدها
يكرر الامر دون ان اضغط على الزر نفسه يعني يعطي الامر كل ثانيه يضغط لوحده او كل ثلاث ثواني لو سمحت
واشكرك مره اخرى واسف لك ., انتظرك اخي .


RE: ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - Ahmed_Mansoor - 18-03-16

أهلا أخي الكريم , مثال في المرفقات .


RE: ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - A 7 B K - 18-03-16

اخي اشكرك جزيل الشكر والله بس ما ضبط معي مثل ما ابي انا
بس بعطيك مثال على البرنامج هذا هو

http://www.camatfl.com/f9MAX.rar


RE: ما هو كود عمل زر معين للكيبورد بالفيجوال يعمل باستمرار - Amir_Alzubidy - 18-03-16

السلام عليكم
ارجو ان يكون هذا هو المطلوب
[attachment=9849]