动态创建组件的问题。。。

小浪在天朝

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
标签组	标签		0
标签	标签
x标	整数型
y标	整数型
间隔	整数型
i	整数型

_启动窗口.底色 ＝ 取颜色值 (194, 184, 169)
' 标签1.背景颜色 ＝ 取颜色值 (204, 192, 178)
计次循环首 (4, x标)
复制窗口组件 (标签1, 标签)
加入成员 (标签组, 标签)
计次循环首 (4, y标)
i ＝ (x标 － 1) × 4 ＋ y标  ' 把x标和y标作为计算公式的数组下标
i ＝ i ＋ 1
标签组 [i － 1].标题 ＝ 到文本 (x标) ＋ 到文本 (y标)
如果 (i ％ 4 ＝ 0)
标签组 [i].顶边 ＝ 24



标签组 [i].顶边 ＝ 24 ��� (标签1.高度 ＋ 10) × i

计次循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 标签组, 标签, , "0"<br /> .局部变量 标签, 标签<br /> .局部变量 x标, 整数型<br /> .局部变量 y标, 整数型<br /> .局部变量 间隔, 整数型<br /> .局部变量 i, 整数型<br /> <br /> _启动窗口.底色 ＝ 取颜色值 (194, 184, 169)<br /> ' 标签1.背景颜色 ＝ 取颜色值 (204, 192, 178)<br /> <br /> <br /> .计次循环首 (4, x标)<br />     复制窗口组件 (标签1, 标签)<br />     加入成员 (标签组, 标签)<br /> <br />     .计次循环首 (4, y标)<br />         i ＝ (x标 － 1) × 4 ＋ y标  ' 把x标和y标作为计算公式的数组下标<br />         i ＝ i ＋ 1<br /> <br />         标签组 [i － 1].标题 ＝ 到文本 (x标) ＋ 到文本 (y标)<br />         .如果 (i ％ 4 ＝ 0)<br />             标签组 <i>.顶边 ＝ 24<br /> <br />         .否则<br /> <br />             标签组 <i>.顶边 ＝ 24 ＋ (标签1.高度 ＋ 10) × i<br /> <br />         .如果结束<br /> <br /> <br /> <br />     .计次循环尾 ()<br /> <br /> <br /> <br /> .计次循环尾 ()

代码运行，老是出现数组问题。。。。

请问如何解决？我要实现的是附件demo.exe的程序

猥琐小胖子

aaa.rar (1.26 KB, 下载次数: 10)

2015-8-18 02:34 上传

点击文件名下载附件

剩下我de孩子气

http://www.5a5x.com/06/201008/08061121.html