Dim X(2) X(0) = 10 X(1) = 20 X(2) = 30 For Each x in X MsgBox "Loop 1: " & x Next Dim Y(2) Y(0) = 10 'Y(1) = 20 Y(2) = 30 For Each x in Y MsgBox "Loop 2: " & x Next Dim Z(2) Z(0) = 10 Z(1) = 20 Z(2) = 30 For Each x in Z MsgBox "Loop 3: " &…