تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال عن كود
#1
عندما يكون عندنا اكثر من textbox
نتنقل من بينهم
اريد كود يجعلني انتقل من textbox لاخر عن طريق ضغط enter
فمثلا حينما اشغل البرنامج
اكتب في الخانة الاولى اضغط enter مباشرة المؤشر ينتقل للtextbox الثاني وهكذا


شاكر لكم تعاونكم
:
الرد
تم الشكر بواسطة:
#2
.....

منقول

كود :
Private Sub Form_Load()
    ' يمكن الإستغناء عن هذا السطر بضبط هذه الخاصية عن طريق خصائص الفورم
    Me.KeyPreview = True
    
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
    On Error Resume Next
    If KeyAscii = vbKeyReturn Then
        KeyAscii = 0
        Dim i As Long: For i = Me.Count - 1 To 0 Step -1
            If Me.Controls(i).Name = Me.ActiveControl.Name And TypeName(Me.Controls(i - 1)) = "TextBox" Then
                Me.Controls(i - 1).SetFocus
                Exit For
            End If
        Next i
    End If
End Sub

.....
الرد
تم الشكر بواسطة: kum2002
#3
تسلم اخوي
الرد
تم الشكر بواسطة:
#4
جزاك الله كل الخير اخى

فى ميزان حسناتك ان شاء الله

....
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال في شاشة عرض البرنامج tighrmte 3 79 منذ 1 ساعه مضت
آخر رد: tighrmte
  سؤال في تحزيم البرنامج tighrmte 6 130 11-02-19, 09:57 PM
آخر رد: tighrmte
  سؤال في اداة msflixgrid tighrmte 2 73 04-02-19, 11:37 PM
آخر رد: tighrmte
  سؤال حول البحث في combobox tighrmte 3 168 27-01-19, 11:08 PM
آخر رد: عبدالله الصافي
  سؤال بخصوص النقط والفواصل العشرية وغيرها في قاعدة البيانات hannileo 3 131 24-01-19, 01:58 PM
آخر رد: عبدالله الصافي
  [سؤال] سؤال عن اداءة ActiveReport الخاصة بالتقرير في vb6 محمد حمد محمد 4 161 16-01-19, 01:26 PM
آخر رد: محمد حمد محمد
  سؤال في اداة msflixgrid tighrmte 2 106 16-01-19, 01:22 AM
آخر رد: tighrmte
  [vb6.0] سؤال بخصوص كريستال ريبورت vbahmed_net 0 101 02-01-19, 03:31 AM
آخر رد: vbahmed_net
  سؤال - كيف يتم تحويل المصفوفه الثنائيه الى احاديه اسامه الجبوري 5 208 01-01-19, 04:44 PM
آخر رد: عبدالله الصافي
  سؤال عن ارسال او استقبال صورة في vb6 محمد حمد محمد 1 135 22-12-18, 01:52 AM
آخر رد: elgokr

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم