فصل سلسله رقميه الى رقمين

فكرة:

حول الرقم إلى سلسلة نصية ثم قم بفرز السلسلة النصية إلى سلسلتين نصيتين كما تشاء ثم أعد تحويل السلسلتين النصيتين الناتجتين إلى أرقام

اف ليش اللفه الطويله هيدي

الا يوجد داله في الفيجول لقص الرقم من جهه اليسار

وحتى لو استخدمت هيدي الطريقه سيتم تحويل الرقم 1234567

الى 1234000 واخر 567

ولاحط انو هنا يختلف طول السلسله الرقميه

أو إذا كان الموضوع اظهار فقط استخدم MaskedTextBox مع الـ Mask المناسب

بعدين ليش لفة طويلة الكود أقصر مما تتخيل ويعطي النتائج كما تريد جرب المثال التالي

		Dim i As Long = 12345678
		Dim i1 As Long = CLng(Mid(CStr(i), 1, 4))
		Dim i2 As Long = CLng(Mid(CStr(i), 5, CStr(i).Length))
		MsgBox(i1.ToString & vbCrLf & i2.ToString)

للاسف اخوي

انا سوف اقوم بهذه العمليه على عامود كامل في الداتا بيس يعني لن استخدم هنا الماسك

اتوقع انو في داله لقص رقم معين من جهه اليسار

على الاقل في لغات البرمجه القديمه كان في داله متل هيدي

ثم لماذا لايمكن استخدام الماسك

الـ MaskedTextBox يمكن ربطه بقاعدة البيانات بنفس الطريقة التي نربط بها الـ TextBox وبدون أية فروقات عدا تحديد خاصية الـ Mask حسب الحاجة

أين تريد عرض المعلومات التي ستحصل عليها؟ في DataGridView

أم تريد مجرد Query