有一位老师教我按以下方法进行，但执行到“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