週一的時候校科創舉辦了一場總結大會,我看到那個優秀的孩子們的表現的時候,還發現了一個抽獎軟件。
操作: 只要輸入合理的最小號,和最大號 ,點擊開始搖號就可以搖號了
代碼的運行原理:
.版本 2
.程序集 窗口程序集_啓動窗口
.程序集變量 minNum, 整數型
.程序集變量 maxNum, 整數型
.程序集變量 xNum, 整數型
.程序集變量 狀態, 整數型
.程序集變量 tmin, 整數型
.程序集變量 tmax, 整數型
.子程序 __啓動窗口_創建完畢
標籤_顯示結果.標題 = “未開始”
狀態 = 0
.子程序 _時鐘1_週期事件, , 公開
xNum = 取隨機數 (minNum, maxNum)
標籤_顯示結果.標題 = 到文本 (xNum)
.子程序 _按鈕1_鼠標左鍵被放開, 邏輯型
.參數 橫向位置, 整數型
.參數 縱向位置, 整數型
.參數 功能鍵狀態, 整數型
.如果 (狀態 = 0)
tmin = 到數值 (編輯框_最小號.內容)
tmax = 到數值 (編輯框_最大號.內容)
.如果 (tmin < 0 或 tmax ≤ 0 或 tmin > tmax)
信息框 (“輸入錯誤”, 0, “你飄逸了!”, _啓動窗口.取窗口句柄 ())
返回 ()
.否則
minNum = tmin
maxNum = tmax
時鐘1.時鐘週期 = 10
按鈕1.標題 = “停止搖號”
狀態 = 1
.如果結束
.否則 //正在運行的話,停止
按鈕1.標題 = “繼續搖號”
時鐘1.時鐘週期 = 0
狀態 = 0
.如果結束