出错造成表空白
** Test.prg CREATE CURSOR 编码表 (编码 C(10)) INSERT INTO 编码表 VALUES ("202") INSERT INTO 编码表 VALUES ("303") INSERT INTO 编码表 VALUES ("101") of = CREATEOBJECT("form1") of.show(1) DEFINE CLASS form1 as Form ADD OBJECT combo as combobox WITH top=20,left=20,RowSourceType=3,; RowSource="SELECT 编码 FROM 编码表 ORDER BY 编码 INTO CURSOR 编码表_tmp" PROCEDURE Init =1 ENDPROC ENDDEFINE