for i=1 to thisform.list1.listcount
if thisform.list1.selected(i)
groupid=thisform.list1.listitem(i,1)
groupname=thisform.list1.listitem(i,2)
insert into o01_list2 values(groupid,groupname)
delete from o01_list1 where user_no=groupid
endif
endfor
thisform.list1.requery
thisform.list2.requery