[دمعة المقهور]

بصراحة عندي طلبين أرجوا أخواني الأعضاء مساعدتي :

الطلب الاول : أريد كود : عندما أكتب على textbox ثم أضغط على الزر Enter يظهر لي رسالة بالموجود في textbox

الطلب الثاني :إذا كنت في أي فورم و قم بالضغط على الزرين ctrl+F يظهر لي فورآخر

أرجوا يكون السؤال واضح !!

[سعود]

إقتباس :

الطلب الاول : أريد كود : عندما أكتب على textbox ثم أضغط على الزر Enter يظهر لي رسالة بالموجود في textbox

ضمن حدث

كود :

KeyDown

لمربع النص اكتب

كود :

If e.KeyData = Keys.Enter Then            
MsgBox(TextBox1.Text)


        End If

[سعود]

إقتباس :

الطلب الثاني :إذا كنت في أي فورم و قم بالضغط على الزرين ctrl+F يظهر لي فورآخر

ضمن حدث

كود :

KeyDown

للفورم الحالي اكتب

كود :

If e.KeyData = Keys.Control + Keys.F Then            
Dim frm As New Form1
            frm.Show()
        End If

ملاحظة! لا يعمل الكود في حال تمكين Tabstop
بلا شك اخواننا لديهم كود افضل.

[Aly El-Haddad]

سعود كتب :ضمن حدث

كود :

KeyDown

للفورم الحالي اكتب

كود :

If e.KeyData = Keys.Control + Keys.F Then            
Dim frm As New Form1
            frm.Show()
        End If

ملاحظة! لا يعمل الكود في حال تمكين Tabstop
بلا شك اخواننا لديهم كود افضل.

الكود يعمل في حال تمكين Tabstop لكن بشرط تمكين خاصية KeyPreview للـForm

[Abu00Raas]

السلام عليكم ..

بعد إذنكم أخواني ..

أخوي هذا ملف مرفق شيك عليه وإن شاء الله بيعجبك ..

طبعاً إذا ضغطت على انتر بيظهر لك الكلام اللي في التيكست بوكس

وإذا ضغطت على الحرف f بيظهر لك الفورم الثاني

وبالتوفيق ،،

[دمعة المقهور]

شكرا أخواني الأعضاء : سعود , Aly El-Haddad , Abu00Raas
جزاكم الله خير ونفعنا بكم إن شاء الله ......جربت الأكواد و كانت 100%