[local]2[/local]
1.需要显示每卷最大“尾页号”。不要用“SELECT * FROM （表文件名）GROUP BY” 这个命令，好像不太适用。
 2.检测每卷的“页号”和“尾页号”，规则是如果第一条记录的“页号”为1，“尾页号”为3，那第二条记录的“页号”必须为4，两者之间的关系为“页号”必须比上一条记录的“尾页号”大“1”，就是当前记录的“尾页号”+1=上一条记录的“页号。显示不符合这一条件的记录。（“尾页号”是空的记录不在检测范围，可以在检测的时候过滤掉，但这些记录不能删除）
 3.检测每卷第一条的“首页号”，规则是只有每卷的第一条的“首页号”有记录，且必须为“1”，显示“首页号”记录里不符合这一条件的记录
 

[ 本帖最后由 wsj0608 于 2014-10-30 19:12 编辑 ]

附件附不上来

有附件的

是第二次编辑加上去的

没搞懂楼主指的“每卷”是个什么概念，和卷号的关系是如何的。

改了一下结构，方便运算。
是不是这个意思?

USE 试验用.dbf ALIAS 数据表    && 结构：(卷号 C(5), 页号 I, 首页号 I, 尾页号 I)
CREATE CURSOR 问题1 (卷号 C(5), 页号 I, 首页号 I, 尾页号 I)
CREATE CURSOR 问题2 (卷号 C(5), 页号 I, 首页号 I, 尾页号 I)
CREATE CURSOR 问题3 (卷号 C(5), 页号 I, 首页号 I, 尾页号 I)

GO TOP IN "数据表"
m卷号 = 数据表.卷号
m尾页号 = 数据表.尾页号
IF 数据表.页号 != 1
    INSERT INTO 问题2 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
ENDIF
IF 数据表.首页号 != 1
    INSERT INTO 问题3 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
ENDIF
SKIP IN "数据表"
DO WHILE !EOF("数据表")
    IF 数据表.卷号 == m卷号
        IF 数据表.页号 != (m尾页号 + 1)
            INSERT INTO 问题2 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
        ENDIF
    ELSE
        m卷号 = 数据表.卷号
        IF 数据表.页号 != 1
            INSERT INTO 问题2 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
        ENDIF
        IF 数据表.首页号 != 1
            INSERT INTO 问题3 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
        ENDIF
        SKIP -1 IN "数据表"
        INSERT INTO 问题1 VALUES (数据表.卷号, 数据表.页号, 数据表.首页号, 数据表.尾页号)
        SKIP IN "数据表"
    ENDIF
    m尾页号 = 数据表.尾页号
    SKIP IN "数据表"
ENDDO
SELECT 问题1
GO TOP 
BROWSE
SELECT 问题2
GO TOP 
BROWSE
SELECT 问题3
GO TOP 
BROWSE
CLOSE DATABASES

问题1
Select 卷号,Max(Padl(Alltrim(尾页号),3,"0")) FROM 试验用 GROUP BY 1
问题3
Select * From 试验用 Where 卷号 In (Select 卷号 From 试验用 Group By 卷号 Where Not Empty(首页号) Having Count(卷号)>1) and Alltrim(首页号)=="1"

[ 本帖最后由 sdta 于 2014-10-31 11:16 编辑 ]

这是什么逻辑，看不懂

应该是当前记录的“尾页号”+1=下一条记录的“页号”？

问题2

Select 卷号,页号,尾页号 From 试验用 Where Not Empty(尾页号) Into Cursor Temp
Select 卷号,页号,Recno() 标记 From Temp Into Cursor Temp1
Select 卷号,Padl(Int(Val(尾页号)+1),4,"0") 尾页号,Recno() 标记 From Temp Into Cursor Temp2
Select * From (Select A.卷号,页号,尾页号 From Temp1 A,Temp2 B Where A.标记-1=B.标记 And A.卷号==B.卷号) A Where 页号!=尾页号
上面一行代码可以分解为下面两行代码(主要是针对VFP6版本及初学者)
Select A.卷号,页号,尾页号 From Temp1 A,Temp2 B Where A.标记-1=B.标记 And A.卷号==B.卷号 Into Cursor Temp3
Select * From Temp3 Where 页号!=尾页号

[ 本帖最后由 sdta 于 2014-10-31 14:31 编辑 ]

已下载，过两天给你弄一下。

是不是父、子、兄、弟的关系差不多吧！与树的 PARENT,KEY,PREVI,NEXT,FIRST