| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1656 人关注过本帖
标题:求解字符对比的问题,同样的数据不同的结果(数据已提供)
只看楼主 加入收藏
pjtyzyq
Rank: 4
等 级:业余侠客
威 望:6
帖 子:232
专家分:240
注 册:2016-2-14
收藏
得分:0 
设为off时,比对时按顺序从左到右,各取一个字符比对,一样就继续. 当某个字符串取完了就不继续了, 哪怕另一个字符串仍有字符也算相等。
你的两个变量长度都是50,当比较到7位时,f1.lxfs的第7位是3,y1.lxfs的第7位是空格,所以结果位F
2021-08-22 14:13
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
以下是引用hjlali在2021-8-22 13:01:31的发言:


我前面说过了,两个表中lxfs字段的长度和属性都是一样的,你们自己可以看看表结构。
为什么结果还是.F.呢?

长度一样,那从左到右各字符也一样吗?


2021-08-22 14:25
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
这样看看字符串的比较,设3种结果标志:0,1,-1(相等,大于,小于)
程序代码:
?strcmp("123","123")
?strcmp("1234","123")
?strcmp("123","1234")
?strcmp("1235","1234")
?strcmp("1234","1235")

FUNCTION strcmp(s1, s2)
    i = 1
    DO WHILE (i<LEN(s1) OR i<LEN(s2)) AND ASC(SUBSTR(s1,i,1))==ASC(SUBSTR(s2,i,1))
        i = i + 1
    ENDDO
    ret = ASC(SUBSTR(s1,i,1)) - ASC(SUBSTR(s2,i,1))
    RETURN IIF(ret==0,0,IIF(ret>0,1,-1))
ENDFOR


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

2021-08-22 16:22
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
再看看字符串比较中的包含和被包含,设4种结果标志:0,1,2,3(相等,包含,被包含,不可比)
PS:示例只谈谈思路,没严格测试
程序代码:
?strinc("123","123")
?strinc("1234","123")
?strinc("123","1234")
?strinc("1235","1234")

FUNCTION strinc(s1, s2)
    IF AT(s2,s1)==1
        RETURN IIF(LEN(s1)==LEN(s2),0,1)
    ENDIF
    RETURN IIF(AT(s1,s2)==1,2,3)
ENDFUN
2021-08-22 17:07
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:3 
回复 6楼 hjlali
? '1767163'='176716'   && .t.
? '1767163'='176716 '  && 后面有个空格 .f.
问题在这里了,VFP表,有的系统,比如WIN7,字符字段的,当字符不够长度时,会在后面补空格

CREATE CURSOR f1(xm c(10),lxfs c(10))
INSERT INTO f1(xm,lxfs) VALUES ('a1','1767163')
CREATE CURSOR y1(xm c(10),lxfs c(10))
INSERT INTO y1(xm,lxfs) VALUES ('a1','176716')
?f1.lxfs=y1.lxfs  && .F.
?ALLTRIM(f1.lxfs)=ALLTRIM(y1.lxfs) && .T.
?LEN(y1.lxfs)  && 10,不是6
你问的问题,就在这里,自动补空格
2021-08-23 08:44
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
改成这样,就不会自动补空格
CREATE CURSOR f1(xm c(10),lxfs v(10))
INSERT INTO f1(xm,lxfs) VALUES ('a1','1767163')
CREATE CURSOR y1(xm c(10),lxfs v(10))
INSERT INTO y1(xm,lxfs) VALUES ('a1','176716')
?f1.lxfs=y1.lxfs
2021-08-23 08:46
hjlali
Rank: 1
等 级:新手上路
帖 子:48
专家分:0
注 册:2008-12-23
收藏
得分:0 
以下是引用mywisdom88在2021-8-23 08:46:30的发言:

改成这样,就不会自动补空格
CREATE CURSOR f1(xm c(10),lxfs v(10))
INSERT INTO f1(xm,lxfs) VALUES ('a1','1767163')
CREATE CURSOR y1(xm c(10),lxfs v(10))
INSERT INTO y1(xm,lxfs) VALUES ('a1','176716')
?f1.lxfs=y1.lxfs

谢谢!我之前以为自动添加的空格不会加入计算,看来是我理解错了!顺便请问V(10)是定义的什么类型?

喜欢VFP,就要学懂弄通!
2021-08-26 21:08
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
可变字符类型

坚守VFP最后的阵地
2021-08-26 21:43
hjlali
Rank: 1
等 级:新手上路
帖 子:48
专家分:0
注 册:2008-12-23
收藏
得分:0 
以下是引用sdta在2021-8-26 21:43:18的发言:

可变字符类型

见多识广,都是高手啊!

喜欢VFP,就要学懂弄通!
2021-08-26 22:19
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:0 
? '1767163'='176716'  &&结果是.T.
? alltrim(f1.lxfs)=alltrim(y1.lxfs)    &&看看结果是啥?
2021-08-27 19:46
快速回复:求解字符对比的问题,同样的数据不同的结果(数据已提供)
数据加载中...
 
   



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

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