1樓：匿名使用者
private sub form_click()dim i as integer
dim s as integer
s = 1
for i = 1 to 9
s = (s + 1) * 2
next i
print "s="; s
end sub
是1534個 迴圈9次。因為第十天已經剩下1個 就沒再吃了 樓上那位 han4422951 - 都司 七級 初始值s為1 你還用除2 真服你了。~
2樓：匿名使用者
dim a%, s%, i%
a = 1 : s = 0
for i = 1 to 9
s = a * 2 + 2
a = s
next
print "s="; s
你拿筆自己演算一下就會知道,每一天的桃子數總是第二天的兩倍多兩個,第四行**就是根據每天的桃子數算出前一天的桃子數,然後再根據前一天的桃子數算出再前一天的桃子數,這個迴圈不能迴圈十次,因為迴圈了九次後已經是最初一天的桃子數了!最後的答案是1534
3樓：who絕版笨_我
這不是數學題嗎?
dim taozi as long
taozi=1
for i=1 to 10
taozi=taozi+1
taozi=taozi*2
next i
msgbox "桃子總數: " & trim(taozi)
4樓：匿名使用者
private sub form_clickdim n%,i%
x=1print"第10天的桃子數為：1個"
for i= 9 to 1 step-1
x=(x+1)*2
print"第";i;"天的桃子數為：";x;"個"
next i
end sub
一道vb題目求解。
5樓：繁花落盡紫禁城
我們就是超級巨星，超級巨星。我們有傳遞快樂的魔力。。。我們就是超級巨星，超級巨星。
我們有傳遞看來的魔力。。。。我們就是超級巨星，超級巨星。我們一傳遞快樂的魔力。。。。。
我們就是超級巨星，超級巨星，我們有傳遞快樂的能力………………yenh ……
6樓：皇妃子
他一直有個騎行環遊中國的夢想，從大三開始就積極在各大平臺**上聯絡驢友，可就在準備出發的當口，他實習的公司正好趕上業務增長的繁忙期，每天連按時下班都是奢望，更別說請幾個月的長假。
他的經理也說得直白：「你可以走，但肯定回不來，這個崗位多少個應屆生在競爭，哪兒可能留到你旅遊完再來幹。」
他恨不得轉身就飛奔而去，卻迫於囊中羞澀，父母又以斷絕經濟援助要，依舊得乖乖地打卡上班加班。
他跟我吐槽說，這個社會真是太壞了，一點也不鼓勵年輕人追求夢想體驗生活。
vb裡一道題求解，求解VB一道題 最好解釋每一步
迮悅 private sub command1 click text1.visible falseend sub private sub command2 click text1.text vb程式設計 text1.visible true text1.fontsize 16 end sub pri...
關於VB的一道題目，關於VB的兩道題
控制元件 command1,list1,label1.新增選單，名稱為mnu1,標題為 產生資料 如下。option explicit dim a 9 as byte,i as byte,t as byte,j as byte,min as byte,mini as byte private sub...
一道有關vb程式設計的題目，一道比較簡單的VB程式題目，只需要程式碼即可
火星飛人 private sub form load show label1.autosize true label1.caption str time label1.top val form1.height 2 val label1.height 2 label1.left val form1.w...