统计输入的一串字符中大小写字母,数字,其他的个数的代码，要是scx文件类型的代码。
下面是我写的
a=0
b=0
c=0
d=0
i=1
do while .T.
   if i<=len(x)
      y=subs(x,i,1)
      do case
         case asc(y)>=65 and asc(y)<=90
              a=a+1
         case asc(y)>=97 and asc(y)<=122
              b=b+1
         case asc(y)>=48 and asc(y)<=57
              c=c+1
         case asc(y)<48 and asc(y)>122
              d=d+1
      endcase
      else
      exit
    endif
enddo
thisform.label6.caption=str(a)
thisform.label7.caption=str(b)
thisform.label8.caption=str(c)
thisform.label9.caption=str(d)

就是运行的时候，一直不能出结果，然后整个vfp就卡到

第六行那个是什么意思

成功了，谢谢，谢谢！