جعل ENTER بدلا من TAB

ليس هناك شئ جاهز يمكنه عمل هذا عليك ان تقوم بهذا بنفيك عن طريق ال Event Enter في الControls

اليك هذه الصورة فيها توضيح

طبعاً انت تختار من اسم الكلاس الاداة التي ترغب انطلاق الحدث منها مثل

عندك المؤشر في textbox1 تحدد اسم هذه الاداة وتذهب الى اسم الوظيفة وتختار keypress

طبعاً بمجرد ما تختار هذا الوظيفه على طول يعطيك مكان ما تكتب الكود وتكتب الكود كما موضح في الصورة

طبعاً انت عندما تريد الضغط على انتر اين ترغب ان يكون المؤشر ترغب ان يكون في textbox2 مثلاً العبارة التي في الكود tb2.focu تعني textbox2 يعني انقل المؤشر وضعه في textbox2

وسلامتك

واي استفسار انا حاضر بقدر معرفتي

بسم الله الرحمن الرحيم

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

يوجد طريقه اخرى للتنقل سواء textbox او combobox او.....

بدون ان تحديد اسمه وارفق لك الكود التالي للتنقل عند الضغط enter الى التالي وعند الضغط سهم فوق ينتقل الى السابق

ويتنقل حسب ترتيب تسلسل Tabindex لكل textbox او combobox او ....

ونسميه textbox دون تحديد رقمه او اسمه ونضع في ال handles الاسماء textbox التي نريد

 
Private Sub TextBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown, TextBox2.KeyDown, TextBox3.KeyDown, TextBox15.KeyDown, TextBox14.KeyDown, TextBox4.KeyDown, TextBox6.KeyDown, TextBox9.KeyDown, TextBox8.KeyDown, TextBox7.KeyDown, TextBox11.KeyDown, TextBox10.KeyDown, TextBox13.KeyDown, TextBox12.KeyDown, TextBox16.KeyDown, TextBox17.KeyDown, TextBox5.KeyDown
        If e.KeyCode = Keys.Enter Then
            SendKeys.Send("{TAB}")
        End If
        If e.KeyCode = Keys.Up Then
            SendKeys.Send("+{TAB}")
        End If
    End Sub

وهنا نسميه combobox دون تحديد رقمه او اسمه ونضع في ال handles الاسماء combobox التي نريد

 
Private Sub ComboBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ComboBox2.KeyDown, ComboBox1.KeyDown, ComboBox3.KeyDown, ComboBox5.KeyDown, ComboBox4.KeyDown
        If e.KeyCode = Keys.Enter Then
            SendKeys.Send("{TAB}")
        End If
        If e.KeyCode = Keys.Up Then
            SendKeys.Send("+{TAB}")
        End If
    End Sub

وتمنياتي لكم بالتوفيق

jdsa thanks