如果因为工作的疏忽或其它原因,造成在一个表中有着部分相同记录,将如何删除呢?我们还沿用前面的例子,只不过是只对表1操作,不关表2的事了。 需要增加一个比较判断1和变量组1构件。 第一步,就是先要对数据表1进行排序,这一步是必须的。 属性设置: ADO数据表1的排序属性为,按照“电话号码”字段的升序进行排序。 记录循环的数据集为“ADO数据表1”。 第二步,事件设置: 当单击普通按钮1时,执行记录循环的方法,开始记录循环。 当记录循环时,得到变量X和表1中的第一条记录并且比较两个字符串。如图1所示此主题相关图片如下:图1 解释:变量X初始值是“空”,当记录循环时,得到表1的第一条记录,假设是“AAA”,空和三个A比较,肯定是不同的。也就是循环体在进行第一次循环时,肯定是不同的。 如果比较的结果不同,就把第一条记录的数据赋给变量X。事件设置如图2所示。此主题相关图片如下:图2 当第一次循环结束后,变量X的值成为了“AAA”。这时进行第二次循环,把变量“AAA”和表1中第二条记录相比较,如果相同,就删除当前记录。事件设置如图3所示此主题相关图片如下:图3 当第二次循环后,如果两个值相同,就把当前记录删除;如果不同,就把当前记录赋给变量X。循环下去,直到循环结束。 技巧:必须进行排序,否则,不能实现在一个表中的相同记录删除操作。