标题:给数组元素赋值
只看楼主
头脑风暴
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2018-9-23
结帖率:0
已结贴  问题点数:20 回复次数:6 
给数组元素赋值
请问怎么用编程给s(5,6)各数组元素赋值。如s(1,1)=11,s(1,2)=12,s(1,3)=13
搜索更多相关主题的帖子: 数组 元素 赋值 编程 
2018-09-23 14:08
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:10 
* 创建内存变量数组,所有元素的初始值为 .F.
Local S[5,6]
* 为数组元素赋值
S[1, 1] = 11
S[1, 2] = 12
S[1, 3] = 13
S[1, 4] = 14
S[1, 5] = 15
S[1, 6] = 16
......
S[5, 5] = 55
S[5, 6] = 56

坚守VFP最后的阵地
2018-09-23 14:53
头脑风暴
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2018-9-23
得分:0 
回复 2楼 sdta
大哥,用循环怎么写啊
2018-09-23 14:55
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
LOCAL S[5, 6]
FOR I = 1 TO 5
    FOR J = 1 TO 6
        S[I, J]= I * 10 + J
    ENDFOR
ENDFOR
LIST MEMORY LIKE S && 显示数组元素

坚守VFP最后的阵地
2018-09-23 15:03
头脑风暴
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2018-9-23
得分:0 
回复 4楼 sdta
感谢感谢
2018-09-23 15:14
红星二锅头
Rank: 8Rank: 8
等 级:贵宾
威 望:46
帖 子:491
专家分:754
注 册:2016-8-25
得分:10 
可以用一次循环完成

Clear
Local S[5, 6]
For I = 0 To 29
    * S(I+1) = 10 + I  && 假设数组为连续数
    S(I+1) = Int((I/6) + 1)*10 + Mod(I, 6) + 1  && 假设数组为:11/12/13,,,21/22/23,,,
Endfor
Display Memory Like S && 显示数组元素

[此贴子已经被作者于2018-9-23 17:22编辑过]


团队红星二锅头,队长王猛,领队李冲,顾问杨伟,副队张挺,外联马彪,内勤韩秀,人事顾闯,财务赵魁,后勤周强
2018-09-23 17:16
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
以下是引用红星二锅头在2018-9-23 17:16:41的发言:

可以用一次循环完成

Clear
Local S[5, 6]
For I = 0 To 29
    * S(I+1) = 10 + I  && 假设数组为连续数
    S(I+1) = Int((I/6) + 1)*10 + Mod(I, 6) + 1  && 假设数组为:11/12/13,,,21/22/23,,,
Endfor
Display Memory Like S && 显示数组元素

赵老师雄风不减当年

坚守VFP最后的阵地
2021-03-27 06:36



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




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

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