欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

易語言制作雙色球隨機(jī)選號工具的代碼

 更新時間:2018年11月22日 09:53:28   作者:易語言源碼教程  
今天小編就為大家分享一篇關(guān)于易語言制作雙色球隨機(jī)選號工具的代碼,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

雙色球隨機(jī)選號代碼

.版本 2
.程序集 窗口程序集1
.子程序 _隨機(jī)選號按鈕_被單擊
.局部變量 z, 邏輯型
.局部變量 隨機(jī)號
隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
.如果 (隨機(jī)號 < 10)
 紅球編輯框1.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
.否則
 紅球編輯框1.內(nèi)容 = 到文本 (隨機(jī)號)
 z = 假
.如果結(jié)束
.循環(huán)判斷首 ()
 隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
 .如果 (隨機(jī)號 = 到數(shù)值 (紅球編輯框1.內(nèi)容))
  z = 真
 .否則
  .如果 (隨機(jī)號 < 10)
   紅球編輯框2.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
  .否則
   紅球編輯框2.內(nèi)容 = 到文本 (隨機(jī)號)
   z = 假
  .如果結(jié)束
 .如果結(jié)束
.循環(huán)判斷尾 (z)
.循環(huán)判斷首 ()
 隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
 .如果 (隨機(jī)號 = 到數(shù)值 (紅球編輯框1.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框2.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框4.內(nèi)容))
  z = 真
 .否則
  .如果 (隨機(jī)號 < 10)
   紅球編輯框3.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
  .否則
   紅球編輯框3.內(nèi)容 = 到文本 (隨機(jī)號)
   z = 假
  .如果結(jié)束
 .如果結(jié)束
.循環(huán)判斷尾 (z)
.循環(huán)判斷首 ()
 隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
 .如果 (隨機(jī)號 = 到數(shù)值 (紅球編輯框1.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框2.內(nèi)容))
  z = 真
 .否則
  .如果 (隨機(jī)號 < 10)
   紅球編輯框4.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
  .否則
   紅球編輯框4.內(nèi)容 = 到文本 (隨機(jī)號)
   z = 假
  .如果結(jié)束
 .如果結(jié)束
.循環(huán)判斷尾 (z)
.循環(huán)判斷首 ()
 隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
 .如果 (隨機(jī)號 = 到數(shù)值 (紅球編輯框1.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框2.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框4.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框3.內(nèi)容))
  z = 真
 .否則
  .如果 (隨機(jī)號 < 10)
   紅球編輯框5.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
  .否則
   紅球編輯框5.內(nèi)容 = 到文本 (隨機(jī)號)
   z = 假
  .如果結(jié)束
 .如果結(jié)束
.循環(huán)判斷尾 (z)
.循環(huán)判斷首 ()
 隨機(jī)號 = 取隨機(jī)數(shù) (1, 33)
 .如果 (隨機(jī)號 = 到數(shù)值 (紅球編輯框1.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框2.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框4.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框3.內(nèi)容) 或 隨機(jī)號 = 到數(shù)值 (紅球編輯框5.內(nèi)容))
  z = 真
 .否則
  .如果 (隨機(jī)號 < 10)
   紅球編輯框6.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
  .否則
   紅球編輯框6.內(nèi)容 = 到文本 (隨機(jī)號)
   z = 假
  .如果結(jié)束
 .如果結(jié)束
.循環(huán)判斷尾 (z)
隨機(jī)號 = 取隨機(jī)數(shù) (1, 16)
.如果 (隨機(jī)號 < 10)
 藍(lán)球編輯框.內(nèi)容 = “0” + 到文本 (隨機(jī)號)
.否則
 藍(lán)球編輯框.內(nèi)容 = 到文本 (隨機(jī)號)
 z = 假
.如果結(jié)束

運(yùn)行結(jié)果:

總結(jié)

以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,謝謝大家對腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接

相關(guān)文章

  • 易語言在畫板中寫出指定文本當(dāng)畫板中已滿會自動滾屏

    易語言在畫板中寫出指定文本當(dāng)畫板中已滿會自動滾屏

    今天小編就為大家分享一篇關(guān)于易語言在畫板中寫出指定文本當(dāng)畫板中已滿會自動滾屏,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 易語言打開與關(guān)閉輸入法的代碼示例

    易語言打開與關(guān)閉輸入法的代碼示例

    今天小編就為大家分享一篇關(guān)于易語言打開與關(guān)閉輸入法的代碼示例,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-12-12
  • 易語言數(shù)組排序命令使用講解

    易語言數(shù)組排序命令使用講解

    今天小編就為大家分享一篇關(guān)于易語言數(shù)組排序命令使用講解,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 易語言檢測程序是不是在虛擬機(jī)中運(yùn)行的代碼

    易語言檢測程序是不是在虛擬機(jī)中運(yùn)行的代碼

    今天小編就為大家分享一篇關(guān)于易語言檢測程序是不是在虛擬機(jī)中運(yùn)行的代碼,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 將易程序轉(zhuǎn)換為另一個語言版本的方法

    將易程序轉(zhuǎn)換為另一個語言版本的方法

    今天小編就為大家分享一篇關(guān)于將易程序轉(zhuǎn)換為另一個語言版本的方法,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-10-10
  • 易語言如何安裝?易語言安裝步驟

    易語言如何安裝?易語言安裝步驟

    我們在本文里教給大家關(guān)于如何安裝易語言的教程內(nèi)容,是大家學(xué)習(xí)易語言的第一步,參考下吧。
    2018-12-12
  • 易語言輸入字比較方法

    易語言輸入字比較方法

    在本篇文章里我們給大家分享了一篇關(guān)于易語言輸入字比較方法內(nèi)容,有需要的朋友們學(xué)習(xí)下。
    2019-01-01
  • 關(guān)于學(xué)習(xí)易語言的方向和心得

    關(guān)于學(xué)習(xí)易語言的方向和心得

    我們在本篇內(nèi)容中給大家整理了關(guān)于學(xué)習(xí)易語言的方向和心得,指點(diǎn)了易語言的方向內(nèi)容,需要的參考下。
    2018-12-12
  • 易語言選擇一段刻度并且顯示出來的方法

    易語言選擇一段刻度并且顯示出來的方法

    今天小編就為大家分享一篇關(guān)于易語言選擇一段刻度并且顯示出來的方法,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-11-11
  • 易語言制作大王派我來巡山小程序

    易語言制作大王派我來巡山小程序

    今天小編就為大家分享一篇關(guān)于易語言制作大王派我來巡山小程序,小編覺得內(nèi)容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧
    2018-11-11

最新評論