易語言數字組合,易語言如何實現000 999的所有三個數字的組合 比如 000 001 002

2022-12-24 08:05:58 字數 2806 閱讀 8513

1樓:

這是我的理解,不知道這是不是您想要的,希望對您有所幫助以下是**:

.版本 2

.子程式 _按鈕1_被單擊

.區域性變數 數字1, 文字型, , "0"

.區域性變數 數字2, 文字型, , "0"

.區域性變數 數字3, 文字型, , "0"

.區域性變數 ch, 文字型

.區域性變數 i, 整數型

.區域性變數 d, 整數型, , "3"

ch = 刪首尾空 (編輯框1.內容)

i = 1

.判斷迴圈首 (i ≤ 取文字長度 (ch))加入成員 (數字1, 取文字中間 (ch, i, 1))i = i + 1

.判斷迴圈尾 ()

ch = 刪首尾空 (編輯框2.內容)

i = 1

.判斷迴圈首 (i ≤ 取文字長度 (ch))加入成員 (數字2, 取文字中間 (ch, i, 1))i = i + 1

.判斷迴圈尾 ()

ch = 刪首尾空 (編輯框3.內容)

i = 1

.判斷迴圈首 (i ≤ 取文字長度 (ch))加入成員 (數字3, 取文字中間 (ch, i, 1))i = i + 1

.判斷迴圈尾 ()

d [1] = 1

ch = 「」

.判斷迴圈首 (d [1] ≤ 取陣列成員數 (數字1))d [2] = 1

.判斷迴圈首 (d [2] ≤ 取陣列成員數 (數字2))d [3] = 1

.判斷迴圈首 (d [3] ≤ 取陣列成員數 (數字3))ch = ch + 數字1 [d [1]] + 數字2 [d [2]] + 數字3 [d [3]] + 「.」

d [3] = d [3] + 1

.判斷迴圈尾 ()

d [2] = d [2] + 1

.判斷迴圈尾 ()

d [1] = d [1] + 1

.判斷迴圈尾 ()

編輯框4.內容 = 取文字左邊 (ch, 取文字長度 (ch) - 1)

2樓:匿名使用者

.版本 2

.支援庫 spec

.子程式 _按鈕1_被單擊

.區域性變數 n1, 整數型

.區域性變數 n2, 整數型

.區域性變數 n3, 整數型

.區域性變數 總數, 整數型

總數 = 0

.計次迴圈首 (取文字長度 (編輯框2.內容), n2).

計次迴圈首 (取文字長度 (編輯框1.內容), n1).計次迴圈首 (取文字長度 (編輯框3.

內容), n3)總數 = 總數 + 1

編輯框4.加入文字 (取文字中間 (編輯框1.內容, n1, 1) + 取文字中間 (編輯框2.

內容, n2, 1) + 取文字中間 (編輯框3.內容, n3, 1) + 「.」)

.計次迴圈尾 ()

.計次迴圈尾 ()

.計次迴圈尾 ()

除錯輸出 (「總數: 」 + 到文字 (總數) + 「 個」)------------------你測試一下,看看效果如何-------------------

易語言如何實現000-999的所有三個數字的組合 比如:000 001 002 003-999

3樓:匿名使用者

真的貌似很簡單.....

也就做個1~999的迴圈...

.區域性變數 tmp, 整數型

.計次迴圈首 (999, tmp)

列表框1.加入專案 (取文字右邊 (「000」 + 到文字 (tmp), 3), )

處理事件 ()

.計次迴圈尾 ()

要不你蒙了,要不我理解錯了你的題意?

4樓:逆天書生

.版本 2

.支援庫 spec

.區域性變數 計次, 整數型

.區域性變數 結果, 文字型

.計次迴圈首 (1001, 計次)

.如果 (計次 < 10)

結果 = 「00」 + 到文字 (計次 - 1).否則.如果 (計次 < 100)

結果 = 「0」 + 到文字 (計次 - 1).否則.如果 (計次 < 1000)

結果 = 到文字 (計次 - 1)

.否則.如果結束

.如果結束

.如果結束

除錯輸出 (結果)

.計次迴圈尾 ()

易語言如何編寫輸入任意字元便生成十六位英文字母及數字組合 最好有原始碼 求各位

5樓:歲歲年年相似

.版本 2

.程式集 視窗程式集1

.程式集變數 文字, 文字型

.子程式 __啟動視窗_建立完畢

文字 = 「00123456789abcdefghijklmnopqrstuvwxyz0」

置隨機數種子 ()

.子程式 _編輯框1_內容被改變

標籤1.標題 = 「」

.計次迴圈首 (16, )

標籤1.標題 = 標籤1.標題 + 取文字中間 (文字, 取隨機數 (1, 38), 1)

.計次迴圈尾 ()

6樓:匿名使用者

不可逆運算,md5加密取前面十六位數即可。

7樓:黑潮家族林宇軒

你的這個組合是隨機還是什麼

易語言一組數字組成號碼篩選:

8樓:匿名使用者

雖然會寫,但是你的陣列組合什麼的讓人很難聽懂,算了,還是不寫了.軟體定製區歡迎你.

如何用易語言正則取如下數字易語言正規表示式如何取裡面的數字

版本 2 常量 常量1,var latest draw result red d d d d d d d d d d blue var latest draw phase d var latest draw time 版本 2 程式集 視窗程式集1 子程式 按鈕1 被單擊 區域性變數 提取正則,正規...

易語言如何實現無限迴圈語句

版本 2 支援庫 eapi.子程式 啟動視窗 建立完畢.區域性變數 a,邏輯型a 假e68a8462616964757a686964616f31333365636539 判斷迴圈首 a 假 置剪輯板文字 編輯框1.內容 模擬按鍵 ctrl鍵,v鍵,模擬按鍵 回車鍵,延時 10 置剪輯板文字 編輯框2...

怎麼通過易語言實現,開啟易語言程式後,滑鼠被吸附住,就是只能在視窗裡面活動,還有怎麼解除限制

滑鼠被吸附住,這種思想應該是不懂程式設計的人來描述,對於你自己開發程式,需要有一眼就看穿的內力!這只是一種表現給使用者的視覺效果,而已。思路 暫時想到2種,就說第一種吧 判斷滑鼠是否在視窗範圍內,如果已經在臨界位置,則保持不動即可。那麼現在的問題只不過是設定滑鼠位置了。關於吸附的效果,在靠近臨界位置...