有哪位大神可以救救孩子嗎?拜托拜托,用for回圈陳述句來解。
uj5u.com熱心網友回復:
哪本書上的作業,學會獨立思考!uj5u.com熱心網友回復:
dim x as integerdim i as integer
dim s as string
s = ""
x = val(inputbox("please enter a number:"))
while x > 1
for i = 2 to x
if x mod i = 0 then s = s & " " & i:x = x \ i:exit for
next i
wend
msgbox s
uj5u.com熱心網友回復:
把你的題目上百度一搜,肯定都是答案!uj5u.com熱心網友回復:
百度上搜過,沒有for回圈的例子
uj5u.com熱心網友回復:
腦子不夠用了
uj5u.com熱心網友回復:
這東西,要么抄,要么請人做。uj5u.com熱心網友回復:
百度我搜了看到是while wend回圈的,你改成for回圈就是了。另外人家二樓給你寫代碼了,尊重下人家的勞動成果,不要無視。
uj5u.com熱心網友回復:
dim x as integer
dim i as integer
dim s as string
s = ""
x = val(inputbox("please enter a number:"))
while x > 1
for i = 2 to x
if x mod i = 0 then s = s & " " & i:x = x \ i:exit for
next i
wend
msgbox s
謝謝??我做成功了
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/13477.html
標籤:VB基礎類
