畫板1(畫板背景色=白色)
按鈕1(標題=刷新)
按鈕2(標題=確認)
編輯框1
程序集變量:驗證碼,文本型
以下源碼:
.版本 2
.子程序 _按鈕1_被單擊
.局部變量 使用的符號, 文本型, , "0", 要用到的符號,可以有漢字
使用的符號 = { “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”, “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9” } '其余請自行添加或更改
驗證碼 = “” ' 清空壹下
.計次循環首 (4, ) ' 驗證碼的位數
驗證碼 = 驗證碼 + 使用的符號 [取隨機數 (1, 取數組成員數 (使用的符號))]
.計次循環尾 ()
畫板1.清除 (, , , )
畫板1.字體.字體大小 = 20
畫板1.寫文本行 (驗證碼)
.子程序 _按鈕2_被單擊
.如果 (編輯框1.內容 = 驗證碼)
信息框 (“正確”, 0, “”)
.否則
信息框 (“錯誤”, 0, “”)
.如果結束