.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 程序集随机数, 整数型
.子程序 __启动窗口_创建完毕
置随机数种子 ()
程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)
.子程序 _按钮_确定_被单击
.' 如果 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
' 信息框 (“输入的数字太大了”, 0, , )
.否则
.' 如果 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
' 信息框 (“输入的数字太小了”, 0, , )
.否则
' 信息框 (“输入正确”, 0, , )
.如果结束
.如果结束
.判断开始 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
信息框 (“输入的数字太大了”, 0, , )
.判断 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
信息框 (“输入的数字太小了”, 0, , )
.默认
信息框 (“输入正确”, 0, , )
.判断结束
.子程序 _按钮_重新生成_被单击
程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)
编辑框_输入内容.内容 = “”
.程序集 窗口程序集_启动窗口
.程序集变量 程序集随机数, 整数型
.子程序 __启动窗口_创建完毕
置随机数种子 ()
程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)
.子程序 _按钮_确定_被单击
.' 如果 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
' 信息框 (“输入的数字太大了”, 0, , )
.否则
.' 如果 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
' 信息框 (“输入的数字太小了”, 0, , )
.否则
' 信息框 (“输入正确”, 0, , )
.如果结束
.如果结束
.判断开始 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
信息框 (“输入的数字太大了”, 0, , )
.判断 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
信息框 (“输入的数字太小了”, 0, , )
.默认
信息框 (“输入正确”, 0, , )
.判断结束
.子程序 _按钮_重新生成_被单击
程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)
编辑框_输入内容.内容 = “”