28-10-19, 01:53 PM
السلام عليكم اسرة المنتدى الرائع
عندي استفسار الكود التالي يخرج البيانات في textbox حسب المعطيات لو افترضنا z = 1 , x = 5 الناتج يكون 12345
أنا اريد لو تكرمتم يكون الكود يخرج الرقم 1 في textbox1 و 2 في textbox2 و 3 في textbox3 إلى نهاية المطلوب حسب المدخل في x
عندي استفسار الكود التالي يخرج البيانات في 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