Visual Basic Not Numerically Consecutively