vb نه ولی c چرا..اگه 2 سال پیش بود یادم بود..اما الان باید بشینم یک یاداوری بکنم از syntax اش بعد برنامه رو بنویسم..شرمنده..اگه خواستین بگین الگوریتمش رو بگم..
فروم مثل داروخانه شبانه روزی نیست که یک متصدی آماده پاسخگویی داشته باشد، در فروم هیچکس مسئولیت
پاسخگویی به سوالات را ندارد، شرکت کردن کاربران در مبحث یک امر اختیاری است. زمان پاسخگویی شان هم
قابل پیشبینی کردن نیست. موقعی که موضوعی را مطرح کردید باید منتظر بمانید، شاید چند دقیقه بعد پاسخی
دریافت کنید و شاید هیچوقت پاسخی دریافت نکنید.
کد:
Dim n As Long, i As Long, s As String
n = Val(InputBox("Please enter a number :"))
i = 2
Do While n >= i
If n Mod i = 0 Then
s = s & " * " & CStr(i)
n = n \ i
Else
i = i + 1
End If
Loop
MsgBox Mid(s, 4)
فروم مثل داروخانه شبانه روزی نیست که یک متصدی آماده پاسخگویی داشته باشد، در فروم هیچکس مسئولیت
پاسخگویی به سوالات را ندارد، شرکت کردن کاربران در مبحث یک امر اختیاری است. زمان پاسخگویی شان هم
قابل پیشبینی کردن نیست. موقعی که موضوعی را مطرح کردید باید منتظر بمانید، شاید چند دقیقه بعد پاسخی
دریافت کنید و شاید هیچوقت پاسخی دریافت نکنید.
با تشكر از راهنمايي هاتون .
خيلي ممنونم كه به سوالم جواب دادين.
اگه آدمايي مثل شما نبودن آدم هايي مثل من هيچ وقت به نتيجه مطلوب نميرسيدند.
بازم ممنون.
