请教一个VFP问题,一个循环语句
Max, 2018-11-10 09:10:08 目前刚开始学VFP,还是小白。有个作业,从A文件a字段中读取字符写入B文件b字段中,(B文件一个字段c(2))但是不知道哪里出问题了,只读取了a字段每行的第一个字……
想要的结果是读取a字段每个字。
CLEAR
SELECT 1
USE c:\users\max\desktop\A.dbf
SELECT 2
USE C:\Users\Max\Desktop\B.dbf
SELECT 1
SCAN
a1= TRIM(a)
a2=SUBSTR(ALLTRIM(a1),1,2)
a1=SUBSTR(a1,3,50)
SELECT 2
INSERT blank
REPLACE b WITH (a2)
IF LEN(a1)< 3
SELECT 2
INSERT blank
REPLACE b WITH a1
SELECT 1
SKIP
ENDIF
ENDSCAN