Good Morning

I have the following code which populates a list box using an SQL statement named List1:

WITH main.list1
 .RowSourcetype = 3
 .Rowsource = 'SELECT mainkey FROM ("U:\Data\modacad.dbf")'+;
              'WHERE &lcdesign order BY mainkey into cursor result'
 .ColumnCount = 1
ENDWITH

What I would like to do is to copy the contents of list1 into another list box named list2. I do not want to populate the list2 listbox with the SQL statement. I basically would like to know how to set the list box 2 rowsource to the contents of the list box 1 (List1)

Many Thanks