> DIMENSION myItems[3,2]
> myItems[1,1] = "TAB"
> myItems[1,2] = 9
> myItems[2,1] = ";"
> myItems[2,2] = 44
> myItems[3,1] = ","
> myItems[3,2] = 59
>
>WITH thisform.Combo1
>    .RowSourceType = 1
>    FOR i = 1 TO ALEN(myItems,1)
>        .AddItem("  ")
>        .AddListItem(myItems[i,1],i,1)
>        .AddListItem(myItems[1,2],i,2)
>    ENDFOR
>ENDWITH
>