如果判断字符串中某一位是字符还是数值
遇到一个问题,需要判断一个字符串中的任意一位是字符还是数值,弄了半天也不行,请大家给些思路。
程序代码:CLEAR
LOCAL a as String
Accept "请输入一个字符串" To a
For i = 1 To Len(a)
b=Substr(a,i,1)
Do Case
Case Isdigit(b)=.T.
?a+"的第"+ Transform(i)+"位是数字"
Case Isalpha(b)=.T.
?a+"的第"+ Transform(i)+"位是字母"
Otherwise
?a+"的第"+ Transform(i)+"位是数字字母外的字符"
Endcase
Endfor