Sort List Using For Loop In Visual Basic