Rss & SiteMap
搭建论坛 http://bbs.diylsoft.com:8118/starforum/index.asp
如果因为工作的疏忽或其它原因,造成在一个表中有着部分相同记录,将如何删除呢?我们还沿用前面的例子,只不过是只对表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。循环下去,直到循环结束。
技巧:必须进行排序,否则,不能实现在一个表中的相同记录删除操作。