SET TALK OFF 
CLEAR
count to Tj for bpdfxz="W1"
IF (TJ=0)
=MESSAGEBOX("今日无含W1标志数据",64)
ELSE
USE E:\test\&NYR\BJ.dbf
LOCATE ALL for left(BPDFDM,1)="E" or  left(BPDFDM,2)="06" 
CONTINUE
   IF found()
SCAN FOR left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
replace  bpdfxz with " " 
ENDSCAN
=MESSAGEBOX("含有W1标志情况，请检查BJ后，再报送！",64)
    ELSE
=MESSAGEBOX("今日无需要数据",64)  
   ENDIF
ENDIF
CLOSE ALL
CLEAR EVENTS
QUIT

请帮看下 我这条语句“    ELSE
=MESSAGEBOX("今日无需要数据",64)”，结果出不来，我的想法是，账户开头不是E和06且标志是w1，提示"今日无需要数据"，但是执行下来，不会有提示。仍然按提示“含有W1标志情况，请检查BJSBP后，再报送！",64”执行

你的continue的位置是不是不对啊。。。

CONTINUE 惹的祸把

将代码按缩进格式调整，这样会更容易看出代码的逻辑关系。

SET TALK OFF
CLEAR
count to Tj for bpdfxz="W1"
IF (TJ=0)
    =MESSAGEBOX("今日无含W1标志数据",64)
ELSE
    USE E:\test\&NYR\BJ.dbf
    LOCATE ALL for left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
    CONTINUE
    IF found()
        SCAN FOR left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
            replace  bpdfxz with " "
        ENDSCAN
        =MESSAGEBOX("含有W1标志情况，请检查BJ后，再报送！",64)
    ELSE
        =MESSAGEBOX("今日无需要数据",64)  
    ENDIF
ENDIF
CLOSE ALL
CLEAR EVENTS
QUIT

LOCATE ALL for left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
* 这里可能找到一条，此时eof()=.F.
CONTINUE
* 这是找了下一条，也许就找不到了，此时eof()=.T.
把CONTINUE去掉试试

以下是引用hu9jj在2023-9-9 06:53:57的发言：

将代码按缩进格式调整，这样会更容易看出代码的逻辑关系。

SET TALK OFF
CLEAR
count to Tj for bpdfxz="W1"
IF (TJ=0)
    =MESSAGEBOX("今日无含W1标志数据",64)
ELSE
    USE E:\test\&NYR\BJ.dbf
    LOCATE ALL for left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
*!*    CONTINUE
    IF found()
        SCAN FOR left(BPDFDM,1)="E" or  left(BPDFDM,2)="06"
            replace  bpdfxz with " "
        ENDSCAN
        =MESSAGEBOX("含有W1标志情况，请检查BJ后，再报送！",64)
    ELSE
        =MESSAGEBOX("今日无需要数据",64)  
    ENDIF
    continue &&放这里。。。
ENDIF
CLOSE ALL
CLEAR EVENTS
QUIT

变了continue的位置，还是不行。。。。

有那么麻烦吗？这样试试

...
USE E:\test\&NYR\BJ.dbf
LOCATE ALL For (left(BPDFDM,1) <> "E" and left(BPDFDM,2) <> "06" and bpdfxz = 'W1'
If found()
    =MESSAGEBOX("今日无需要数据",64)  
ELSE
    =MESSAGEBOX("含有W1标志情况，请检查BJ后，再报送！",64)
ENDIF
...

[此贴子已经被作者于2023-9-11 09:53编辑过]

已解决，谢谢。