السلام عليكم
قمت بعمل 2 صناديق نص وقمت بعمل كود لصندوق الاول في حدث بمفاتيح الختصار بحيث انه اذا تم الضغط على زر Enter يقوم بالتنقل بين صناديق النص بدلا من زر Tab الى هنا قمت بعمل الكود الخاص وشغال 100℅
ما اوريده الان هو كيف ازاله الصفاره التي تظهر عن الضغط على زر Enter
وعليكم السلام ،،
ماذا تقصد بالصفاره ؟
قم بإضافة هذا الكود بعد قيمة التنقل
كود :
e.SuppressKeyPress = True
(17-01-19, 03:41 PM)حريف برمجة كتب : [ -> ]وعليكم السلام ،،
ماذا تقصد بالصفاره ؟
ربما يقصد الأصفار ......
العفو منكم جميعا ان كان كلامي غير واضح
ما اقصده هو الصوت او النغمه التي تشير الى انه لا يمكن اضافه صطر في ال Textbox اذا كانت خاصيه تعدد الاسطر غير مفعله
اخي معاذ انت اجبت عن سؤالك
لان خاصية تعددالاسطر غير مفعلة و بالتالي لا يمكن اضافة سطر جديد لان مهمة الزر انتر هي الانتقال لسطر جديد في نفس الاداة
استخدم المنهج focus للتنقل بين الادوات اي انتقال التركيز من اداة الى اخرى
(17-01-19, 03:34 PM)معاذ_ابراهيم كتب : [ -> ]السلام عليكم
قمت بعمل 2 صناديق نص وقمت بعمل كود لصندوق الاول في حدث بمفاتيح الختصار بحيث انه اذا تم الضغط على زر Enter يقوم بالتنقل بين صناديق النص بدلا من زر Tab الى هنا قمت بعمل الكود الخاص وشغال 100℅
ما اوريده الان هو كيف ازاله الصفاره التي تظهر عن الضغط على زر Enter
السلام عليكم أخي الكريم هل وجدت الحل و إن أمكن ماهو لأنه لدي نفس المشكل بارك الله فيك
(17-01-19, 03:34 PM)معاذ_ابراهيم كتب : [ -> ]السلام عليكم
قمت بعمل 2 صناديق نص وقمت بعمل كود لصندوق الاول في حدث بمفاتيح الختصار بحيث انه اذا تم الضغط على زر Enter يقوم بالتنقل بين صناديق النص بدلا من زر Tab الى هنا قمت بعمل الكود الخاص وشغال 100℅
ما اوريده الان هو كيف ازاله الصفاره التي تظهر عن الضغط على زر Enter
السلام عليكم أخي الكريم هل وجدت الحل و إن أمكن ماهو لأنه لدي نفس المشكل بارك الله فيك
السلام عليكم ورحمة الله وبركاته
اليك هذا الكود مع ضغط انتر ينتقل الى التكست بوكس التالي مع الغاء صوت البيب
كود :
Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
TextBox1.Multiline = True ' هذا السطر يفيد اخفاء الصوت وان كان فولص سيظهر الصوت
If e.KeyCode = Keys.Enter Then
TextBox2.Select()
End If
End Sub
كود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(Keys.Enter) Then e.Handled = True
End Sub
السلام عليكم اخي الكريم ابو سعود
شكرا لك على الرد ولكن لو انتبهت الى السؤال( الانتقال الى مربع النص التالي بمفتاح انتر مع الغاء الصوت)
الكود الذي اوردته حضرتك يقوم بالغاء الصوت فقط بدون الانتقال ولا تستطيع في حدث KeyPress الانتقال الى المربع التالي
وكذلك كودك لايمكن وضعه في حدث KeyDown اتمنى منك مراجعة الكود واختباره
دمت بخير