请教下为什么我用了2个循环后提示错误了

zhaowei78 · 发表于 2013-9-25 14:49:00

源码如下，提示数据和数组类型不匹配

[e]
.版本 2
.支持库 iext

.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 a, 图形按钮
.局部变量 ipi, 整数型
.局部变量 dfre, 透明标签
.局部变量 cw, 整数型
.局部变量 b, 整数型

图形按钮1.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮1”, )
图形按钮2.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮2”, )
图形按钮3.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮3”, )
图形按钮4.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮4”, )
图形按钮5.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮5”, )
图形按钮6.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮6”, )
图形按钮7.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮7”, )
图形按钮8.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮8”, )
图形按钮9.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮9”, )
图形按钮10.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮10”, )
图形按钮11.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮11”, )
图形按钮12.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮12”, )
图形按钮13.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮13”, )
图形按钮14.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮14”, )
图形按钮15.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮15”, )
图形按钮16.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮16”, )
图形按钮17.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮17”, )
图形按钮18.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮18”, )
图形按钮19.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮19”, )
图形按钮20.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮20”, )
图形按钮21.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮21”, )
图形按钮22.标记＝读配置项 (INI_文件, “Soft_Config”, “图形按钮22”, )

透明标签1.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签1”, )
透明标签2.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签2”, )
透明标签3.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签3”, )
透明标签4.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签4”, )
透明标签5.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签5”, )
透明标签6.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签6”, )
透明标签7.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签7”, )
透明标签8.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签8”, )
透明标签9.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签9”, )
透明标签10.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签10”, )
透明标签11.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签11”, )
透明标签12.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签12”, )
透明标签13.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签13”, )
透明标签14.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签14”, )
透明标签15.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签15”, )
透明标签16.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签16”, )
透明标签17.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签17”, )
透明标签18.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签18”, )
透明标签19.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签19”, )
透明标签20.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签20”, )
透明标签21.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签21”, )
透明标签22.标记＝读配置项 (INI_文件, “Soft_Config”, “透明标签22”, )

.计次循环首 (22, i)
a ＝取标记组件 (i)

.如果 (i ＝ 1 或 i ＝ 2 或 i ＝ 3 或 i ＝ 4 或 i ＝ 5 或 i ＝ 6 或 i ＝ 7 或 i ＝ 8 或 i ＝ 9 或 i ＝ 10 或 i ＝ 11 或 i ＝ 12 或 i ＝ 13 或 i ＝ 14 或 i ＝ 15 或 i ＝ 16 或 i ＝ 17 或 i ＝ 18 或 i ＝ 19 或 i ＝ 21 或 i ＝ 22)
a.左边＝ 13
a.顶边＝ b ＋ 10
b ＝ b ＋ 70

.否则

.如果结束

.计次循环尾 ()
.计次循环首 (22, ipi)
dfre ＝取标记组件 (ipi)

.如果 (ipi ＝ 1 或 ipi ＝ 2 或 ipi ＝ 3 或 ipi ＝ 4 或 ipi ＝ 5 或 ipi ＝ 6 或 ipi ＝ 7 或 ipi ＝ 8 或 ipi ＝ 9 或 ipi ＝ 10 或 ipi ＝ 11 或 ipi ＝ 12 或 ipi ＝ 13 或 ipi ＝ 14 或 ipi ＝ 15 或 ipi ＝ 16 或 ipi ＝ 17 或 ipi ＝ 18 或 ipi ＝ 19 或 ipi ＝ 21 或 ipi ＝ 22)
dfre.左边＝ (图片框26.宽度－ dfre.宽度) ÷ 2 ＋ 3
dfre.顶边＝ cw ＋ 47 ＋ 15
cw ＝ cw ＋ 70
.否则

.如果结束

.计次循环尾 ()

[/e]