| A While..End While indicação |
|
- Com para… em seguida o tipo de programar quando começa o laço, o número das iterações é sabido.
- Se não sabido explicitamente lhe for sabido então por uma variável que resolva a um inteiro que ajuste seu valor do ending.
- Dentro do laço, o laço itera que muitas vezes a menos que retirado em uma circunstância que se levante.
- Pode haver umas situações, entretanto, onde não se pode saber adiantado exatamente quantas vezes executar as indicações e a que valor o valor do ending deve ser ajustado.
|
|
A While..End While laço
|
|
Para estas situações, a While..End While o laço for projetado. Seu formato geral é dado abaixo.
|
While condition
...statements
End While
|
|
|
Uma While..End While o laço não executar um número fixo das épocas e executarem contanto que um teste da circunstância no começo do laço remanescer verdadeiro. Poder-se-ia ser que a circunstância é falsa no início do laço, que no caso não começa executada em tudo. Naturalmente, é importante que em algum lugar dentro do laço a circunstância se torna verdadeira; se não, o laço nunca termina. Visto que a para… em seguida o laço apresenta uma condição para terminar o laço, uma While..End While presentes uma condição para continuar o laço.
Antes que uma aplicação mais prática esteja apresentada, fazer exame de um olhar em como uma While..End While o laço puder ser ajustado até se assemelhar a a para… em seguida o laço e como em uma ilustração precedente uma disposição é carregada com os valores e as exposições de um laço seus índices.
|
Sub Get_Fruit (Src As Object, Args As EventArgs)
Dim Fruit() As String = {"apples","oranges","lemons","grapes","beer"}
Dim i As Integer = 0
While i <= Fruit.Length - 1
FruitOut.Text &= Fruit(i) & " "
i += 1
End While
End Sub
<asp:Button Text="Get Fruit" OnClick="Get_Fruit" runat="server"/>
<asp:Label id="FruitOut" EnableViewState="False" runat="server"/>
|
|
| Carregando uma disposição de uma lima
|
|
Uma disposição é carregada de uma loja externa dos dados -- uma tabela da base de dados ou de lima -- conter a informação a que pode ser adicionado, mudado, ou suprimido without tem que revisar o certificado que contem a disposição. No exemplo abaixo, duas disposições (StatesArray () e CodesArray ()) são carregados de uma lima de texto externa (StateCodes.txt). Esta é uma lima de nomes do estado e de códigos do estado para todos os 50 estados. No seguinte certificado estas disposições são definidas global para o acesso por outros subprograms que executam processar de encontro às disposições.
|
<SCRIPT runat="server">
Dim StatesArray(0) As String
Dim CodesArray(0) As String
Sub Page_Load
Dim FileReader As StreamReader
Dim LineIn As String
Dim FieldArray() As String
FileReader = File.OpenText("e:\WebSite\tutorials\vbnet\vbnet04\StateCodes.txt")
LineIn = FileReader.ReadLine()
While LineIn <> ""
FieldArray = Split(LineIn, ",")
StatesArray(UBound(StatesArray)) = FieldArray(0)
CodesArray(UBound(CodesArray)) = FieldArray(1)
LineIn = FileReader.ReadLine()
If LineIn <> "" Then
ReDim Preserve StatesArray(StatesArray.Length)
ReDim Preserve CodesArray(CodesArray.Length)
End If
End While
FileReader.Close()
End Sub
</SCRIPT>
|
|
| Usando as disposições
|
|
Neste exemplo, o subprogram de Page_Load carrega as disposições de CodesArray e de StatesArray, assim que a página atual tem estas disposições disponíveis a ela. Para pôr apenas um toque do revestimento sobre esta discussão, com as disposições, um par das coisas pode ser feito.
|
| Lookup da disposição
|
|
Desde que as duas disposições têm valores correspondentes do elemento e para essa razão podem ser usadas como disposições correspondentes para o look-up da tabela.
|
Sub Get_The_Code (Src As Object, Args As EventArgs)
If State.Text <> "" Then
Dim i As Integer
For i = 0 To UBound(StatesArray)
If StatesArray(i) = State.Text Then
Code.Text = CodesArray(i)
Exit For
End If
Next
End If
End Sub
<b>State: </b><asp:TextBox id="State" Size="12" runat="server"/>
<asp:Button Text="Get Code" OnClick="Get_The_Code" runat="server"/>
<b>Code: </b><asp:Label id="Code" EnableViewState="False" runat="server"/>
|
|
Keywords:
The While...End While Statement in VB.NET,
switch case statement,
for loop while,
for loop statement,
select case statement,
java statement,
while perl,
value statement,
switch statement,
case statement,
function statement,
loop statement,
nested statement,
command statement,
while examples,
while tutorial,
condition statement,
|
