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

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

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

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

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

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