[m.n.hakami]

السلام عليكم اسرة المنتدى الرائع 

عندي استفسار الكود التالي يخرج البيانات في textbox حسب المعطيات لو افترضنا   z = 1  ,    x = 5    الناتج يكون 12345  


أنا اريد لو تكرمتم يكون  الكود يخرج الرقم 1 في textbox1  و 2 في textbox2  و 3 في textbox3    إلى نهاية المطلوب حسب المدخل في x

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim i As Integer
       Dim x As Integer
       Dim z As Integer
       x = CInt(TextBox1.Text)
       z = CInt(TextBox2.Text)

       For i = x To z

           TextBox3.Text = TextBox3.Text & i
       Next