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

微凉

作业.zip (2.37 KB, 下载次数: 3)

2011-11-5 20:06 上传

点击文件名下载附件

由于1000个太多了,显示慢,用100个演示,需要1000个请自行修改


补充内容 (2011-11-6 23:22):
你看清楚你作业写的内容,我是不是文盲了.你有说一定字母吗?

Death Knight H

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

2011-11-5 20:23 上传

点击文件名下载附件

daidwei369

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

.子程序 _按钮1_被单击, , , 编辑框2和3都不可视，就是为了比较和存值
.局部变量 取值文本, 文本型
.局部变量 文本数组, 文本型, , "0"
.局部变量 欲取之文本, 文本型
.局部变量 n1, 整数型
.局部变量 文本数组1, 文本型, , "0"
.局部变量 比较文本, 文本型

取值文本 ＝ “0,1,2,3,4,5,6,7,8,9,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z”
文本数组 ＝ 分割文本 (取值文本, “,”, )
.计次循环首 (1000, )
    .计次循环首 (取随机数 (5, 10), )
        欲取之文本 ＝ 取文本中间 (子文本替换 (取值文本, “,”, “”, , , 真), 取随机数 (1, 取数组成员数 (文本数组)), 1)
        编辑框2.加入文本 (欲取之文本)
    .计次循环尾 ()
    比较文本 ＝ 编辑框2.内容
    文本数组1 ＝ 分割文本 (编辑框3.内容, #换行符, )
    .计次循环首 (取数组成员数 (文本数组1), n1)
        比较文本 ＝ 文本数组1 [n1]
        编辑框2.内容 ＝ “”
        .计次循环首 (取随机数 (5, 10), )
            欲取之文本 ＝ 取文本中间 (子文本替换 (取值文本, “,”, “”, , , 真), 取随机数 (1, 取数组成员数 (文本数组)), 1)
            编辑框2.加入文本 (欲取之文本)
        .计次循环尾 ()
    .计次循环尾 ()
    .如果 (取文本左边 (比较文本, 1) ＝ “0”)  ' 为了使0不在第一位
        编辑框2.内容 ＝ “”
        .计次循环首 (取随机数 (5, 10), )
            欲取之文本 ＝ 取文本中间 (子文本替换 (取值文本, “,”, “”, , , 真), 取随机数 (1, 取数组成员数 (文本数组)), 1)
            编辑框2.加入文本 (欲取之文本)
        .计次循环尾 ()
    .否则

    .如果结束
    编辑框3.加入文本 (编辑框2.内容 ＋ #换行符)
    编辑框1.加入文本 (编辑框2.内容 ＋ “@qq.com” ＋ #换行符)
    编辑框2.内容 ＝ “”
.计次循环尾 ()

.子程序 _按钮2_被单击
.局部变量 文本数组, 文本型, , "0"
.局部变量 文本数组1, 文本型, , "0"
.局部变量 n1, 整数型

文本数组 ＝ 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (文本数组), n1)
    文本数组1 ＝ 分割文本 (文本数组 [n1], “@”, )
    超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, 文本数组1 [1])
.计次循环尾 ()
[/e]

leen007

新手联系.rar (1.42 KB, 下载次数: 2)

2011-11-5 21:06 上传

点击文件名下载附件
作业

落大雨

完成了..很简单呢

那个谁

留作业是干什么用的呢

吾爱编程

作业.rar (1.75 KB, 下载次数: 6)

2011-11-5 21:39 上传

点击文件名下载附件 {:3_244:}你在做我原来的工作哦 我没理由不捧场啊   不难 但是 有点费时间

317315458

精易作业.zip (2.23 KB, 下载次数: 1)

2011-11-5 22:21 上传

点击文件名下载附件 {:3_233:}
做了2个多小时。是不是笨了点。。。

lk1122

蛋疼，又忘记除掉后缀，改之。
aa.rar (1.95 KB, 下载次数: 2)

2011-11-6 09:34 上传

点击文件名下载附件

851978454

我也来凑哈热闹。。{:3_244:}{:3_244:}