【NO.0036】超级列表框的使用及取随机数

大肥 · 发表于 2011-11-5 17:36:42

{:3_227:}{:3_227:}{:3_227:}{:3_227:}{:3_227:}{:3_227:}{:3_227:}{:3_227:}

754372967 · 发表于 2011-11-5 17:39:26

{:3_227:}用模块就很简单、不用模块我竟然不会写…… - -555！！看来我还是学习去··

小米粒 · 发表于 2011-11-5 18:23:11

菜鸟奉上{:3_244:}，希望Lz多多指点

尘莫央 · 发表于 2011-11-5 18:37:25

{:3_226:}
难得头一次交作业,
很少碰随机,只能用最蠢的方法交作业了

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

.程序集窗口程序集1

.子程序 _按钮1_被单击
.局部变量 M, 文本型
.局部变量 A, 文本型
.局部变量 N1, 整数型
.局部变量 N2, 整数型
.局部变量 S, 文本型
.局部变量 X, 整数型, , "62"
.局部变量临时数组, 文本型, , "1000"

置随机数种子 ()
X ＝ { 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122 }
.计次循环首 (1000, N1)
M ＝ “”
N2 ＝ 0
.计次循环首 (取数组成员数 (临时数组), N2)
      .如果真 (M ＝临时数组 [N2])
         .计次循环首 (取随机数 (5, 10), )
            S ＝到文本 (到字节集 (X [取随机数 (1, 62)]))
            M ＝ M ＋ S
         .计次循环尾 ()
      .如果真结束

.计次循环尾 ()
编辑框1.内容＝ M ＋ “@qq.com” ＋ #换行符＋编辑框1.内容
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (N1 － 1, 0, M ＋ “@qq.com”)
.计次循环尾 ()[/e]

qq764520536 · 发表于 2011-11-5 18:45:02

作业.rar (1.98 KB, 下载次数: 2)

数据压缩 · 发表于 2011-11-5 19:07:03

例程.zip (1.45 KB, 下载次数: 6)

一棒过克 · 发表于 2011-11-5 19:12:06

本帖最后由一棒过克于 2011-11-5 22:31 编辑

我也来学做作业

作业：超级列表框的使用及取随机数(修改).rar (2.15 KB, 下载次数: 3)

lvpb5252 · 发表于 2011-11-5 19:13:36

字数字数字

清清淡淡 · 发表于 2011-11-5 19:47:20

{:3_244:}我来了

初音未来丶 · 发表于 2011-11-5 20:06:03

本帖最后由 1467409408 于 2011-11-5 20:07 编辑

做好了，代码有点乱，请不要介意哈

作业.rar (1.58 KB, 下载次数: 2)

		自动登录	找回密码
密码			注册

[已结束] 【NO.0036】超级列表框的使用及取随机数

点评

评分

点评

评分

点评

评分

点评

评分

点评

评分

评分

评分

评分

评分