نوشتن اعداد

[xrezax]

می خوام 2 تا تکست باشه و یک لیست باکس که اگه توی تکست اولی بنویسم 1 و توی دومی بنویسم 100 بر برنامه از 1 تا 100 رو توی لیست نشون بده ( اینجوری 1.2.3.4.5.6.7.8... )
ممنون میشم با پروژه های وی بی توضیح بدین.

[Rejnev]

سلام
یعنی هر عدد یک عنصر لیست باشن؟

list1.clear

for i=val(text1.text) to val(text2.text)

  list1.addItem i

next i

[xrezax]

این اعداد زیادو نمی کشه.
من می خوام از عدد 0 تا 99999999999999999999 رو برای توی تکسک سیو کنه.
اگه ممکنه کسی از بچه ها بتونه اینارو برام توی یک تکست بزاره اینجا ممنون میشم. ( یا برنامه ای داره که اینکارو بتونه انجام بده ممنون میسم.)

[xrezax]

کسی نمی تونه کمک کنه ؟؟؟

[butterfly8528]

سلام .

از DoEvents استفاده کن این طوری برنامه دیگه هنگ نمیکنه !

List1.Clear

For i = Val(Text1.Text) To Val(Text2.Text)

  List1.AddItem i

  DoEvents

Next i

.