[حريف برمجة]

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

لنفرض الرقم (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