1樓：匿名使用者
一、vb中的for語句格式：
for《迴圈變數》=《初值》to《終值》[step步長]《迴圈體》
[exit for]
next《迴圈變數》
二、vb中的for語句功能：
當迴圈變數的值在初值到終值範圍內時，執行一次迴圈體中的語句塊，並使初值增加乙個步長。當迴圈變數的值不在初值到終值範圍內時，就退出迴圈，執行next後面的語句。for迴圈語句執行的流程圖。
2樓：士芮安
回答 共 1 條
檢舉 看到你的提問的方式，就不想答，直想罵你~~
回答者： book_read - 五級 2010-8-12 07:06
3樓：沙慧月
這段**主要是依次求出1的平方，2的平方，3的平方。。。。，格式為：11
4 14 9
1 4
9 16
1 4
9 16
25 1
4 9
16 25
3614 9
16 25
36 49
1 4
9 16
25 36
49 64
1 4
9 16
25 36
49 64
81 接下來我來說明其**：
private sub form_click() 設定窗體點選事件dim i,j as integer 定義i與j為整數型print 開頭先空一行for i=1 to 9 設定迴圈
for j=1 to i 設定內迴圈，效果為剛才看到的每一部分print left((str(j*j) & space(5),4); 輸出，str(j*j)是計算乘積 ，&連線5個空格，left從左往右取 整個字元竄的前四個
next j
next i
end sub
4樓：匿名使用者
private sub form_click() 』當窗體單擊時觸發此過程
dim i,j as integer 』宣告預設型別變數i（變體型）和長整型變數j
print 』在窗體上列印空白的一行
for i=1 to 9 』設定迴圈 i 每次迴圈從1到9 預設步長1（每次迴圈加1）
』完整： for i = 1 to 9 step 1
for j=1 to i 』設定迴圈 j 每次迴圈從1到i的值 預設步長1（每次迴圈加1）完整： for i = 1 to i step 1
print left((str(j*j) & space(5),4);
』此語句錯誤應為：
』 print left(str(j * j) & space(5), 4)
』 print 在窗體中列印
』 left（str,n） 取str左邊的n個字元
』 str（n） 將n這個數值型轉換為字串型
』 space（n） 返回n個空格
』 翻譯出來就是：
』 在窗體中列印出 （j×j 的結果 加上5個空格）的左邊4個字元
next j 』執行到這裡繼續迴圈j
print 』列印一行空白行
next i 』執行到這裡繼續迴圈i
end sub 』結束過程
5樓：
請高手解釋一下這段**謝謝!庸才慎言!
——你的素質不行，不想鳥你
6樓：
看到你的提問的方式，就不想答，直想罵你~~
7樓：匿名使用者
順序求出1，2，3，4，5，6，7，8，9的平方，再輸出到視窗。
結果11 4
1 4 9
1 4 9 16
1 4 9 16 25
1 4 9 16 25 361 4 9 16 25 36 491 4 9 16 25 36 49 641 4 9 16 25 36 49 64 81
vb中的迴圈語句
8樓：
使用迴圈語句
使用迴圈重複執行**
迴圈用於重複執行一組語句。迴圈可分為三類：一類在條件變為 false 之前重複執行語句，一類在條件變為 true 之前重複執行語句，另一類按照指定的次數重複執行語句。
在 vbscript 中可使用下列迴圈語句：
do...loop： 當（或直到）條件為 true 時迴圈。
while...wend： 當條件為 true 時迴圈。
for...next： 指定迴圈次數，使用計數器重複執行語句。
for each...next： 對於集合中的每項或陣列中的每個元素，重複執行一組語句。
使用 do 迴圈
可以使用 do...loop 語句多次（次數不定）執行語句塊。當條件為 true 時或條件變為 true 之前，重複執行語句塊。
當條件為 true 時重複執行語句
while 關鍵字用於檢查 do...loop 語句中的條件。有兩種方式檢查條件：
在進入迴圈之前檢查條件（如下面的 chkfirstwhile 示例）；或者在迴圈至少執行完一次之後檢查條件（如下面的 chklastwhile 示例）。在 chkfirstwhile 過程中，如果 mynum 的初始值被設定為 9 而不是 20，則永遠不會執行迴圈體中的語句。在 chklastwhile 過程中，迴圈體中的語句只會執行一次，因為條件在檢查時已經為 false。
sub chkfirstwhile()
dim counter, mynum
counter = 0
mynum = 20
do while mynum > 10
mynum = mynum - 1
counter = counter + 1
loop
msgbox "迴圈重複了 " & counter & " 次。"
end sub
sub chklastwhile()
dim counter, mynum
counter = 0
mynum = 9
domynum = mynum - 1
counter = counter + 1
loop while mynum > 10
msgbox "迴圈重複了 " & counter & " 次。"
end sub
重複執行語句直到條件變為 true
until 關鍵字用於檢查 do...loop 語句中的條件。有兩種方式檢查條件：
在進入迴圈之前檢查條件（如下面的 chkfirstuntil 示例）；或者在迴圈至少執行完一次之後檢查條件（如下面的 chklastuntil 示例）。只要條件為 false，就會進行迴圈。
sub chkfirstuntil()
dim counter, mynum
counter = 0
mynum = 20
do until mynum = 10
mynum = mynum - 1
counter = counter + 1
loop
msgbox "迴圈重複了 " & counter & " 次。"
end sub
sub chklastuntil()
dim counter, mynum
counter = 0
mynum = 1
domynum = mynum + 1
counter = counter + 1
loop until mynum = 10
msgbox "迴圈重複了 " & counter & " 次。"
end sub
退出迴圈
exit do 語句用於退出 do...loop 迴圈。因為通常只是在某些特殊情況下要退出迴圈（例如要避免死迴圈），所以可在 if...
then...else 語句的 true 語句塊中使用 exit do 語句。如果條件為 false，迴圈將照常執行。
在下面的示例中，mynum 的初始值將導致死迴圈。if...then...else 語句檢查此條件，防止出現死迴圈。
sub exitexample()
dim counter, mynum
counter = 0
mynum = 9
do until mynum = 10
mynum = mynum - 1
counter = counter + 1
if mynum < 10 then exit do
loop
msgbox "迴圈重複了 " & counter & " 次。"
end sub
使用 while...wend
while...wend 語句是為那些熟悉其用法的使用者提供的。但是由於 while...wend 缺少靈活性，所以建議最好使用 do...loop 語句。
使用 for...next
for...next 語句用於將語句塊執行指定的次數。在迴圈中使用計數器變數，該變數的值隨每一次迴圈增加或減少。
例如，下面的示例將過程 myproc 重複執行 50 次。for 語句指定計數器變數 x 及其起始值與終止值。next 語句使計數器變數每次加 1。
sub domyproc50times()
dim x
for x = 1 to 50
myproc
next
end sub
關鍵字 step 用於指定計數器變數每次增加或減少的值。在下面的示例中，計數器變數 j 每次加 2。迴圈結束後，total 的值為 2、4、6、8 和 10 的總和。
sub twostotal()
dim j, total
for j = 2 to 10 step 2
total = total + j
next
msgbox "總和為 " & total & "。"
end sub
要使計數器變數遞減，可將 step 設為負值。此時計數器變數的終止值必須小於起始值。在下面的示例中，計數器變數 mynum 每次減 2。
迴圈結束後，total 的值為 16、14、12、10、8、6、4 和 2 的總和。
sub newtotal()
dim mynum, total
for mynum = 16 to 2 step -2
total = total + mynum
next
msgbox "總和為 " & total & "。"
end sub
exit for 語句用於在計數器達到其終止值之前退出 for...next 語句。因為通常只是在某些特殊情況下（例如在發生錯誤時）要退出迴圈，所以可以在 if...
then...else 語句的 true 語句塊中使用 exit for 語句。如果條件為 false，迴圈將照常執行。
使用 for each...next
for each...next 迴圈與 for...next 迴圈類似。
for each...next 不是將語句執行指定的次數，而是對於陣列中的每個元素或物件集合中的每一項重複一組語句。這在不知道集合中元素的數目時非常有用。
vb中if 語句的運用，VB中if 語句的運用
你的理解不對。第乙個if語句執行後，m取的是a，b中的最大值 第二個if語句執行後，m取的是c，m中的最大值 當c m為假，m還是原來的m，不需些else子句。所以最後text4.text m,顯示的是a,b,c三者中的最大數。if 語句有幾種型式，如果直接寫成 if 判斷 theh 表示式 這時是...
VB迴圈語句，vb中的迴圈語句
for 迴圈變數 初賦值 to 終值 step 步長 next 迴圈變數 在預設情況下，step被設為 1 可以省略，step也可以設為負值，例如 dim a 0 for i 1 to 10 a a i next i 這是乙個最簡單的累加器的例子，把1到10累加在一起，然後賦值給 a 這樣的效果和上...
vb的if語句中的問題，關於VB中IF語句中的理解問題
這個就是正確的 if text1.text thenmsgbox 請輸入內容 end if if len text1.text 0 and text1.text 正確內容 then msgbox 請輸入乙個正確內容 end if if text1.text 正確內容 thenmsgbox 通過 en...
VB中的迴圈語句有哪些，VB中的迴圈語句有哪些
使用迴圈語句 使用迴圈重複執行 迴圈用於重複執行一組語句。迴圈可分為三類 一類在條件變為 false 之前重複執行語句，一類在條件變為 true 之前重複執行語句，另一類按照指定的次數重複執行語句。在 vbscript 中可使用下列迴圈語句 do.loop 當 或直到 條件為 true 時迴圈。wh...
vb語句問題，請教專家，VB中判斷語句問題，請教高手
例如 dim hj as double 把hj變數定義在最上面一行private sub command1 click jg c k h sl bcdj lylxs 1000000 7.85 hj hj jg print 當前金額合計 hj end sub 這是變數的作用域問題.朋友.建議你把這個問...