|
楼主 |
发表于 2012-10-3 14:59:46
|
显示全部楼层
功能 逻辑型 双色球_点击()
整型 红1,红2,红3,红4,红5,红6,蓝1
字符型 红1字符串,红2字符串,红3字符串,红4字符串,红5字符串,红6字符串,蓝1字符串
线程.开启("彩票选号器.选号","我是参数")||我不知道怎么填我的参数。
返回 真
功能结束
功能 逻辑型 选号()
整型 红1,红2,红3,红4,红5,红6,蓝1
字符型 红1字符串,红2字符串,红3字符串,红4字符串,红5字符串,红6字符串,蓝1字符串
循环(真)
红1=辅助.随机数(1,33)
如果 (红1==红2)||(红1==红3)||(红1==红4)||(红1==红5)||(红1==红6)
继续
否则
红1字符串=转换.整型转字符型(红1)
编辑框.设置文本("编辑框0",红1字符串)
如果结束
循环结束
循环(真)
红2=辅助.随机数(1,33)
如果 (红2==红1)||(红2==红3)||(红2==红4)||(红2==红5)||(红2==红6)
继续
否则
红2字符串=转换.整型转字符型(红2)
编辑框.设置文本("编辑框1",红2字符串)
如果结束
循环结束
循环(真)
红3=辅助.随机数(1,33)
如果 (红3==红1)||(红3==红2)||(红3==红4)||(红3==红5)||(红3==红6)
继续
否则
红3字符串=转换.整型转字符型(红3)
编辑框.设置文本("编辑框2",红3字符串)
如果结束
循环结束
红4………………
红5………………
循环(真)
红6=辅助.随机数(1,33)
如果 (红6==红1)||(红6==红2)||(红6==红3)||(红6==红4)||(红6==红5)
继续
否则
红6字符串=转换.整型转字符型(红6)
编辑框.设置文本("编辑框5",红6字符串)
如果结束
循环结束
蓝1=辅助.随机数(1,16)
蓝1字符串=转换.整型转字符型(蓝1)
编辑框.设置文本("编辑框6",蓝1字符串)
返回 真
//函数返回语句
功能结束
大神们,我除了一个打红色字体的"我是参数",我不知道怎么填而外,我还发现个问题。
那就是数字一直在第一个号码(也就是红1)一直不停的循环。
求解。
|
|