VB中的循環語句中的for
For循環的格式: For 循環變量 = 初值 To 終值 [Step 步長] step 2 就是i=i+2 [循環體] Next [循環變量] 注意: 1) 當步長 > 0 時 循環執行的條件:循環變量 <= 終值 2) 當步長 < 0 時 循環執行的條件:循環變量 >= 終值 強行退出 For 循環,請使用 Exit For。
舉例1: 單擊命令按鈕 Command1 后,先后彈出很多消息框,消息內容一開始是 1,最后是 100,每彈出一次,消息內容加 1,也就是 1; 2; 3; 。; 98; 99; 100。
VB 代碼如下: Private Sub Command1_Click() Dim i As Long For i = 1 To 100 MsgBox i Next End Sub 如果使用 For 語句,代碼如下: Private Sub Form_Load() For i = 1 To 100 MsgBox i, vbInformation /vbInformation 指顯示圖標,下同 Next MsgBox "Finished", vbCritical End Sub 擴展資料: VB的Do循環 Do。Loop 如果你不知道重復多少次,可以使用 Do。
Loop 語句。 Do。
Loop 語句重復執行某段代碼直到條件是 true 或條件變成 true。 重復執行代碼直到條件是 true 您可以使用 While 關鍵字來檢查 Do。
Loop 語句的條件。 Do While i>10some codeLoop 如果 i 等于 9,上述循環內的代碼將終止執行。
Dosome codeLoop While i>10 這個循環內的代碼將被執行至少一次,即使 i 小于 10。 重復執行代碼直到條件變成 true 您可以使用 Until 關鍵字來檢查 Do。
Loop 語句的條件。 Do Until i=10some codeLoop 如果 i 等于 10,上述循環內的代碼將終止執行。
Dosome codeLoop Until i=10 這個循環內的代碼將被執行至少一次,即使 i 等于 10。 退出 Do。
Loop 您可以通過 Exit Do 關鍵詞退出 Do。Loop 語句。
Do Until i=10i=i-1If i<10 Then Exit DoLoop 這個循環內的代碼,只要 i 不為 10 且 i 大于 10 時都將被執行。 參考資料:百度百科——循環語句。
關于vb for循環語句
循環結構是程序中一種很重要的結構。在給定條件成立時,可反復執行某程序段,直到條件不成立為止。給定的條件稱為循環條件,反復執行的程序段稱為循環體。在VB中提供了多種循環語句供用戶使用循環,下面介紹兩種常用的形式:For語句和Do語句。
一、For語句
For循環(For……Next)語句的基本格式為:
For 循環變量=初值 To 終值 Step 增量,循環體,Next 變量
循環變量為數值型變量,初值、終值、增量均為數值型表達式。“Step 增量”部分可以省略,缺省時默認為1。在循環體中使用Exit
For語句可直接中止循環,執行next后面的語句。當增量值為正數時,For循環的執行過程如下:
(1) 將循環變量賦初值;
(2)比較循環變量是否小于等于終值,小于等于時循環條件成立,運行一次循環體中的語句;如果循環條件不成立時,循環結束,執行Next后面的語句;
(3)遇到Next語句,循環變量增加增量值,轉到(2)繼續循環;
增量值為負數時,For循環的執行過程第(2)步不同。比較循環變量是否大于等于終值,大于等于時循環條件成立,運行一次循環體中的語句;如果循環條件不成立時,循環結束,執行Next后面的語句結束。
VB For嵌套循環語句順序
至于第一題如下:首先J=1,則執行I從1到10然后J=2,再次執行I從1到10也就是J每增加1,I需要從1執行到10一次。
當J從1執行到10,I也就執行了100次。I相當于內循環,J相當于外循環我認為在里面執行次數多的就是內循環,在外面執行次數少的就是外循環。
呵呵第二題:當一個變量沒有在程序中進行定義是,編譯環境會自動給它賦一個值。像這個I剛開始的時候就是0當j=1時,i=i+j=0+1=1 j增加了1j=2,i=i+j=1+2=3 j增加了1j=3,i=i+j=3+3=6 j增加了1j=4,i=i+j=6+4=10 j增加了1j=5,i=i+j=10+5=15 j增加了1。
vb中的循環語句
循環語句包括For-Next、While-Wend、Do-Loop語句比較常用的是for和whileFor-Next語句:
For 變量 = 初值 To 終值 [Step 步長]
循環體
Next
While Wend 語句:
While 條件
循環體
Wend
但滿足條件時,(如當i>5時),便退出循環,否則執行循環體。Do-Loop語句:
Do
循環體
。[Exit Do]
Loop
循環體會在Do 與 Loop 之間不停循環。Exit Do 語句可有可無,是為了設定當滿足一定條件后,運行Exit Do 語句,即退出循環。for應該是最簡單的,因為不用自己去控制自增或自減,只要設置初始值,循環條件,和步階就行了~
VB中的for循環語句問題
1換行2。
b的作用是計數Dim a, b As Integer定義變量,雖然這樣定義也沒錯,但是最好不要養成習慣,因為vb跟其他語言不同,一次只能定義一個標準寫法為Dim a as integer, b As IntegerFor a = 100 To 300循環,從100到300,共計201次循環If b Mod 5 = 0 Then Print 假如b除以5余數為0換行,即b=0,5,10,15。.這些數字就換行Print a,最后的逗號是打錯了吧,應該是分號之類的,作用是打印出a的值,加分號不換行b = b + 1 b自加1,這樣才能實現每5個換行,不然b一直為0每個都會換行Next a。
【VB程序中關于循環語句:“FOR”的使用第一個問題:Q1:FOR的結
a是循環變量,b是初始值,c是步進數,即每循環一次a的值的變化量.n=Inputbox("n=")i=0s=0For i =0 to ni=i+1s=s+iNext iPrint sPrivate Sub Command1_Click()Dim i As IntegerDim a(0 to 9)Dim b '最大值Dim c '最小值Dim s '和Dim d '平均值b = 0c = 0s = 0For i = 0 to 9a(i)=inputbox("輸入數字")If b If c > a(i) Then c = a(i)s = s + a(i)Next is = s - b - cd = s / 8Print dEnd Sub。
vb怎么寫for循環語句
for…next循環如下:(在C盤根目錄建立一個名字為1的文件夾,反復10次)Private Sub Command2_Click()
Dim i As Integer
For i = 1 To 10
Set fso = CreateObject("*stemobject")
*Folder ("c:\1")
Next
End Sub
VB循環語句
循環語句包括For-Next、While-Wend、Do-Loop語句。
暫且先給你介紹一下這些語句的簡單用法:For-Next語句:For 變量 = 初值 To 終值 [Step 步長] 循環體Next當循環變量的值在初值到終值范圍內時,執行一次循環體中的語句塊,并使初值增加一個步長。當循環變量的值不在初值到終值范圍內時,就退出循環,執行Next后面的語句。
For循環語句執行的流程圖。其中,Step 步長 可省略,省略時,步長=1. 例如:Private Sub Form_Activate()For i = 1 To 5 Step 1 Print iNextEnd Sub在這個例子中,運行程序后,窗體上會寫出如下文字:12345解析:變量i由初值1到終值5共循環5次,每次循環時,輸出i,并且將i的值加上步長的值1.所以,但第二次循環式,i的值就變為2.循環5此后,i的值變為5.再循環時i就變為6,便超過了終值5,因此循環結束,VB開始運行Next語句之后的代碼。
Do-Loop語句:Do循環體。[Exit Do]Loop循環體會在Do 與 Loop 之間不停循環。
Exit Do 語句可有可無,是為了設定當滿足一定條件后,運行Exit Do 語句,即退出循環。如:Private Sub Form_Activate()Dim i As Integeri = 1Do Print i i = i + 1 '每次循環時都使i的值增加1 If i > 5 Then Exit Do '當i的值大于5(即循環5此后)時,退出循環LoopEnd Sub其運行效果與上面的例子相同。
以上說明絕對不是復制的,給點辛苦分也行,謝謝~~。
轉載請注明出處華閱文章網 » vb的for循環語句