[fouadhdfouad]

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

كيف يتم تحويل رقم من هده الطريقة

123456789

الى هده الطريقة

01 02 03 04 05 06 07 08 09 00

جزاكم الله كل خير

[حريف برمجة]

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

لنفرض الرقم (123456789) موجود في تكست بوكس اسمه TextBox1

وتريد النتيجة تظهر في تكست بوكس اسمه Textbox2

الكود يكون كالتالي :

كود :

Dim textout As String = "00"

        For i = 1 To TextBox1.TextLength
            textout = textout + " " + "0" + TextBox1.Text.Substring(TextBox1.TextLength - i, 1)
        Next

        TextBox2.Text = textout

[fouadhdfouad]

كلمة شكر لاتكفي في حقك

جزاك ربي كل خير