| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 183 人关注过本帖
标题:按记录中的数字顺序用“-”连接输出一字符串
只看楼主 加入收藏
schtg
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:34
帖 子:784
专家分:1120
注 册:2012-2-29
结帖率:83.33%
  已结贴   问题点数:20  回复次数:8   
按记录中的数字顺序用“-”连接输出一字符串
请按照下表记录中数字顺序(斜线规则),用“-”连接成一字符串,二维数组把我整蒙啦,哈哈,请帮忙,谢谢!

附件: 您没有浏览附件的权限,请 登录注册
搜索更多相关主题的帖子: 顺序 连接 记录 字符串 数字 
2019-11-08 17:45
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:197
帖 子:7858
专家分:19475
注 册:2012-2-5
  得分:10 
最后的结果是什么

坚守VFP最后的阵地
2019-11-08 18:06
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:215
帖 子:6779
专家分:30048
注 册:2014-5-20
  得分:10 
结果是不是这样:
A1-A2-AB3-DD4-XY5-XR6-TW7-FF8-BT9-XZ10-QR11-RR12-AD13-BB14-NN15-WQ16-AT17-AS18-B19-B20
USE bb
COPY TO ARRAY arr
nLen = ALEN(arr)
DIMENSION arr[nLen,1]
s = TRIM(arr[1])
i = 7
DO WHILE i < nLen
    s = s + "-" + TRIM(arr[i])
    IF i%5 == 0
        i = i+1
        s = s + "-" + TRIM(arr[i])
    ENDIF
    i = i+6
    IF i > nLen
        i = i - nLen
    ENDIF
ENDDO
s = s + "-" + TRIM(arr[i])
? s
2019-11-08 21:31
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:197
帖 子:7858
专家分:19475
注 册:2012-2-5
  得分:0 
是不是这样的结果
附件: 您没有浏览附件的权限,请 登录注册

坚守VFP最后的阵地
2019-11-08 22:26
schtg
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:34
帖 子:784
专家分:1120
注 册:2012-2-29
  得分:0 
最后结果就是字符串中最后的数字从1开始,直到20结束。谢谢两位版主。
2019-11-09 00:07
schtg
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:34
帖 子:784
专家分:1120
注 册:2012-2-29
  得分:0 
吹水版主,你把这个关系理得很清楚,结果完全正确,我把脑袋整蒙都没有理清,非常感谢!

[此贴子已经被作者于2019-11-9 00:18编辑过]

2019-11-09 00:15
schtg
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:34
帖 子:784
专家分:1120
注 册:2012-2-29
  得分:0 
两位版主,若用二维数组获取这些值,好办么?谢谢!
2019-11-09 06:46
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:197
帖 子:7858
专家分:19475
注 册:2012-2-5
  得分:0 
CLEAR
SELECT * FROM bb INTO ARRAY aa
LOCAL bb[ALEN(aa)]
FOR i = 1 TO ALEN(aa, 1)
    FOR ii = 1 TO ALEN(aa, 2)
        nValue = VAL(CHRTRAN(aa[i, ii], "ABCDEFGHIJGLMNOPQRSTUVWXYZ", ""))
        bb[nValue] = TRIM(aa[i, ii])
    ENDFOR
ENDFOR  
cStr = bb[1]
FOR i = 2 TO ALEN(bb)
    cStr = cStr + "-" + bb[i]
ENDFOR
?cStr

坚守VFP最后的阵地
2019-11-09 12:20
schtg
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:34
帖 子:784
专家分:1120
注 册:2012-2-29
  得分:0 
非常感谢两位版主!结题!
2019-11-09 15:14
快速回复:按记录中的数字顺序用“-”连接输出一字符串
数据加载中...
 
   



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

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