[dubai.eig]

(22-08-18, 07:20 AM)elgokr كتب :

وعليكم السلام ورحمة الله وبركاته

عيد سعيد عليك اخى dubai.eig

وعلى الجميع يارب ان شاء الله

يبدو من موضوعك قبل اتمام التعديل بانك حللت المشكلة

انك عملت كما يقال الصعب واتيت على ابسط شئ ووثفت عندها

لديك الكود البسيط المطلوب استخدامه حتى تعم الفائدة على الجميع

اولاً عن طريق استخدام بهذا الشكل

كود :

TextBox1.Text = TextBox1.Text.Replace(Space(1), ",")

وايضاً يمكنك استخدامه بهذا الشكل

كود :

TextBox1.Text = TextBox1.Text.Replace(" ", ",")

فكيلاهما واحد

تحياتى لك

وتمنياتى لك التوفيق

اهلا بك استاذي الكريم

صحيح بعد كتابة الموضوع قمت بالبحث وحصلت الطريقه 


وهيه اني عندي ارقام عباره عن 30 رقم تقريبا

FE FE E0 94 25 00 00 00 20 14 00 FD

اريد اخذ منهم فقط
8 ارقام وهم


 14 20 00 00
ومن بعد ما اخذ الارقام محتاج ارتبهم ليصبحون كذا

14200000

والحل كان

كود :

      retString = txtReceived.Text.Substring(18, 11)

           Dim s00 As String = retString
           Dim left, right, mid, mid2, mid3 As String
           right = s00.Substring(s00.Length - 2, 2)
           mid2 = s00.Substring(6, 2)
           mid = s00.Substring(3, 1)
           mid3 = s00.Substring(4, 1)
           left = s00.Substring(0, 3)
           SetText2(right & "," & mid2 & mid & "," & mid3 & left)

في البداية اخذة 11  رقم من بعد 18 رقم

FE FE E0 94 25 00 00 00 20 14 00 FD


 14 20 00 00

كود :

 retString = txtReceived.Text.Substring(18, 11)

ومن ثم قمت بتوزيعهم حسب المطلوب

كود :

     Dim s00 As String = retString
           Dim left, right, mid, mid2, mid3 As String
           right = s00.Substring(s00.Length - 2, 2)
           mid2 = s00.Substring(6, 2)
           mid = s00.Substring(3, 1)
           mid3 = s00.Substring(4, 1)
           left = s00.Substring(0, 3)
           SetText2(right & "," & mid2 & mid & "," & mid3 & left)

ليصبحون في الاخير

14200000



بس واجهتني مشكله في العرض
   

في NumericUpDown1

اريد العرض يكون كذا

   

اقصد الفواصل
21,200,000

الكود كذا

كود :

SetText2(right & "," & mid2 & mid & "," & mid3 & left)

الفواصل موجوده بس في العرض ما تطلع

حاولت بس موب راضيه تطلع الفواصل 

واشكرك على مرورك الكريم 

---

(22-08-18, 01:00 PM)عابر سبيل 2 كتب :

(21-08-18, 11:09 PM)dubai.eig كتب : السلام عليكم ورحمة الله

كل عام والجميع بالف خير 

حصلت الطريقه وتم الحل والحمدالله  بارك الله فيكم وشكرا

يرجى حذف الموضوع وشكرا 

ياليت لو تركت سؤالك وارفقت بعده الحل

ليستفيد منه الآخرون

تم واعتذر من الجميع 

---

(22-08-18, 11:23 PM)essawq كتب :

السلام عليكم ورحمة الله وبركاتة

كل عام وانتم بخير

راينا الاجابة ولم نرى السؤال؟

ممكن السؤال لكي تعم الفائدة على الجميع حتى وان كان بسيط

تحياتي لكم

تم استاذي الفاضل