Private Sub PrintArrayNoLoop()
Print("Item " & "1" & ": " & nInts(0))
Print("Item " & "1" & ": " & nInts(1))
Print("Item " & "1" & ": " & nInts(2))
Print("Item " & "1" & ": " & nInts(3))
Print("Item " & "1" & ": " & nInts(4))
Print("Item " & "1" & ": " & nInts(5))
Private Sub PrintArrayForLoop()
Print("Item " & "i" & ": " & nInts(i))
Private Sub PrintArrayForLoopReversed()
Print("Item " & "i" & ": " & nInts(i))
Private Sub PrintAnySizeArrayForLoop()
For i = nInts.GetLowerBound(0) to nInts.GetUpperBound(0)
Print("Item " & "i" & ": " & nInts(i))
Private Sub PrintAnySizeArrayForLoopReversed()
For i = nInts.GetUpperBound(0) to nInts.GetLowerBound(0) step -1
Print("Item " & "i" & ": " & nInts(i))
Private Sub PrintArrayWhileLoop()
Print("Item " & "i" & ": " & nInts(i))
Private Sub GetMaxArrayValueFor()
if (nInts(i) > nMax) then nMax = nInts(i)
Private Sub Get2ndHighestArrayValueFor_1()
if (nInts(i) > nMax) then nMax = nInts(i)
if (nInts(i) > n2ndMax) AND (nInts(i) < nMax) then n2ndMax = nInts(i)
Print("2nd Max: " & nMax)
Private Sub Get2ndHighestArrayValueFor_2()
if (nInts(i) > nMax) then
elseif (nInts(i) > n2ndMax) then
if (nInts(i) > n2ndMax) AND (nInts(i) < nMax) then n2ndMax = nInts(i)
Print("2nd Max: " & nMax)