determine even or odd number in visual basic