|
|
发表于 2014-3-12 20:30:00
|
显示全部楼层
吉林省辽源市
[e]
.版本 2
.支持库 spec
.程序集 窗口程序集1
.程序集变量 数组a, 文本型, , "0"
.程序集变量 数组b, 文本型, , "0"
.程序集变量 数组c, 文本型, , "0"
.子程序 _按钮1_被单击
.局部变量 x, 整数型
.计次循环首 (90, x)
加入成员 (数组a, “a” + 到文本 (x × 1))
.计次循环尾 ()
.计次循环首 (50, x)
加入成员 (数组b, “b” + 到文本 (x × 10))
.计次循环尾 ()
.计次循环首 (80, x)
加入成员 (数组c, “c” + 到文本 (x × 100))
.计次循环尾 ()
.子程序 _按钮2_被单击
.局部变量 btxs, 变体型, , "0"
.局部变量 btx, 变体型
.局部变量 x, 整数型
btx.创建数组 (#文本型, 取数组成员数 (数组a)) ' 当然也可以存放整数,或其它类形
.计次循环首 (btx.取数组成员数 (), x)
btx.赋值 (数组a [x], x)
.计次循环尾 ()
加入成员 (btxs, btx)
调试输出 (btxs [1].取文本 (50))
'其它维如法炮制
' 这样做的好处是可以存放任何数据类型,并且可以随时的看到单维数组的成员数.
' 希望能帮到楼主[/e] |
|