' Visual Basic 2008 9.0 .NET Examples - Local, Module and Static Variables - Procedures and Functions : 
Module Example5
    Sub Main()
        Dim someCondition As Boolean
        If someCondition Then
            Dim ifVariable As Integer
            '...
        Else
            Dim elseVariable As Integer
            '...
        End If
        '
        Dim someExpression As Integer
        Select Case someExpression
            Case 1
                Dim caseVariable As Integer
        End Select
        '
        Do
            Dim doVariable As Integer
            '...
        Loop
        '
        For forVariable1 As Integer = 1 To 10
            Dim forVariable2 As Integer
            '...
        Next
        '
        Dim someCollection As Integer()
        For Each forEachVariable1 As Integer In someCollection
            Dim forEachVariable2 As Integer
            '...
        Next
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.