Problem in accessing combo box elements

[ssv123]

Hi,
I am having a Combobox in which i have added few strings.

[pre]
do i = 1, 10
ret = DlgGet(dlg,IDC_COMBO,str)

if(str=='A') then
functionA(i).alphabet= str
elseif(str=='B') then
fuctionA(i).alphabet= str
endif
enddo
[/pre]
Asume there are only 2 strings added A and B, then Now my
problem is all the time functionA(i) is having the same value though i am changing the str.
I wanted the output like this
fuctionA(1) = A
fuctionA(2) = B
fuctionA(3) = A
fuctionA(4) = A
.
.
All these values are depenedent on the selection in the combo box. what ever I chose in the combo that str should update the array fuctionA(i).
Which i am facing problem.. Could anyone help with the correct code...