Array Using For Loop In Visual Basic