Visual Basic 6
기본 구문

if / else 문

If condition Then 
    code to execute if true
ElseIf condition Then
    code
Else
    code to execute if conditions are both false
End If

for 루프

For I as Integer = 1 To 10 Step 1
    code to execute
Next

단계는 선택적이며 단계 1이 기본값입니다. Step은 계산 방법을 알려주므로 -1은 매번 1을 뺀 다음 5 단계는 매번 루프를 통해 5를 더하게됩니다.

루프를 중지해야하는 경우 다음 Exit For 같이 Exit For 문을 사용할 수 있습니다.

Dim iIndex as integer

For I as Integer = 1 To 10 Step 1

Debug.Print  I     
iIndex = I * 10

If iIndex > 90 Then
    Exit For
End If

Loop

여기서 1에서 10을 인쇄하는 대신 iIndex가 90에 도달 할 때 프로세스가 중지하도록 지시했기 때문에 9에서 중지합니다.

Do Loop

Visual Basic의 또 다른 일반적인 유형의 루프는 중지하라는 메시지가 나타날 때까지 코드를 계속 실행하는 DO loop 입니다. 인덱스가 프로세스를 중지하는 데 사용되는 다른 루프와 달리이 특정 루프에서는 중지하라는 메시지를 표시해야합니다.

루프를 보여주는 간단한 예제는 다음과 같습니다.

Dim iIndex1 As Integer
iIndex1 = 1
   
Do
   Debug.Print iIndex1 
   iIndex1 = iIndex1 + 1

   If iIndex1 = 10 Then
      Exit Do
   End If
Loop

위의 코드는 인덱스를 가져 와서 1로 초기화 한 다음 증가시킵니다. Debug.Print 는 인덱스를 인쇄하여 루프를 랙에 Debug.Print 데 도움이됩니다. 각 루프에서 코드는 인덱스가 10에 도달했는지 확인하고 조건이 true 인 경우에만 Exit Do 가 실행되어 루프를 중지합니다.

사례 명세서 선택

    Dim number As Integer = 8
    Select Case number
        Case 1 To 5
            Debug.WriteLine("Between 1 and 5, inclusive")
            ' The following is the only Case clause that evaluates to True.
        Case 6, 7, 8
            Debug.WriteLine("Between 6 and 8, inclusive")
        Case 9 To 10
            Debug.WriteLine("Equal to 9 or 10")
        Case Else
            Debug.WriteLine("Not between 1 and 10, inclusive")
    End Select