怎么让随机数在编辑框内换行及停止呢

那个谁

.版本 2
.支持库 spec
.程序集 窗口程序集1
.程序集变量 i, 整数型
.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击, , , 开始
置随机数种子 ()
.计次循环首 (30, i)
    编辑框1.内容 ＝ 到文本 (取随机数 (1, 100))
    延迟 (500)
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 停止
'怎么让程序停止呢？

现在是可以循环30次，但都是在第一行上来回的变化，怎么让它循环一次就换行显示呢？
点停止按钮的时候怎么让程序停止下来呢？

爱家的小懒虫

方法有很多。根据你的举例，我在上面的回答中已经说过了。
用逻辑变量控制。
还有时钟控制。
还有总线程控制。

是程序全部停止的话。应该啊用总线程。通过强制结束总线程 来结束程序。{:3_230:}

爱家的小懒虫

{:3_244:}{:3_245:}没理解

huajiesoft

您说的是什么呢  汗~~

那个谁

爱家的小懒虫 发表于 2011-11-7 12:39
没理解

重新编辑了一下.

爱家的小懒虫

循环中加个逻辑变量。 判断下。
比如 ：
开始=取反（开始）
.计次循环首 (30, i)
如果真（开始）   
编辑框1.内容 ＝ 到文本 (取随机数 (1, 100))
    延迟 (500)
.计次循环尾 ()

爱家的小懒虫

换行的话
编辑框1.内容 ＝编辑框1.内容+ 到文本 (取随机数 (1, 100))+#换行符

或者用 编辑框1.加入文本（ 到文本 (取随机数 (1, 100))）

那个谁

爱家的小懒虫 发表于 2011-11-7 12:45
换行的话
编辑框1.内容 ＝编辑框1.内容+ 到文本 (取随机数 (1, 100))+#换行符

换行可以了，不过怎么让程序停止呢？当然不只是针对这个循环，或者是其他程序，当点停止的时候，让软件停止运行

大头佛

先试试线程操作，看能不能挂起运行，不行的话用上面的代码！由于你循环内的是取随机数比较特殊，上面的代码应该可以实现

帆帆

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

.子程序 _按钮1_被单击, , , 开始
.参数 i, 整数型

置随机数种子 ()
.计次循环首 (30, i)
    编辑框1.加入文本 (到文本 (取随机数 (1, 100)) ＋ #换行符)

    延迟 (500)
.计次循环尾 ()
[/e]