1樓：匿名使用者
a = 1 這裡a的初值是1
for i = 1 to 5 注意：在這個迴圈中需要呼叫fun1()函式。
call fun1(a)
next i
在fun1()函式中，函式的變數是x，但傳入的變數是a
y = 2 y的值是2
dox = x + y 第一次：x=1+2，第二次：x=3+2，第三次：x=5+2，第四次：x=7+2，第五次：x=9+2
loop until x > 10 (這裡迴圈中必須判斷x是否大於10，如果沒有大於10，不會退出迴圈，直到x的值大於10，才會退出迴圈)
這時x的值是11，for的第一次迴圈完成
進入for的第二次迴圈，又呼叫fun1()函式，在fun1()函式中完成x=x+y的運算，x=11+2，結果是13，由於x>10所以退出do迴圈。
進入for的第三次迴圈，再次呼叫fun1()函式，在fun1()函式中完成x=x+y的運算，x=13+2，結果是15，由於x>10所以退出do迴圈。
進入for的第四次迴圈，再次呼叫fun1()函式，在fun1()函式中完成x=x+y的運算，x=15+2，結果是17，由於x>10所以退出do迴圈。
進入for的第五次迴圈，再次呼叫fun1()函式，在fun1()函式中完成x=x+y的運算，x=17+2，結果是19，由於x>10所以退出do迴圈。
for完成五次迴圈，退出迴圈，print a 列印結果是19
2樓：拼面十碟
你想讓結果是多少?
你的**在執行時
第1次迴圈時,a=11,因為你的 fun1(x) 中, **x=x+y執行了5次,讓輸入的結果大於10
第2次迴圈時,a=13,因為 fun1(x) 中,輸入的x的已經大於10,所以**x=x+y只執行1次,後面一樣
第3次迴圈時,a=15
第4次迴圈時,a=17
第5次迴圈時,a=19
所以輸出a=19
VB程式設計題（簡單），VB 程式設計題（簡單）
做個標記，等會發你郵箱 private sub form load timer1.interval 1000timer1.enabled trueend sub private sub timer1 timer if option1.value true then text1.text format...
急求 VB程式設計題目,謝謝，求1道小學VB程式設計題目 謝謝
dim a 0 to 3 private sub command1 click index as integer list1.additem index end sub private sub command2 click dim n,m m 0 n 0 for i 0 to 3 for j 0 t...
vb程式設計中關於inputbo函式
刺友互 1 開啟一個excel的檔案，在 中輸入簡單的 比如衣服輸入資料的 2 接著，滑鼠左鍵單擊 開發工具 選單標籤，在vba控制元件下拉選單中，並選擇表單按鈕控制元件。3 然後，在 中繪製出按鈕控制元件，並修改按鈕控制元件名稱，比如輸入名稱，並滑鼠左鍵單擊 檢視 按鈕。4 接著，在彈出的在 視窗...