hi,
i try as under i get error message Property "aTables" is not found

nTablesCount=adir(thisform.aTables,"*.dbf")
thisform.list1.RowSourceType = 5
thisform.list1.RowSource = 'thisform.aTables'
thisform.list1.Requery() 
thisform.list1.ListIndex = 1

thanks
>>hi,
>>thank you for reply,i try as under. not work
>>

>>FOR nCount = 1 TO nTablesCount
>>   ? aTables(nTablesCount,1)
>>nTablesCount=adir(thisform.aTables,"*.dbf")
>>thisform.list1.value=nTablesCount
>>thisform.list1.RowSourceType = 5
>>thisform.list1.RowSource = 'thisform.aTables'
>>thisform.list1.ListIndex = 1

>>endfor
>>
>
>What exactly doesn't work? Remove this >thisform.list1.value=nTablesCount and add thisform.list1.Requery() after thisform.list1.RowSource = 'thisform.aTables'
>
>Also why do you do loop for? Remove it completely.