VB循環結構:
創新互聯建站服務緊隨時代發展步伐,進行技術革新和技術進步,經過10多年的發展和積累,已經匯集了一批資深網站策劃師、設計師、專業的網站實施團隊以及高素質售后服務人員,并且完全形成了一套成熟的業務流程,能夠完全依照客戶要求對網站進行成都網站制作、網站建設、建設、維護、更新和改版,實現客戶網站對外宣傳展示的首要目的,并為客戶企業品牌互聯網化提供全面的解決方案。
1)For型結構(已知起始和終點):FOR
I
=
起始
To
終點
[Step
by
n/-n;
n不能為0,默認不寫n=1]
2)While結構:
2.1)While(條件)
語句體
Loop
2.2)
Do
語句體
Loop
While(條件)
3)Until循環:
3.1)Do
Until(條件)
語句體
Loop
3.2)Do
語句體
Loop
Until(條件)
其中While和Until的區別是:while是條件為假的是否退出(即:不滿足while的條件while就不做了)。Until是條件為真是退出(滿足條件后才推出)。
Do開頭的至少無條件做一次。
值傳遞和地址傳遞(引用)的而導致的問題。
在For Each 的時候
當對象是值對象的時候,等于獲得到一個副本。
當對象是引用對象的時候,則是獲得到一個指針。
而在For To 的時候
無論對象是什么,你都獲得到這個集合指定位置的指針。
更詳細的,可以請參考以下內容,或直接去官方的MSDN了解
關于值類型和引用類型:
如果數據類型在它自己的內存分配中存儲數據,則該數據類型就是“值類型”。“引用類型”包含指向存儲數據的其他內存位置的指針。
值類型
值類型包括:
所有數字數據類型
Boolean、Char 和 Date
所有結構,即使其成員是引用類型
枚舉,因為其基礎類型總是 SByte、Short、Integer、Long、Byte、UShort、UInteger
或 ULong
引用類型
引用類型包括:
String
所有數組,即使其元素是值類型
類類型,如 Form
委托
非類型的元素
以下編程元素未限定為類型,因為您無法將它們中的任何一個指定為聲明元素的數據類型:
命名空間
模塊
事件
屬性和過程
變量、常數和字段
使用對象數據類型
可以將引用類型或值類型指派給 Object 數據類型的變量。Object
變量總是存儲指向數據的指針,從不存儲數據本身。然而,如果將值類型指派給 Object 變量,則 Object
變量將表現得像存儲自己的數據一樣。有關更多信息,請參見 Object 數據類型。
通過將 Object 變量傳遞給 Microsoft.VisualBasic
命名空間中 Information
類的 IsReference
方法,可以確定該變量是用作引用類型還是值類型。如果 Object 變量的內容表示引用類型,則 Information.IsReference 返回 True。
1.While...Wend 語句
只要指定的條件為 True,則會重復執行一系列的語句。
語法
While condition
[statements]
..
Wend
2.Do...Loop
2.1 第一種用法
用 Do 循環重復執行一語句塊,且重復次數不定。Do...Loop 語句有幾種演變形式,但每種都計算數值條件以決定是否繼續執行。如同 If...Then condition 必須是一個數值或者值為 True(非零)或 False(零)的表達式。
在下面的 Do...Loop 循環中,只要 condition 為 True 就執行 statements。
Do While condition
statements
..
Loop
2.2 第二種用法
Do...Loop 語句的另一種演變形式是先執行語句,然后在每次執行后測試 condition。這種形式保證 statements 至少執行一次:
Do
statements
Loop While condition
注:其它兩種演變形式類似于前兩個,所不同的是,只要 condition 為 False 而不是 True,它們就執行循環。
循環零次或多次
Do Until condition
statements
Loop
至少循環一次
Do
statements
Loop Until condition
3.For...Next
在不知道循環內需要執行多少次語句時,宜用 Do 循環。但是,在知道要執行多少次時,則最好使用 For...Next 循環。與 Do 循環不同, For 循環使用一個叫做計數器的變量,每重復一次循環之后,計數器變量的值就會增加或者減少。For 循環的語法如下:
For counter = start To end [Step increment]
statements
Next [counter]
參數 Counter、Start、end 和 increment 都是數值型的。
注意 increment 參數可正可負。如果 increment 為正,則 Start 必須小于等于 end,否則不能執行循環內的語句。如果 increment 為負,則 Start 必須大于等于 end,這樣才能執行循環體。如果沒有設置 Step,則 increment 缺省值為 1。
實例:
以下代碼打印出所有有效的屏幕字體名:
Private Sub Form_Click ()
Dim I As Integer
For i = 0 To Screen.FontCount
Print Screen.Fonts (i)
Next
End Sub
4.For Each...Next
For Each...Next 循環與 For...Next 循環類似,但它對數組或對象集合中的每一個元素重復一組語句,而不是重復語句一定的次數。如果不知道一個集合有多少元素, For Each...Next 循環非常有用。
For Each...Next 循環的語法如下:
For Each element In group
statements
Next elementt
例如,下面的子過程打開 Biblio.mdb,把每一個表的名字加到列表框中。
Sub ListTableDefs ()
Dim objDb As Database
Dim MyTableDef as TableDef
Set objDb = OpenDatabase("c:\vb\biblio.mdb", _
True, False)
For Each MyTableDef In objDb.TableDefs ()
List1.AddItem MyTableDef.Name
Next MyTableDef
End Sub
請記住使用 For Each...Next 時的幾點限制:
對集合,element 只能是 Variant 變量,或一般的 Object 變量,或“對象瀏覽器”中列出的對象。
對數組,element 只能是 Variant 變量。
For Each...Next 不能與用戶自定義類型的數組一起使用,因為 Variant 不可能包含用戶自定義類型。
Public?Class?Form1
For?i?=?1?To?9
For?j?=?1?To?9
If?j?=?i?Then
Label1.Text?=?Label1.Text??"?"??i??"*"??j??"="??IIf(i?*?j??9,?i?*?j,?i?*?j??"?")
End?If
Next
Label1.Text?=?Label1.Text??vbCrLf
Next
End?Sub
End?Class
label屬性設置:AutoSize設置為F,Size設置為440,190,BACKCOLOR設置為WHITE
網站標題:vb點虐
的循環結構 vb循環結構的三種類型
網頁鏈接:http://vcdvsql.cn/article26/ddeejjg.html
成都網站建設公司_創新互聯,為您提供品牌網站建設、用戶體驗、全網營銷推廣、面包屑導航、外貿網站建設、網站改版
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯