取随机 标签显示 取的随机

iphone

千年 发表于 2012-4-3 11:08
就这个了，复制过去，就ok了

我的意思是说：你启动程序  你勾选几项   在点按钮 在勾选的几项 取 一个随机 一项  标签显示 IP和端口

千年

213.zip (1.96 KB, 下载次数: 6)

2012-4-3 11:36 上传

点击文件名下载附件

如果还不是你想要的，那就再拜托你说清楚一下。

善的圆

远程解决了

qsmadmin

问题描述复杂了..

哓哓

楼主的问题总是连续性的，我经历过，按他的求助解决了他却说不是这个问题，然后再继续提问另一个问题，并且这个问题是在上一求助解决的前提下继续的，我表示无语。。。。。

千年

千年 发表于 2012-4-3 10:14
我这个应该算是比较好的，O(∩_∩)O~呵呵，请楼主查收，满意后给最佳！

还没吃东西，吃点东西去，撤

1. .版本 2
   
2. .支持库 iext
   
3. 
   
4. .子程序 _按钮2_被单击
   
5. .局部变量 i, 整数型
   
6. .局部变量 整数数组, 整数型, , "0"
   
7. .局部变量 随机个数, 整数型
   
8. .局部变量 随机数, 整数型
   
9. .局部变量 bq, 文本型
   
10. .局部变量 a
    
11. 
    
12. .计次循环首 (超级列表框2.取表项数 (), i)
    
13. 加入成员 (整数数组, i)
    
14. 超级列表框2.置状态图片 (i － 1, 0) ' 先清空以前选中的表项
    
15. .计次循环尾 ()
    
16. 置随机数种子 ()
    
17. 随机个数 ＝ 取随机数 (1, 取数组成员数 (整数数组)) ' 随机选中多少个
    
18. .计次循环首 (随机个数, i)
    
19. 随机数 ＝ 取随机数 (1, 取数组成员数 (整数数组)) ' 从超级列表框中随机一个数
    
20. a ＝ 整数数组 [随机数]
    
21. bq ＝ bq ＋ 到文本 (a) ＋ “,”
    
22. 删除成员 (整数数组, 随机数, 1)
    
23. 超级列表框2.置状态图片 (a － 1, 1)
    
24. ' 延迟 (200)
    
25. .计次循环尾 ()
    
26. 标签1.标题 ＝ bq
    

复制代码

刚刚有提醒,说是被选最佳了,然后我看了看源码,有点问题,所以修改后,再发上来了