چند سوال در مورد VB6

[abbasazarpikan]

دوستان به چه صورت می تونم n عدد رو از ورودی بگیرم و اعدادی که بر 3 یا 5 بخش پذیرند رو در لیست بهم نشون بده ؟؟

[سونامی]

به صورت آرایه یعنی مشخص میکنی که کاربر 5 عدد یا بیشتر نحوه ورودی رو خودت انتخاب میکنی بعد یک حلقه درست میکنی و تو حلقه میگی اعدادی که mod 3 برابر با صفر بود آنگاه در list1.additem اون تیکه از آرایه

[Mohsen.Sh_PC]

با دستور for هم میشه استفاده کرد
ابتدا یک تکس باکس میزاری که میخوای چند عدد رو از ورودی دریافت کنی.

n=val(text1.text)
for i=1 to n
num=inputbox("Enter Nimber")
num3=num mod 3
next i

بعد هم یا چاپ میکنی یا به لیست اضافه میکنی.