读书人

在VFP中怎么遍历所有字段

发布时间: 2012-04-26 14:01:31 作者: rapoo

在VFP中如何遍历所有字段?
SET TALK OFF
CLOSE ALL
SELECT a
USE 学生表
count1=AFIELDS(arr1)
FOR nCount = 1 TO count1
GO top
IF (upper(arr1(nCount,2))=="N")
DO WHILE NOT EOF()
if ((arr1(nCount,1))==0) **出错处
REPLACE (arr1(nCount,1) WITH 100
endif
Skip 1 && 下移一条记录
ENDDO
endif
ENDFOR

运行时在if ((arr1(nCount,1))==0) 这句出错,原因是数据类型不匹配,因为用arr1(nCount,1)读出的是字段名,也就是一个字符串,我想读出这个字段中的值来,应该如何更改

[解决办法]
if (&arr1(nCount,1))==0
REPLACE (arr1(nCount,1)) WITH 100
[解决办法]
不是吧,提示什么,我已经测试过,没有问题

读书人网 >VFP

热点推荐