[此贴子已经被作者于2006-6-25 14:34:26编辑过]
A=字符较多的串B=字符较少的串ISOK=.T.FOR I=1 TO LEN(B) IF !SUBSTR(B,I,1)$A ISOK=.F. EXIT ENDIFENDFOR?IIF(ISOK,"相等","不等")
[此贴子已经被作者于2006-6-26 8:43:52编辑过]