1樓：匿名使用者
我來簡化下一樓的命令、隨機生成6~16位密碼，每一位密碼有一半的概率是數字或者英文。如果是英文有一半的概率是大寫或小寫....
.版本 2
.支援庫 spec
.區域性變數 隨機密碼位數, 整數型
.區域性變數 大小寫, 整數型
.區域性變數 字母數字, 整數型
.區域性變數 位數, 整數型
.區域性變數 密碼錶, 文字型, , "0"
.區域性變數 密碼, 文字型
密碼錶 ＝
置隨機數種子 ()
隨機密碼位數 ＝ 取隨機數 (6, 16).計次迴圈首 (隨機密碼位數, )
大小寫 ＝ 取隨機數 (0, 1)
字母數字 ＝ 取隨機數 (0, 1)
.如果 (字母數字 ＝ 0)
位數 ＝ 取隨機數 (1, 26)
.如果 (大小寫 ＝ 0)
密碼 ＝ 密碼 ＋ 到大寫 (密碼錶 [位數]).否則密碼 ＝ 密碼 ＋ 密碼錶 [位數].如果結束
.否則密碼 ＝ 密碼 ＋ 到文字 (取隨機數 (0, 9)).如果結束
.計次迴圈尾 ()
除錯輸出 (“隨機密碼為：” ＋ 密碼)
2樓：艾德思網路科技
沙發好蛋疼啊，如果要大寫的呢？或者符號呢？很麻煩的，你直接把需要包含的字母數字全部寫進一段文字，然後隨機取出來就可以了，至於長度這個就相對簡單多了
3樓：李夢龍
.版本 2
.程式集 視窗程式集1
.程式集變數 密碼錶, 文字型, , "0", 用於存放密碼字元陣列，可自己加入大寫和特殊符號，目前是小寫+字母=26+10=36個成員
.子程式 _按鈕1_被單擊
.區域性變數 i, 整數型
.變數迴圈首 (6, 16, 1, i)
編輯框1.加入文字 (到文字 (i) ＋ “位密碼：” ＋ 生成密碼 (i) ＋ #換行符)
.變數迴圈尾 ()
.子程式 __啟動視窗_建立完畢
加入成員 (密碼錶, “0”)
加入成員 (密碼錶, “1”)
加入成員 (密碼錶, “2”)
加入成員 (密碼錶, “3”)
加入成員 (密碼錶, “4”)
加入成員 (密碼錶, “5”)
加入成員 (密碼錶, “6”)
加入成員 (密碼錶, “7”)
加入成員 (密碼錶, “8”)
加入成員 (密碼錶, “9”)
加入成員 (密碼錶, “a”)
加入成員 (密碼錶, “b”)
加入成員 (密碼錶, “c”)
加入成員 (密碼錶, “d”)
加入成員 (密碼錶, “e”)
加入成員 (密碼錶, “f”)
加入成員 (密碼錶, “g”)
加入成員 (密碼錶, “h”)
加入成員 (密碼錶, “i”)
加入成員 (密碼錶, “j”)
加入成員 (密碼錶, “k”)
加入成員 (密碼錶, “l”)
加入成員 (密碼錶, “m”)
加入成員 (密碼錶, “n”)
加入成員 (密碼錶, “o”)
加入成員 (密碼錶, “p”)
加入成員 (密碼錶, “q”)
加入成員 (密碼錶, “r”)
加入成員 (密碼錶, “s”)
加入成員 (密碼錶, “t”)
加入成員 (密碼錶, “u”)
加入成員 (密碼錶, “v”)
加入成員 (密碼錶, “w”)
加入成員 (密碼錶, “x”)
加入成員 (密碼錶, “y”)
加入成員 (密碼錶, “z”)
.子程式 生成密碼, 文字型
.引數 位數, 整數型
.區域性變數 i, 整數型
.區域性變數 結果, 文字型
結果 ＝ “”
.計次迴圈首 (位數, i)
結果 ＝ 結果 ＋ 密碼錶 [取隨機數 (1, 36)].計次迴圈尾 ()
返回 (結果)
易語言怎麼寫時間檢測，易語言怎麼寫時間檢測
到時間 呼叫格式 日期時間型 到時間 通用型 欲轉換的文字 系統核心支援庫 時間操作 英文名稱 totime 將指定文字轉換為時間並返回。如果給定文字不符合書寫格式要求或者時間值錯誤導致不能進行轉換，將返回100年1月1日。如果給定引數本身就是時間資料，將直接返回該時間。本命令為初級命令。引數 1 ...
易語言如何實現數字隨機變化 誰給下原始碼
版本 2.程式集 視窗程式集1.子程式 按鈕1 被單擊。區域性變數 紅球，整數型，0 區域性變數 籃球，整數型，16 區域性變數 c,整數型，0 區域性變數 i,整數型。區域性變數 q,整數型。區域性變數 w,整數型。區域性變數 出球，整數型。區域性變數 結果，整數型。區域性變數 次數，整數型框1....
易語言怎麼褥捷方式的原始檔路徑，易語言怎麼取快捷方式的原始檔路徑？
參考例項如下 版本 2 支援庫 shell 支援庫 spec 子程式 按鈕1 被單擊 區域性變數 資料,位元組集 區域性變數 list長度,整數型 區域性變數 檔案資訊位置,整數型 區域性變數 檔案位置偏移,整數型 區域性變數 目標路徑,文字型 通用對話方塊1.檔名 通用對話方塊1.過濾器 lnk ...