循环变量如何换转 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 循环变量如何换转

标题：循环变量如何换转

只看楼主

ryubo888

等　级：新手上路
帖　子：7
专家分：0
注　册：2014-7-3
结帖率：100%

楼主

已结贴√ 问题点数：10 回复次数：6

循环变量如何换转

i=1
DO WHILE i<32
thisform.pageframe1.Page2.Grid1.Column+&STR(i).+.readonly=.T. &&**1-31只读
i=i+1
ENDDO
以上代码错误哪里？请大神帮忙，谢谢！！！

搜索更多相关主题的帖子: 循环　变量　只读　代码　错误　

2019-05-10 20:07

schtg

来　自：https://t.me/pump_upp
等　级：贵宾
威　望：67
帖　子：1355
专家分：2534
注　册：2012-2-29

第 2 楼

得分:4

我不方便测试，请你自己试一下，可否？
i=1
DO WHILE i<32
   j=alltrim(str(i))
   thisform.pageframe1.Page2.Grid1.Column&j..readonly=.T.     &&**1-31只读
   i=i+1
ENDDO

2019-05-10 20:20

ryubo888

等　级：新手上路
帖　子：7
专家分：0
注　册：2014-7-3

第 3 楼

得分:0

回复 2楼 schtg

i=1
DO WHILE i<32
  abc="Column"+TRANSFORM(I)
  thisform.pageframe1.Page2.Grid1.&abc..readonly=.T.     &&**分1-31只读
  i=i+1
ENDDO

2019-05-10 20:34

sdta

来　自：江苏省连云港市
等　级：版主
威　望：323
帖　子：9621
专家分：26174
注　册：2012-2-5

第 4 楼

得分:5

不需要转换变量，直接用下面的代码就可以了，注意是Columns
i=1
DO WHILE i<32
thisform.pageframe1.Page2.Grid1.Columns(i).readonly=.T. &&**1-31只读
i=i+1
ENDDO

坚守VFP最后的阵地

2019-05-10 20:34

sdta

来　自：江苏省连云港市
等　级：版主
威　望：323
帖　子：9621
专家分：26174
注　册：2012-2-5

第 5 楼

得分:1

或者
for i = 1 to 31
thisform.pageframe1.Page2.Grid1.Columns(i).readonly=.T.
endfor

坚守VFP最后的阵地

2019-05-10 20:36

schtg

来　自：https://t.me/pump_upp
等　级：贵宾
威　望：67
帖　子：1355
专家分：2534
注　册：2012-2-29

第 6 楼

得分:0

@sdta，你的方法最好，谢谢！

2019-05-11 06:12

hu9jj

来　自：红土地
等　级：贵宾
威　望：396
帖　子：11713
专家分：43267
注　册：2006-5-13

第 7 楼

得分:0

1楼是用字符方式，在从数值转换为字符时需要注意消除空格；4楼介绍的是用列方式，只需要直接使用数值就行。

活到老，学到老！ http://www. E-mail:hu-jj@

2019-05-14 10:34

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