Select Case
.
Select Case _ _
Case 1
1
Case 2
2
...........................
Case Else
n
End Select
Select Case , , .
Case :
1. Case _1, _2,...
2. Case Is _
3. Case _1 To _2
. , SelectCase. , Case . - , , Case. , , Case Else. , End Select.
:
Input A
Select Case A
Case 1,5
Print 1 5
Case Is >5
Print 5
Case -8 TO 2.5
Print -8, 2.5
Case Else
End Select
20. Visual Basic. For Next. .
- .
Visual Basic :
- ( );
- , ( ) .
For...Next (... )
For... Next - .
For _=_ To _ [Step ]
_
Next _
For :
- , .
- .
, ( 1).
Next.
:
, ( ). NEXT , , , .
1: 10
For I=1 To 10
|
|
Next I
2: 10 20.
For K=10 To 20 Step 2
Print K
Next K
Exit For. , Next.
For... Next - For, Next .
21. DoLoop. .
Do...Loop. :
.
_ , _ .
1. Do While _
_
Loop
_ , _ .
2. Do Until _
_
Loop
( , _ ).
_ , _ .
3. Do
_
Loop While _
_ , _ .
4. .Do
_
Loop Until _
Exit Do. , Loop.