Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print
Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print
其他人氣：583 ℃時間：2020-01-29 20:49:52
優(yōu)質(zhì)解答
顯示6求詳細(xì)過程，謝謝~輸入3 則n=3下面就變成了For i=1 To3For j=1 To i x=x+1 Next j Next i 當(dāng)i=1 時 j=1 to1循環(huán)一次則 x=1當(dāng)i=2 時 j=1 to2循環(huán)兩次則 x=2x=3當(dāng)i=2 時 j=1 to3循環(huán)三次則 x=4 x=5x=6最后在窗體上printx則顯示6
我來回答
類似推薦
- Private Sub Command1_Click() For i = 1 To 3 For j = i To 1 a = a + 1 Next j Next i Print a End Sub
- Private Sub command1_click() Dim m(10) For k = 1 To 10 m(k) = 11 - k Next k x = 5 Print m(2 + m(x))
- Private Sub Command1_Click() For i=1 To 4 x=4 For j =1 To 3 x=3 For k=1 To 2 x=x+6 Next k Nex
- 地暖進(jìn)水管和回水管都開著,水不循環(huán)什么原因
- 培優(yōu)訓(xùn)練
- "紀(jì)昌學(xué)射"```幫幫忙啊```
- 已知二次函數(shù)f（x）是偶函數(shù),且經(jīng)過點（3,6）求它的解析式.謝
- “理想很豐滿,現(xiàn)實很骨感”這句話是什么意思呀?
- it is convenient for you to do 這里for you在句中是什么結(jié)構(gòu)
- 將na2co3和nahco3混合物30克配成一升溶液,測得溶液的ph=10.62,溶液含NA2CO3幾克?
- 有關(guān)于Lg的計算
- 對冪指函數(shù)兩邊求導(dǎo)?
猜你喜歡
- 1問幾道小學(xué)六年級數(shù)學(xué)的題,分高.
- 2向量的運算法則
- 3did what buy food you for Daming 怎么排列順序
- 4z=1+根號3i分之-2,i為虛數(shù)單位,argz=
- 5寫兩篇關(guān)于治水金點子的作文
- 6甲乙兩人從a地到b地,甲需1小時,乙需40分鐘,若甲先出發(fā)10分鐘,則乙追上甲需用多少分鐘 要算式和講解.
- 7求翻譯一下這段內(nèi)容,謝謝!
- 8try ……on的意思
- 9but的用法之一
- 10Li Guanghua is good at playing foot.(同義句轉(zhuǎn)化)LI Guanghua is ()very ()()().
- 11______ (Much/Lots) of them can speak English quite well.
- 12雞的只數(shù)是鴨的2分之1,鵝的只數(shù)是雞的3分之1,鵝的只數(shù)為鴨的幾分之幾?