Visual Basic Code For Binary Search