抽獎助手

週一的時候校科創舉辦了一場總結大會,我看到那個優秀的孩子們的表現的時候,還發現了一個抽獎軟件。

 

 

操作: 只要輸入合理的最小號,和最大號 ,點擊開始搖號就可以搖號了

代碼的運行原理:

.版本 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
.如果結束

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章