请问下老师们VFP中有没有这样一个函数，可以检测一个字符串中是否包含数字，如“aaa66bbb”。需要说明这个数字的位置不规则，但不在字符串的头一个或最后一个。谢谢！

方法一：
aa= "aaa66bbb"
bb = CHRTRAN(aa, "0123456789", SPACE(0))
IF LEN(aa) = LEN(bb)
    ? "不包含数字"
ELSE
    ? "包含数字"
ENDIF

方法二：
ISDIGIT( ) 函数。具体用法看VFP9帮助文件中的相关内容。
用 FOR ENDFOR 逐字节判断字符串 AA 中 是否包含数字 0-9 。

方法三：
ASC() 函数。具体用法看VFP9帮助文件中的相关内容。
用 FOR ENDFOR 逐字节判断字符 AA 中的字符返回值是否在48-57之间。

收到的鲜花

• huasinstamps 于 2021-10-09 16:47 送鲜花  10朵  

多谢sdta老师！采用了方法一

以前一直用方法二，想找一种更简洁的方法，果然是有的。。。论坛上的前辈实在是太厉害了

我再简化了一点:
aa='aaa66bbb'
if aa=CHRTRAN(aa, "0123456789", '')
.....

[此贴子已经被作者于2021-9-30 22:31编辑过]

还可以用正则,办法很多的.

字符串较长和数据量大有考虑运行效率时可试试
DECLARE LONG strcspn IN msvcrt STRING@,STRING@
aa='aaa66bbb'
? strcspn(aa,"0123456789")<LEN(aa)

INT(MID(E131,1,5)*MID(E131,9,3)+0.5)
这是Excel中取文本中的数值函数，"E131"中放着文本，第二参数是从第几个字符开始取数，第三个参数是取几个字符。用它们可以完成文本中的数值计算。

if aa=CHRTRAN(aa, "0123456789", '')
上面这句，如果数字在字符串最后的话，结果会是.T.，改成下面这样就可以了
if aa==CHRTRAN(aa, "0123456789", '')

向高手学习