+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : [سؤال] ارجو المساعدة في تقسيم الارقام (/showthread.php?tid=19235)
ارجو المساعدة في تقسيم الارقام - VB.NET - 14-02-17
لدي تكست بوكس فيه 12 رقم
123654987456
احتاج كود يستخرج اول خمسه ارقام واخر ثلاثة ارقام
RE: ارجو المساعدة في تقسيم الارقام - VB.NET - 14-02-17
الي احتاجه يوجد عندي تكست بوكس فيه 12 رقم احتاج اني استخرج اول اربعه ارقام في تكست اخر واخر رقمين في تكست اخر
مثلا
123654789456
1236
56
RE: ارجو المساعدة في تقسيم الارقام - عبد العزيز البسكري - 14-02-17
السّلام عليكم و رحمة الله و بركاته
جرّب أخي الكريم هذا الملف لعلّ و عسى يفيد و لو بالقليل إن شاء الله
خالص التحيات
RE: ارجو المساعدة في تقسيم الارقام - VB.NET - 14-02-17
شكرا اخي الكريم
مثال تقريبي لاكن لم يفي بالغرض
الي احتاجه فعلا هذا الرقم الي عندي
811111101602
احتاج كود يعطيني ال 8111111 هذا الرقم بتكست
ويعطيني الثلاثة الارقام الي قبل الاخير يعني 160 بتكست
RE: ارجو المساعدة في تقسيم الارقام - Ahmed_Mansoor - 14-02-17
أهلا أخي الكريم ، إذا كان الرقم الطويل طوله ثابت فكل ماعليك إستخدامه هو دالتي Left و Right حيث تمرر لها عدد الخانات التي يتم أخذها من الرقم الطويل ، مثال :
لدينا الرقم 1234567890 في Text1 وتريد وضع أول ٤ أرقام في Text2 و آخر رقمين في Text3 فالكود الذي تحتاجه سيكون هكذا :
PHP كود :
Text2.Text = Left$(Text1.Text,4)
Text3.Text = Right$(Text1.Text,2)