السلام عليكم
اخواني الكرام أريد كود لعمل الأتي
لدي رقم 300 في تيكست 1 ورقم 3 في تيكست 2 والمطلوب جمع الرقم 300 ثلاث مرات في كود واحد باستخدام اللوب بحيث كل رقم يزيد عن الأخر 80
أريد أن أصل الي هذا Text3 = 300+380+460
ولكم مني جزيل الشكر
وعليكم السلام
ما ادري اذا بيمشي الحال بس جرب
PHP كود :
for i = 1 to val(text2.text)
text3.text =val(text3.text)+80+val(text1.text)
next
شكرا لاهتمامك أخي الكريم ولكن للأسف لم تنجح
أريد ان اصل الي هذا Text3 = 300+380+460
PHP كود :
Dim sum as double
For i = 0 to Val(TextBox2.Text)-1
sum += Val(TextBox1.Text) + 80 * i
Next
MsgBox(sum)
PHP كود :
for i = 1 to val(text2.text)
text3.text =i*80+val(text1.text)
next
وعليك السلام ورحمة الله وبركاته
أهلا أخي الكريم , جرب هذا الكود :
PHP كود :
Dim I As Integer
Dim zNumber As Integer
Text3.Text = ""
For I = 1 To Val(Trim$(Text2.Text))
If Trim$(Text3.Text) = "" Then
Text3.Text = Val(Trim$(Text1.Text))
zNumber = Val(Trim$(Text1.Text))
Else
Text3.Text = Trim$(Text3.Text) & "+" & zNumber + 80
zNumber = zNumber + 80
End If
Next
جزاك الله خيرا أخي الكريم Ahmed_Mansoor ومجهود كبير منك
وشكرا لكل واحد تعب معايا