Assuming the name of the listbox is list1, you can get to it this way:

activate screen
with thisform.list1
    activate screen
    ? .listitem(.listItemId, 3)
endwith

>Steve,
>
>This is in the init event of combo box:
>
>SELECT ToFrmCod
>* set the sort order
>SET ORDER TO ToFrom
>* set the cnt variable to 0.
>cnt = 0
> SCAN
> * increase the cnt variable by 1.
> cnt = cnt + 1
> WITH this
> * add the information to this combo box.
> .AddListItem(SUBSTR(tofrmcod.tofrom,1, 35),cnt,1)
> .AddListItem(SUBSTR(tofrmcod.tofrmdesc,1, 35),cnt,2)
> .AddListItem(SUBSTR(tofrmcod.i_o,1, 15),cnt,3)
> ENDWITH
>ENDSCAN
>
>But when i select an item by clicking the end button of combo box.
>It is displaying the first column value. it is ok for me. But at the same time i want to grab the third column value for the item chosen and i want to store that third column value into a variable.
>
>Please let me know.
>
>Thank you.