TO 18
CREATE CURSOR d2015zm (xm c(10))
INSERT INTO d2015zm (xm) VALUES ('李四1')
INSERT INTO d2015zm (xm) VALUES ('李四2')
INSERT INTO d2015zm (xm) VALUES ('张三1')
INSERT INTO d2015zm (xm) VALUES ('张三2')
*以上部份只是构造本实例数据，实际可以删除这段代码

this.Tag=SYS(2015)

*SELECT XM FROM d2015zm INTO CURSOR (this.Tag) WHERE .F. READWRITE
THIS.rowsourcetype= 2
'.xm'
你在红字，这里有什么有？我把他去掉了，好像运行结果1样的？