برنامه ای که این رو روی فرم چاپ کنه؟

[hamidjalali]

سلام دوستان من یک برنامه میخواستم که این رو روی فرم چاپ کنه

1
23
456
78910

[M8SPY_OK]

با سلام

منظورت اینه که با نسبت خاصی اعداد روی فرم چاپ بشن یا فقط زیر هم باشن ؟

[اوبالیت به بو]

Dim str As String
str = "1" & vbCrLf & "23" & vbCrLf & "456" & vbCrLf & "78910"
Print str

این کد همین اعداد رو چاپ می کنه ولی اگه دنباله باشه باید الگوریتمش رو بلد باشی و با توجه به الگوریتم برنامه رو بنویسی. البته فکر نکنم دنباله باشه چون یه همچین چیزی من ندیده بودم

[vbhamed]

سلام


Dim i%, j%, c%

For i = 1 To 4
For j = 1 To i
c = c + 1
Print c;
Next
Print
Next

[hamidjalali]

سلام آقا حامد ممنون

[dbdbdb]

For i = 1 To 10
For j = 1 To i - 1
c = c + 1
;print c
Next
Print
Next
برنامه نویسی رو از QBasic شروع کن