以下代码如何实现随机转动

风雨中的纸飞机

以下代码如何实现随机转动，求大大解惑。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
转盘	图片框	3
边框	整数型
步长	逻辑型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
_按钮1_被单击

时钟1.时钟周期 ＝ 200
转盘 [1] ＝ 图片框1
转盘 [2] ＝ 图片框2
转盘 [3] ＝ 图片框3
步长 ＝ 真

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
上一个	整数型

判断 (步长)
边框 ＝ 边框 ＋ 1
判断 (边框 ＝ 4)
边框 ＝ 1


上一个 ＝ 边框 － 1
判断 (上一个 ＝ 0)
上一个 ＝ 3







转盘 [边框].边框 ＝ 4
转盘 [上一个].边框 ＝ 0

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 转盘, 图片框, , "3"<br /> .程序集变量 边框, 整数型<br /> .程序集变量 步长, 逻辑型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 时钟1.时钟周期 ＝ 200<br /> <br /> <br /> 转盘 [1] ＝ 图片框1<br /> 转盘 [2] ＝ 图片框2<br /> 转盘 [3] ＝ 图片框3<br /> <br /> 步长 ＝ 真<br /> <br /> <br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 上一个, 整数型<br /> <br /> <br /> .判断开始 (步长)<br />     边框 ＝ 边框 ＋ 1<br />     .判断开始 (边框 ＝ 4)<br />         边框 ＝ 1<br />     .默认<br /> <br />     .判断结束<br />     上一个 ＝ 边框 － 1<br />     .判断开始 (上一个 ＝ 0)<br />         上一个 ＝ 3<br /> <br />     .默认<br /> <br />     .判断结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> <br /> 转盘 [边框].边框 ＝ 4<br /> 转盘 [上一个].边框 ＝ 0

王摇摆

感谢分享

风雨中的纸飞机

自己解决了

风雨中的纸飞机

jiesansi 发表于 2022-4-18 11:26
调用格式： 〈整数型〉 取随机数 （［整数型 欲取随机数的最小值］，［整数型 欲取随机数的最大值］）  ...

谢谢，但不会求指教

风雨中的纸飞机

z884616747 发表于 2022-4-18 10:24
你这是做抽奖？

嗯嗯，求指教

jiesansi

    调用格式： 〈整数型〉 取随机数 （［整数型 欲取随机数的最小值］，［整数型 欲取随机数的最大值］） - 系统核心支持库->算术运算     英文名称：rnd     返回一个指定范围内的随机数值。在使用本命令取一系列的随机数之前，应该先使用“置随机数种子”命令为随机数生成器初始化一个种子值。本命令为初级命令。     参数<1>的名称为“欲取随机数的最小值”，类型为“整数型（int）”，可以被省略。参数必须大于或等于零。本参数如果被省略，默认为 0 。     参数<2>的名称为“欲取随机数的最大值”，类型为“整数型（int）”，可以被省略。参数必须大于或等于零。本参数如果被省略，默认为无限。      操作系统需求： Windows、Linux

z884616747

你这是做抽奖？