تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استفسار :- بخصوص serial number
#1
السلام عليكم ورحمة الله

عندي استفسار بخصوص الارقام

عندي كود للارقام يتسلسل الارقم من 001 الى لا نهاية

بس الكود اللي عندي من يوصل الى رقم 999  يرجع الى رقم 100 بدل ال 1000

حاولت اعدل في الكود بس ما ضبط  

هذا الكود

كود :
Mid$(Exchange_r.Text, 1, 3) = Val(Mid$(Exchange_r.Text, 1, 3) + 1).ToString("000")

المشكله الان بعد ال 999 ما يعطيني رقم 1000  يرجع الى رقم 100

افيدوني بارك الله فيكم وشكرا

الحمدالله حصلت الحل

وهو
كود :
dim FirstString As String = "001" ' as example  
dim SecondString As String  
SecondString = Format((Int(FirstString) + 1), "000")  


شكرا
الرد }}}
تم الشكر بواسطة: حريف برمجة , حريف برمجة


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] استفسار toe 2 59 26-03-24, 08:13 PM
آخر رد: mrfenix93
  استفسار هام جدا سلام و محبه2090 1 139 17-02-24, 08:26 PM
آخر رد: عبدالله الدوسري
  [نقاش] بخصوص خصم مبلغ الضريبة من السعر h2551996 6 275 24-01-24, 06:17 PM
آخر رد: Taha Okla
  ممكن استفسار عن m3u8 malekmohamed155 0 232 20-01-24, 07:47 PM
آخر رد: malekmohamed155
  طلب مساعدة بخصوص كود الطباعة paveldida 2 461 19-01-24, 12:00 AM
آخر رد: العتيق
Tongue استفسار بسيط عن كريستال ريبورت waataanys 1 311 30-11-23, 04:44 PM
آخر رد: Taha Okla
  [سؤال] استفسار ahmed_king2023 2 387 02-11-23, 01:13 PM
آخر رد: ahmed_king2023
  [VB.NET] استفسار dsa 1 258 09-10-23, 01:20 PM
آخر رد: Ahmed5
Video استفسار حول استعلام في SQL devpos 2 252 27-09-23, 04:25 PM
آخر رد: devpos
  تعبئة الكمبوبوكس دون الارتباط بالجدول .. استفسار عاجل Ali_hassn 0 242 24-09-23, 10:50 PM
آخر رد: Ali_hassn

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


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