تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال
#1
السلام عليكم ورحمة الله وبركاته 
عندي ريسورس به عدد 10 ملفات نص امتداد txt.
وعندي بتن التالي وبتن السابق وليبيل.
وأريد عندما أضغط على التالي ينتقل إلى ملف النص التالي في الريسورس وبالمثل في السابق يعود للسابق بارك الله فيكم
مع العلم أن النص يظهر في الليبل
الرد
تم الشكر بواسطة:
#2
يمكنك وضعهم في List والاحتفاظ ب Index الملف الحالي
وعند الحاجة تحضر الملف التالي ( Index +1 ) او السابق ( Index  - 1 )

عرف التالي للبرنامج كله

كود :
   Dim TxtList As New List(Of String)({My.Resources.txt1,
                                      My.Resources.txt2,
                                      My.Resources.txt3,
                                      My.Resources.txt4})
   Dim Index As Integer

زر التالي :

كود :
       If Index >= TxtList.Count Then Return
       Index += 1
       Label1.Text = TxtList(Index)

زر السابق :

كود :
       If Index <= 0 Then Return
       Index -= 1
       Label1.Text = TxtList(Index)
الرد
#3
(26-08-20, 04:51 PM)Anas Mahmoud كتب : يمكنك وضعهم في List والاحتفاظ ب Index الملف الحالي
وعند الحاجة تحضر الملف التالي ( Index +1 ) او السابق ( Index  - 1 )

عرف التالي للبرنامج كله

كود :
   Dim TxtList As New List(Of String)({My.Resources.txt1,
                                      My.Resources.txt2,
                                      My.Resources.txt3,
                                      My.Resources.txt4})
   Dim Index As Integer

زر التالي :

كود :
       If Index >= TxtList.Count Then Return
       Index += 1
       Label1.Text = TxtList(Index)

زر السابق :

كود :
       If Index <= 0 Then Return
       Index -= 1
       Label1.Text = TxtList(Index)
مشكور أخي جزاك الله خيرا
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] سؤال حول الحلقه التكراريه حسن الجلب 4 119 07-05-21, 07:00 AM
آخر رد: messry
  [سؤال] سؤال بسيط حسن الجلب 2 69 07-05-21, 12:44 AM
آخر رد: ابو انس
  [VB.NET] سؤال في عدم تمكين احد خلايا الداتا جريد ismaeel 6 228 05-05-21, 05:11 AM
آخر رد: a7med saba
  [سؤال] سؤال حسن الجلب 4 162 01-05-21, 06:13 PM
آخر رد: حسن الجلب
  سؤال فى الطباعة Lathe1 3 163 30-04-21, 12:38 AM
آخر رد: mrfenix93
  [سؤال] سؤال مهم حسن الجلب 3 281 17-04-21, 07:22 PM
آخر رد: أبو عبدالله الحلواني
  [سؤال] عندي سؤال حسن الجلب 0 130 14-04-21, 01:15 AM
آخر رد: حسن الجلب
  سؤال في كروم الله يبارك لكم اليوم السابع 5 346 13-04-21, 05:31 AM
آخر رد: اليوم السابع
  [سؤال] سؤال عن النسخ الاحتياطي الجزئي ابو انس 0 132 08-04-21, 03:45 PM
آخر رد: ابو انس
  سؤال في التعديل في الجدول اليوم السابع 1 171 08-04-21, 03:22 PM
آخر رد: asemshahen5

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


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