关于标签问题

可乐cl

一共有100个标签，比如我要改指定标签如 标签5  的背景色，如何写子程序通过传递参数5就更改标签5的背景色，传递其他数就更改  标签+其他数  的背景色？

b0y

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
标签数组	标签	20

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

变量名	类 型	静态	数组	备 注
i	整数型
y
x

' 如果是代码创建的标签 创建时加入数组
' 画的标签 就用寻找组件 加入数组
计次循环首 (20, i)
y ＝ (i － 1) ％ 6
x ＝ (i － 1) ＼ 6
复制窗口组件 (标签_模板, 标签数组 [i])
标签数组 [i].可视 ＝ 真
标签数组 [i].标题 ＝ “test” ＋ 到文本 (i)
标签数组 [i].移动 (y × 60 ＋ 4, x × 20 ＋ 4, 60, 20)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

改色 (到整数 (编辑框1.内容))

子程序名	返回值类型	公开	备 注
改色
参数名	类 型	参考	可空	数组	备 注
id

标签数组 [id].背景颜色 ＝ #红色

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 标签数组, 标签, , "20"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 y<br /> .局部变量 x<br /> <br /> ' 如果是代码创建的标签 创建时加入数组<br /> ' 画的标签 就用寻找组件 加入数组<br /> .计次循环首 (20, i)<br />     y ＝ (i － 1) ％ 6<br />     x ＝ (i － 1) ＼ 6<br />     复制窗口组件 (标签_模板, 标签数组 <i>)<br />     标签数组 <i>.可视 ＝ 真<br />     标签数组 <i>.标题 ＝ “test” ＋ 到文本 (i)<br />     标签数组 <i>.移动 (y × 60 ＋ 4, x × 20 ＋ 4, 60, 20)<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 改色 (到整数 (编辑框1.内容))<br /> <br /> .子程序 改色<br /> .参数 id<br /> <br /> 标签数组 [id].背景颜色 ＝ #红色

b0y

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
标签数组	标签	0

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

' 如果是代码创建的标签 创建时加入数组
' 画的标签 就用寻找组件 加入数组
加入成员 (标签数组, 标签1)
加入成员 (标签数组, 标签2)
加入成员 (标签数组, 标签3)
加入成员 (标签数组, 标签4)

子程序名	返回值类型	公开	备 注
_按钮1_被单击

改色 (3)

子程序名	返回值类型	公开	备 注
改色
参数名	类 型	参考	可空	数组	备 注
id

标签数组 [3].背景颜色 ＝ #红色

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 标签数组, 标签, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 如果是代码创建的标签 创建时加入数组<br /> ' 画的标签 就用寻找组件 加入数组<br /> 加入成员 (标签数组, 标签1)<br /> 加入成员 (标签数组, 标签2)<br /> 加入成员 (标签数组, 标签3)<br /> 加入成员 (标签数组, 标签4)<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 改色 (3)<br /> <br /> .子程序 改色<br /> .参数 id<br /> <br /> 标签数组 [3].背景颜色 ＝ #红色

补充内容 (2024-3-29 05:25):
标签数组 [id].背景颜色 ＝ #红色  这句改一下