Items=LBCountItems(ControlNumber)
Return the number of items on a List-Box previously created.