TEST2中的INIT
SELECT XM,SEX FROM d2015zm INTO CURSOR (this.Tag) WHERE .F. READWRITE    && WHERE .F.  本人看不明白，不知道有什么用

TEST1,好像能显示2个字段以上，TEST2好像只能显示1个字段
以上都是在这里找到的，供后人学习
TEST1 基本能看懂

慢慢看吧，会看明白的。

实例TEST2还是很不错的。该组合框的功能是：在组合框中录入姓名的一部分，单击下拉箭头仅显示以录入内容开头的人员。

1. 它没有使用固定的游标名，而是采用 sys(2015)返回一个唯一的标识名作为游标名，可防止同名文件之间冲突。
2. 这个实例设计也比较严密，在释放组合框时还添加了关闭游标的代码。 use in (this.tag)
3. SELECT XM,SEX FROM d2015zm INTO CURSOR (this.Tag) WHERE .F. READWRITE 这个语句用于建立一个游标结构，相当于Create Cursor 命令。where .f. 的意思是条件不满足，确保生成的游标没有任何记录。
4. 当单击组合框下箭头时触发DropDown事件，将满足条件的记录添加到游标。若将where条件修改为 WHERE ALLTRIM(xm) like "%"+ALLTRIM(this.DisplayValue)+"%" 可查询包含输入内容的人员而不仅限于以录入内容开头。

SELECT XM,SEX FROM d2015zm INTO CURSOR (this.Tag) WHERE .F. READWRITE
原来，他是要生成空表啊，我怎么说，我把WHERE .F.去掉了，好像也正常运行的。

哈哈，原来
USE IN XXX
就能关闭XXX表的啊，
我以前一直用
SELECT XXX
USE
这样关闭。。

之所以把where .f.去掉也能正常运行，是因为在DropDown代码中有 zap in (this.tag)，在生成数据前先清空了数据表。