标题:请教一个字符串是否包含?或?
只看楼主
wxzd123
Rank: 2
等 级:论坛游民
帖 子:238
专家分:43
注 册:2012-9-6
结帖率:85.71%
已结贴  问题点数:20 回复次数:8 
请教一个字符串是否包含?或?
C='ab?j' c='ks?n'  c='l?lj??' 可以这样
'?'$c or '?'$c  也可以AT('?',c)>1 or ATc('?',c)>1
有没有一个函数就可以?谢谢
搜索更多相关主题的帖子: 包含 是否 函数 字符串 
2023-05-05 09:31
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:4 
chrtranc() &&判断长度是否有变化
c='l?lj??'
if lenc(chrtranc(c, "??", space(0))) < lenc(c)
    ? "有?或?"
endif




[此贴子已经被作者于2023-5-5 10:15编辑过]


坚守VFP最后的阵地
2023-05-05 10:12
csyx
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:29
帖 子:484
专家分:1827
注 册:2018-3-13
得分:4 
如果仅就处理全/半角问号,用 '?'$c or '?'$c 就是最佳方案了,速度最快

其他情况,可考虑先把全角都转成半角,或者半角转成全角,再判断:
? '?' $ strconv('半角问号?', 1)    && 转成全角字符判断
? '?' $ strconv('全角问号?', 2)    && 转成半角字符判断


[此贴子已经被作者于2023-5-5 11:19编辑过]

2023-05-05 11:16
foxfans
Rank: 4
等 级:贵宾
威 望:11
帖 子:90
专家分:278
注 册:2021-10-23
得分:4 
if ALINES(_tmp,[l?lj??],2,"?","?")>1
  ?"YES"
endif
2023-05-05 11:19
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:54
帖 子:802
专家分:1914
注 册:2015-12-30
得分:4 
以下是引用sdta在2023-5-5 10:12:59的发言:

chrtranc() &&判断长度是否有变化
c='l?lj??'
if lenc(chrtranc(c, "??", space(0))) < lenc(c)
    ? "有?或?"
endif

如果字符串是'l?lj??l j',长度也会不一样

4楼方法可行
2023-05-05 13:31
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:4 
测试:
1、完整的宽字符串
c = "#靠"
? AT("?",c) > 0    && .t.
? ATC("?",c) > 0   && .t.
? "?"$c    && .f.
? lenc(chrtranc(c, "?", space(0))) < lenc(c)  && .f.

2、不完整的宽字符串(从数据流截取的字符串,如存在半个宽字符)
c = SUBSTR("#靠",2)
? AT("?",c) > 0    && .t.
? ATC("?",c) > 0   && .t.
? "?"$c    && .t.
? lenc(chrtranc(c, "?", space(0))) < lenc(c)  && .t.
2023-05-05 14:52
wxzd123
Rank: 2
等 级:论坛游民
帖 子:238
专家分:43
注 册:2012-9-6
得分:0 
谢谢各位老师指点,但ALINES(_tmp,[l?lj??],2,"?","?")没明白后面,2,"?","?"参数作用?
2023-05-08 09:51
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 

坚守VFP最后的阵地
2023-05-08 10:48
wxzd123
Rank: 2
等 级:论坛游民
帖 子:238
专家分:43
注 册:2012-9-6
得分:0 
谢谢
2023-05-08 14:42



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-512104-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.053953 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved