selete 分班表 for i=1 to VAL(thisform.text2.value) INSERT INTO 分班表 VALUES (PADL(I,2,"0"), ALLTRIM(THISFORM.TEXT1.VALUE)+PADL(I,2,"0")) endfor thisform.grid1.refresh()