ГЛЮК PB9. 0  ListBox
Power Builder9
Казалось - всё просто.
Хочу в массив записать все выделенные 
строки в контроле ListBox. 
Нашёл пример в книге м в любимом Help’e
НЕ ПОЛУЧАЕТСЯ.
 1 .Код прикрепил к командной кнопке
Как кнопка, так и ListBox находятся
На одном и том же окне.
 2 . // into event 'activate' программно заполняю элемент управления ListBox
lb_city.reset( ) // deleting all rows from ListBox
lb_city.additem( "Madrid")
lb_city.additem( "Брянск")
lb_city.additem( "Воронеж")
lb_city.additem( "С.Петербург")
lb_city.additem( "Тамбов")
lb_city.additem( "Ташкент") 
lb_city.additem( "Одеса")
lb_city.additem( "Харків")
lb_city.additem( "Kиїв")
lb_city.additem( "Дніпропетровськ")
lb_city.additem( "Boston") 
lb_city.additem( "Tel-Aviv")  3 . сначала с помощью кода, 
lb_city.multiselect = true
затем дополнительно
поставил птицу в MultiSelect
 4 .
integer li_ItemTotal, li_ItemCount

// Get the number ( quantity) of items in the ListBox.
li_ItemTotal = lb_city.TotalItems( ) //  правильно!  10 

// Loop through all the items.
FOR li_ItemCount =  1  to li_ItemTotal 
   // Is the item selected? If so, display the text
	 IF lb_city.State(li_ItemCount) =  1  THEN  // проверка ВЫДЕЛЕНА ЛИ строка 
	MessageBox("Selected Item", &
   lb_city.text(li_ItemCount)) // извлечение выбранного пункта
// выбирает только первую из выделенных строк. Так если 
выделены  5 -ая,  7 -ая строка и  10 -ая строки,
то MessageBox выводит только  5 -ую, две остальные
не показывает, т.е. выход из FOR
С остальных строк выделение снимается.
// если только первый из n-пунктов выделен и на этом цикл заканчивается,
// а надо следующие пункты выбрать!
	
END IF
NEXT

СПАСИБО