این برنامه رو چطور بنویسم؟

[Arashdn]

سلام
چطور برنامه ای بنویسیم که

1
222
33333
444
5

و
------------------------------------------->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

1
22
333
4444
55555

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

اونی که بهم یاد می ده گفت باید از تابع های SPC() و Tab() استفاده کنم این تابع ها چین؟
کسی این زحمت رو می کشه و برنامه رو با یه توضیه محتصر(ترجیحا کامل : دی) برام بنویسه؟

ممنون

[aaaammmm87]

Private Sub Command1_Click()
Print Spc(11); 1
Print Spc(10); 222
Print Spc(9); 33333
Print Spc(10); 444
Print Spc(11); 5
End Sub

[Arashdn]

ممنون از شما اما اعداد باید با یه حلقه for next خودشون ساخته بشن
راستی کار این تابع ها رو نگفتید

[aaaammmm87]

كار تابع Spc ايجاد فضاي خالي هست در مورد خلقه الان وقت ندارم و خيلي راحته خودت يه كم فكر كني مينويسي

[Arashdn]

خودم دو روز تموم فکر کردم : دی
بابا من اونقدرم حرفیه نیستم که

[Open-Source]

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

اینم با حلقه

[Open-Source]

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

اینم اون شکل اولی.

-کار spc اینه که به اندازه داخل پرانتز فاصله(space) چاپ میکنه.

[Arashdn]

me.cls
me.autoredraw = true

اصلا با این کد آشنایی ندارم و نمی دونم چیکار می کنه
نمیشه بدون این کد نوشت؟

[aaaammmm87]

اصلا با این کد آشنایی ندارم و نمی دونم چیکار می کنه
نمیشه بدون این کد نوشت؟

Me.Cls
دستوري براي پاک کردن محتويات چاپ شده روي صفحه

Me.AutoRedraw = True
رسم خودکار
اگر توجه کردن خطهاي رسم شده روي فرم با قرار گرفتن يک قسمت بر روي آنها پاک مي شوند با استفاده از اين خصيصه آنها ديگر پاک نمي شوند.

[Arashdn]

راستی این vbcrlf چیه؟