如果判断字符串中某一位是字符还是数值
遇到一个问题,需要判断一个字符串中的任意一位是字符还是数值,弄了半天也不行,请大家给些思路。
2012-12-16 20:01

2012-12-16 20:09
2012-12-16 20:15

2012-12-16 20:31
2012-12-16 20:43
程序代码: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
2012-12-16 20:45
2012-12-16 21:04
2012-12-16 21:29
2012-12-16 21:38
2012-12-17 12:03