新聞中心
VB.NET語句中continue while的用法
VB.NET
創(chuàng)新互聯(lián)專注于遷西企業(yè)網(wǎng)站建設,響應式網(wǎng)站開發(fā),商城開發(fā)。遷西網(wǎng)站建設公司,為遷西等地區(qū)提供建站服務。全流程按需規(guī)劃網(wǎng)站,專業(yè)設計,全程項目跟蹤,創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務
2005,已經(jīng)實現(xiàn)了continue語法,具體是這樣操作:
如果
Continue
語句在
Do...Loop
循環(huán)中,請將該語句更改為
Continue
Do。
如果
Continue
語句在
For...Next
循環(huán)中,請將該語句更改為
Continue
For。
如果
Continue
語句在
While...End
While
循環(huán)中,請將該語句更改為
Continue
While。
否則,請移除
Continue
語句。
用法:
For
i
As
Integer
=
To
100
'
If
i
=
50
跳過
Console.Writeline
statement
If
i
=
50
Then
Continue
For
Console.WriteLine(i.ToString)
Next
'
Do
While
using
Continue
statement.
Dim
ii
As
Integer
=
1
Do
While
ii
100
ii
+=
1
'
If
ii
=
50
跳過
Console.Writeline
statement
If
ii
=
50
Then
Continue
Do
Console.WriteLine(ii.ToString)
Loop
'
While
using
Continue
statement.
Dim
iii
As
Integer
=
1
While
iii
100
iii
+=
1
'
If
iii
=
50
跳過
Console.Writeline
statement
If
iii
=
50
Then
Continue
While
Console.WriteLine(iii.ToString)
End
While
vb.net中關(guān)于循環(huán)語句 求教大家弱智的問題
要弄清楚這兩個問題,就要明白For循環(huán)語句的語法規(guī)則:
For循環(huán)語句,首先是判斷循環(huán)條件,如果循環(huán)條件不合理,則循環(huán)不執(zhí)行。
那么看第一個語句,循環(huán)范圍是 i = -3.5 to 5.5,顯然這個是一個從-3.5到5.5的遞增范圍,可是后面的Step卻是一個負數(shù),表示以0.5的步長遞減。取值范圍要求從小到大,可是步長改變卻是由大變小,顯然這個循環(huán)條件自相矛盾,所以循環(huán)將不會執(zhí)行,也就是循環(huán)執(zhí)行的次數(shù)是0次!
如果循環(huán)條件合理,則開始執(zhí)行循環(huán)語句,直到根據(jù)步長變換,下一個值超出循環(huán)范圍則終止。
For j = 6 to 2 Step -2
Next
完整寫法就是:
For j = 6 to 2 Step -2
Next j
Next j的意思就是下一個j值。結(jié)合本題,下一個j值等于6-2=4,這個時候,就是循環(huán)語句的第二個規(guī)則,判斷循環(huán)變量的值是否超出循環(huán)范圍,我們這里的j=4,顯然是在6 to 2這個范圍之內(nèi),所以循環(huán)繼續(xù),到下一個j的時候為2,依然在循環(huán)范圍內(nèi);到這里,6,4,2我們的循環(huán)執(zhí)行了3次,準備第4次循環(huán)的時候j = 2 -2 = 0超過了6 to 2這個范圍,那么循環(huán)終止。
所以i循環(huán)內(nèi)的每一個j循環(huán)將執(zhí)行3次。
vb.net 關(guān)于循環(huán)語句
我寫了一段代碼,注意你讀取的方法,我改進了一下 Imports System.IO ‘代碼窗體的最上端一定要聲明
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sr As StreamReader Dim TextBox As Control
Dim i As Integer
i = 1
For Each TextBox In Me.Controls
If TypeName(TextBox) = "TextBox" Then sr = New StreamReader("c:\save\" i ".ini", System.Text.Encoding.Default) ’注意選擇編碼方式,按你原來的方法,未設置編碼,顯示的是亂碼!路徑請按你的情況改! TextBox.Text = sr.ReadToEnd()
i += 1 End If
Next
MsgBox("已經(jīng)載入" i - 1 "個文件") End Sub注意:這樣的代碼是倒序的,第一個文本框顯示的是最后一個文件的內(nèi)容!請酌情處理!
分享名稱:vb.net循環(huán)語句 vbnet中for循環(huán)
新聞來源:http://fisionsoft.com.cn/article/dosjepg.html