03-11-16, 01:25 AM
وعليك السلام ورحمة الله وبركاته
أهلا أخي الكريم , جرب هذا الكود :
أهلا أخي الكريم , جرب هذا الكود :
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

