标题:VFP如何查看数据逆序所在的位置
只看楼主
if先生
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2022-7-20
结帖率:50%
已结贴  问题点数:20 回复次数:11 
VFP如何查看数据逆序所在的位置
例如一个数据库,有一个字段为出货号为逆序,且相隔1000且2000一个循环,如何能准确的找出想要的出货号内容在第几条记录?
在有数据库的情况下能用LOCATE命令,但在没有数据库的情况下如何按数据库逆序的逻辑直接计算出(CF4588)位置?

例如数据库如下(附件中有数据库):
出货号
CF2000
CF1000
CF1999
CF999
CF1998
CF998
.
.
.
.
CF1001
CF1
-------------
CF4000
CF3000
CF3999
CF2999
.
.
CF3001
CF2001

CF.zip (310.04 KB)
搜索更多相关主题的帖子: 逆序 位置 VFP 数据库 数据 
2022-07-21 00:16
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:15 
VFP9代码
程序代码:
CLEAR
TEXT TO lcStr NOSHOW TEXTMERGE
CF2000
CF1000
CF1999
CF999
CF1998
CF998
CF1001
CF1
CF4600
CF4588
CF4400
CF4000
CF3000
CF3999
CF2999
CF3001
CF2001
ENDTEXT
ALINES(laStr, lcStr)
LIST MEMORY LIKE laStr
IF ASCAN(laStr, "CF4588") > 0
    ?ASCAN(laStr, "CF4588") && 返回 CF4588 所在的位置
ENDIF 

坚守VFP最后的阵地
2022-07-21 07:19
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
方法二

FOR ln = 1 TO ALEN(laStr, 1)
    IF laStr[ln] == "CF4588"
        ?ln
    ENDIF
ENDFOR

坚守VFP最后的阵地
2022-07-21 07:22
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:5 
“没有数据库”又要“按数据库逻辑”计算出(CF4588)位置.......不好理解??
到底“CF4588”存在哪里? 提供的是DBF,就不存在没有数据库的情况。
2022-07-21 08:36
csyx
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:29
帖 子:484
专家分:1827
注 册:2018-3-13
得分:0 


[此贴子已经被作者于2022-7-22 05:09编辑过]

2022-07-21 10:54
if先生
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2022-7-20
得分:0 
回复 4楼 吹水佬
已经研究出来了,用一个公式去计算,在有特定的数值情况正,计算出某个数所在的位置!
2022-07-23 02:26
if先生
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2022-7-20
得分:0 
回复 3楼 sdta
谢谢版主的支持,我新建了个表单,然后让用户输入某些特定的数值,然后直接用公式计算出位置了!
2022-07-23 02:27
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:190
帖 子:3125
专家分:8340
注 册:2015-3-25
得分:0 
要位置做什么,VFP不是有记录号吗
2022-07-23 08:24
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:0 
我也不理解为什么要知道位置,在数据库中只要能迅速准确的按关键字取得所需的数据就行了,何必关心数据存放的物理位置。

活到老,学到老! http://www. E-mail:hu-jj@
2022-07-23 08:40
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:0 
理解问题,可能是楼主没有说清楚“在没有数据库的情况”是什么情况?
2022-07-23 09:08



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




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

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