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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار (/showthread.php?tid=25603)

هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار - alipro - 03-07-18

اريد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اضغط علي الازرار  Idea



وشكرا لكل المهتمين


RE: هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار - elgokr - 03-07-18

(03-07-18, 01:27 AM)alipro كتب :
اريد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اضغط علي الازرار  Idea



وشكرا لكل المهتمين

هل تقصد مثل السورس المرفق

صورة للبرنامج

الادوات المستخدمة :
1- عدد (1) TextBox
2- عدد (1) Timer

خصائص اداء الـ Timer

الكود المستخدم للفورم كاملاً
كود :
Public Class Form1
   Dim ii As Integer
   Dim kk As String = "لا تنسي ذكر الله ( لا اله الا الله محمد رسول الله )..."
   Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       TextBox1.Text += kk.Chars(ii)
       ii += +1
       If ii >= kk.Length Then
           ii = 0
           TextBox1.Text = Nothing
       End If
   End Sub
End Class

تحياتى لك
وتمنياتى لك التوفيق


RE: هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار - YousefOkasha - 04-07-18

هذا الكود اسهل ..

كود :
My.Computer.SendKey.Send ("Vb4Arb"(

تحياتي لكم 


RE: هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار - elgokr - 04-07-18

(04-07-18, 01:23 AM)YousefOkasha كتب : هذا الكود اسهل ..

كود :
My.Computer.SendKey.Send ("Vb4Arb"(

تحياتي لكم 


بخصوص هذا الكود

هو عبارة عن تنفيذ لوحة المفاتيح
ولرؤية ما يتم تنفيذه يجب ان يكون الكود بهذا المثال
كود :
TextBox1.Focus()
       My.Computer.Keyboard.SendKeys("Vb4Arb")

ووظيفة الكود تفيد اذا كنت تريد انشاء مشروع لوحة المفاتيح
حيث يمكنك عمل تنفيذ لكل امر مثل
كود :
My.Computer.Keyboard.SendKeys("{BACKSPACE}")

وهنا يعنى عمل مسافى اى اضغط على المسطرة للوحة المفاتيح
ويمكن كتابتها ايضاً بهذه الطريقة
كود :
My.Computer.Keyboard.SendKeys("{BS}")

فمثلاً قم بانشاء زر وضع هذا الكود بداخله
كود :
My.Computer.Keyboard.SendKeys("{NUMLOCK}")

ستجد ان الاضاءة الخاصة بارقام لوحة المفاتيح تتغير كلما قم بالضغط على الزر
كما لو انك تضغط على Num Lock فى لوحة المفاتيح

تحياتى لك


RE: هلي يوجد طريقة لجعل لوحة المفاتيح تكتب لوحدها وكاني اظغط علي الازرار - dametucorazon - 04-07-18

ماشا ءالله ربنا يحميك