يه مشكل تو Vb

[Unknow-Man]

سلام به همه دوستان برنامه نويس . راستش من هيچي از وي بي نمي دونم. راستش يكي از دوستان از من سوال كرد بگو از دوستات بپرس. ممنون ميشم بگيد. فقط برنامه درستش را ميخوام.
سوال : پروژه اي طراحي كنيد كه مجموعه اعدادزوج كوچكتر از 50 را نشان دهد. تا يه جاهايي هم بنده خدا نوشته ولي مي گه اشتباست.
dim s as integer
sim i as integer
fori=2 to 50 step2
s=s+i
nexti
label1.caption=s
ممنون ميشم كاملش كنيد. ممنون منتظرم...

 

[Unknow-Man]

خواهشا جواب ديد...

 

[MnavidM]

سلام.

همینی که نوشتی تقریبا درسته ،

اینم جواب سوال شما .

dim i as integer
for i=0 to 50 step 2
   print i
next i

این دستورات کل اون اعداد رو روی فرم چاپ میکنه.

موفق باشی.
نوید.

 

[SuB]

سلام به همه دوستان برنامه نويس . راستش من هيچي از وي بي نمي دونم. راستش يكي از دوستان از من سوال كرد بگو از دوستات بپرس. ممنون ميشم بگيد. فقط برنامه درستش را ميخوام.
سوال : پروژه اي طراحي كنيد كه مجموعه اعدادزوج كوچكتر از 50 را نشان دهد. تا يه جاهايي هم بنده خدا نوشته ولي مي گه اشتباست.
dim s as integer
sim i as integer
fori=2 to 50 step2
s=s+i
nexti
label1.caption=s
ممنون ميشم كاملش كنيد. ممنون منتظرم...

شما مجموع این اعداد رو می خوای یا مجموعه این اعداد؟

 

[nima_dir]

سلام
اقا همون كه نوشتي درسته
از دوستت بپرس چه اروري ميده يا چه مشكلي داره

 

[Unknow-Man]

مجموعه اعداد زوج. يعني فقط اعداد زوج را نشان دهد.
حالا اون يكيم اگه نوشتيم كه چه بهتر. يني جمعشون.

 

[MnavidM]

سلام.

اون کدی که شما (Unknow-Man) نوشتید ، جمع اعداد زوج 2 تا 50 رو براتون حساب میکنه و بعد نتیجه رو نشون میده.

اون کدی که من براتون نوشتم، میاد اعداد زوج بین 0 تا 50 رو دونه به دونه روی Form شما چاپ میکنه (همونی که شما مد نظرتون هست).

مشکلی داشت ، بگو.

موفق باشی.
نوید.

 

[Unknow-Man]

نويد جان مثل اينكه همون كدي كه اول دادي درست بود.
دستت درد نكنه.