+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ (/showthread.php?tid=9730)
كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ - ellhadi39 - 22-07-13
السلام عليكم
أريد أن أصنع برنامج يقوم بالضغط مثلاً على مفاتيح
Control + Alt
هل هناك طريقة لذلك؟
أتمنى المساعدة
كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ - Top GreaT - 22-07-13
وعليكم السلام
تستطيع ان تضع الكود التالي
كود :
[align=left]
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal v As Long) As Integer ' هذا الكود في قسم التصريحات يعني اعلا الاكواد
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If GetAsyncKeyState(17) And GetAsyncKeyState(18) Then MsgBox "ppp"
End Sub
[/align]ويمكنك تجربة جميع الحروف
ولكي تتعرف الى ارقام الحروف
ضع مربعان نص وكتب الكود التالي
كود :
[align=left]
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal v As Long) As Integer ' هذا الكود في قسم التصريحات يعني اعلا الاكواد
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Text2.tex = KeyCode
End Sub
[/align]بالتوفيق ,,,
كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ - ellhadi39 - 22-07-13
سلام عليكم
ياصديقي لم يكن هذا قصدي ومع ذلك شكراً لمحاولة المساعدة إن ما أوده هو أن يقوم البرنامج بضغط تلك الأزرار تلقائياً، بدون ان أضغطها أنا... فعلى سبيل المثال: عندما يصل عداد زمني Timer إلى قيمة معينة، فليضغط على مفاتيح كذا وكذا....
كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ - 3amo - 22-07-13
اخي استعمل SendKeys
مثال
كود :
SendKeys "^{f4}"http://www.areaprog.com/vb6/cours-78-sendkeys-envoyer-des-touches-a-l-ordinateur?PHPSESSID=254c53b59c9b4b0c038e04eb0ec4d4c1
بالتوفيق حبيبي
كيف أصنع برنامج يضغط أزرار لوحة المفاتيح؟ - ellhadi39 - 25-07-13
[COLOR="#0000FF"]مششكككككككور جدا تمت الاستفاد
وجزاك الله كل خيرا و اللهم كثر من امثالك[/COLOR]