[EYADISMAIL]

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

ازالة الصوت "المزعج" عند الضغظ على الانتر للانتقال بين التكست بوكس 

لمعرفة لماذا يصدر هذا الصوت؟ ...

هو عند تحديد خيار التكست بوكس 

كود :

MULTILINE = False

هذا الخيار لا يسمح بالتكست بوكس بكتابة سطر جديد اي تتكون من سطر واحد فقط فيصدر هذ الصوت "لا سطر جديد"
وعند تحديد 

كود :

MULTILINE = TRUE

يمكن اضافة سطر جديد فلا يصدر صوت عند الضغظ على الانتر.
لكن نحن نريد ضغظ الانتر وعدم كتابة سطر جديد والانتقال الي تكست بوكس جديد بدون اصدار صوت
اولا كود الانتقال بين التكست بوكس  " يوضع في حدث التكست بوكس 1 مثلا "((KEYPRESS))

كود :

If e.KeyChar = Chr(13) Then
           TextBox2.Select()

13 هو رقم الانتر
الي هنا مازال الصوت موجود  
ازالة الصوت مع البقاء على خصائص مفتاح الانتر  ضع هذا الكود اسفل السابق 

كود :

e.Handled = True

اذا كنت تريد اعادة الصوت غير True الي False او قم بازالته


حلت المشكلة ..   "في رعاية الله"

[Sadown]

السلام عليكم ورحمة الله وبركاته
اخ/EYADISMAIL

انا استخدم الاجراء التالي:

Public Sub PressEnter(sender As Object, e As KeyEventArgs)

       If e.KeyCode = Keys.Enter Then

           SendKeys.Send("{TAB}")

       End If

   End Sub

ثم استخدمه مع التكست بوكس في حدث keyDown
وحطت نفس الكود اللي كتبته e.Handled = True بس ما راح الصوت

[ابراهيم ايبو]

السلام عليكم اخي الكريم

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

كود :

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()
           e.Handled = True
       End If
   End Sub

واذا اردت ارجاع الصوت

كود :

TextBox1.Multiline = false

[EYADISMAIL]

(10-07-19, 10:00 AM)Sadown كتب : السلام عليكم ورحمة الله وبركاته
اخ/EYADISMAIL

انا استخدم الاجراء التالي:

Public Sub PressEnter(sender As Object, e As KeyEventArgs)

       If e.KeyCode = Keys.Enter Then

           SendKeys.Send("{TAB}")

       End If

   End Sub

ثم استخدمه مع التكست بوكس في حدث keyDown
وحطت نفس الكود اللي كتبته e.Handled = True بس ما راح الصوت

استخدم الكود في حدث KEYPRESS للتكست بوكس المتوقف عليها. وليس في حدث PressEnte