>>
>>Tim,
>>When you delete an array item, the entire row (unless you specify the column) is moved to the bottom of the array and given .F. values across the board. Simply re-dimension it using the current number of rows - 1 and the currnt number of columns.
>>
>>Ex.
>>Adel(MyArray,nElement)
>>lnlength = alen(MyArray,1)
>>dimension MyArray(lnlength-1,alen(MyArray,2))
>>
>>You can also surround this stuff with THISFORM.LockScreen = .T./THISFORM.LockScreen = .F. if you get too much flickering.
>>
>>HTH.
>Ok, I got your concept and executed. my array was 10 items, 7 cols.
>I deleted 1 item using adel and redimensioned it using your code( 1 less row, same # of columns) Now the listbox has scores of .F. on the bottom 30 rows :(
PMFJI,
Try :
List1.Rowsource=""
dimension MyArray(lnlength-1,alen(MyArray,2))
List1.Rowsource="MyArray"
HTH