clear
cstring="visualfoxpro"
nresult=0
m=len(cstring)
for n=1 to m
    c=substr(cstring,n,1)
    if!between(asc(c),asc("A"),asc("Z"))
          loop
    endif
    nresult=nresult+1
end for
?nresult                                      给的答案是3
                     可是为什么呢？？？？？？？？求高人快快回复我~

我又检查了一遍，我没有写错啊，后面两个确实是大写。
这个是09年春二级vfp笔试试卷第22题。。。。。。。。。答案确实是3        

啊····为什么啊·····

额··我有点笨，，，还是不太明白，，嘿嘿。能具体点吗？拜托。。

是不是答案给的是错的。应该是2

是书上的

好的吧，这个要不要给分啊！可是怎么给你分啊，我还不太会用，不过很感谢你！可以加你为好友吗？