منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - ارجوكم اريد كود يعمل فواصل بين الارقام

السلام عليكم
ارجوكم اريد كود يعمل فواصل بين الارقام
مثال عندما اكتب في خانة 6789507
ينقلها الى الخانة الثانية 7-0-5-9-8-7-6
ارجوكم... محتاج لهذا الكود ضروري جدا

وعليكم السلام

بإستخدام الوظيفة

String.Join

[attachment=18384]

[attachment=18385]

كود :

       Dim Nuuuuuum As String = "47368789567"

        Dim Serial As String = String.Join("-", Nuuuuuum.ToList)

        MsgBox(Serial)

من TextBox1

[attachment=18386]

كود :

       Dim Serial As String = String.Join("-", Me.TextBox1.Text.Trim .ToList)

        MsgBox(Serial)

لكم جزيل الشكر...
هذا المنتدى اللي ابحث عنه...

حاولت اكثر من مرة اكتب الكود لكن عامل مشاكل...
اشكر فضلكم

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

بشيراحمدالاهدل

عبدالله الدوسري

بشيراحمدالاهدل