有一位老师教我按以下方法进行，但执行到“Do While Not Eof()”时，程序错误提示“嵌套错误”。请教各位老师如何才能把A表中的A1字段值成批导入B表中B1字段？
Select b
Use D:\B
Go Top
Select a
Use D:\A
Do While Not Eof()
   Select b
   Append Blank
   Replace b.B1 With a.A1
   Select a
   Skip
End Do
Close All

Select b
Use D:\B
Go Top
Select a
Use D:\A
Do While Not Eof()
   Select b
   Append Blank
   Replace b.B1 With a.A1
   Select a
   Skip
EndDo &&删除中间的空格试试
Close All

可以简化一点，几个sele 句子可以不要：
Use D:\A
Use D:\B in 0
Do While Not Eof()
   Append Blank in B
   Replace b.B1 With a.A1 in B
   SKIP
ENDDO
CLOSE ALL

是否还能简化一点
Use D:\A
Scan
  insert into b(b1) values(a1)
endscan
CLOSE ALL