Sample Data Array Visual Basic