當前位置:名人名言大全網 - 短信平臺 - 易語言中怎麽添加驗證碼

易語言中怎麽添加驗證碼

.版本 2.程序集 窗口程序集1

.程序集變量 驗證碼, 文本型.子程序 _按鈕1_被單擊畫板1.清除 (0, 0, 畫板1.寬度, 畫板1.高度)

置隨機數種子 ()

畫板1.寫文本行 (子程序1 ())

畫板1.畫筆粗細 = 1

.計次循環首 (取隨機數 (10, 25), )

畫板1.畫筆顏色 = 取隨機數 (2, 255)

畫板1.畫直線 (取隨機數 (1, 畫板1.寬度), 取隨機數 (1, 畫板1.寬度), 取隨機數 (1, 畫板1.寬度), 取隨機數 (1, 畫板1.寬度))

.計次循環尾 ()

.計次循環首 (2000, )

畫板1.畫點 (取隨機數 (1, 200), 取隨機數 (1, 200), 取隨機數 (1, 255))

.計次循環尾 ()

連續賦值 (假, 編輯框1.禁止, 按鈕2.禁止)

編輯框1.獲取焦點 ().子程序 子程序1, 文本型

.局部變量 取的用戶, 文本型.計次循環首 (6, )

取的用戶 = 取的用戶 + 取文本中間 (“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789”, 取隨機數 (1, 62), 1)

.計次循環尾 ()

編輯框2.內容 = 取的用戶

返回 (取的用戶)

取的用戶 = “”.子程序 __啟動窗口_創建完畢_按鈕1_被單擊 ().子程序 _按鈕2_被單擊.判斷開始 (編輯框1.內容 = 編輯框2.內容)

信息框 (“正確”, 0, )

.默認

信息框 (“錯誤”, 0, )

_按鈕1_被單擊 ()

.判斷結束