婉谢大侠nonono(null,null),接下来一个小问题

Question

command1_click()
use e:\eee\b1.dbf
browse
use
command2_click()
use e:\eee\b2.dbfbrowse
use
command3_click()use
select 0
use e:\eee\b1.dbf alias t1
select 0
use e:\eee\b2.dbf alias t2
select t1
go top
do while !eof()
    select t2
    locate for bill=t1.bill
    if found()
        select t1
        delete
    endif
    select t1
    skip
enddo
pack
use
use

Answer 1

1. “file in use”的错误
...
enddo
pack
use
use2个use试图关闭同一个表?select t1
use
select 21
use2. 其它错误use e:\eee\b1.dbf
browse
use这个use使得表b1在浏览的瞬间就关闭了, 实际上你什么都看不到.