当前位置: 代码迷 >> VFP >> 在VFP中怎么遍历所有字段
  详细解决方案

在VFP中怎么遍历所有字段

热度:8613   发布时间:2013-02-26 00:00:00.0
在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
------解决方案--------------------------------------------------------
不是吧,提示什么,我已经测试过,没有问题
  相关解决方案