。子程序按鈕1_被點擊。
信息框（取隨機文本（16，true，true，0，）
子例程接受隨機文本，文本類型。
參數數字，整數類型
參數號，邏輯類型；可以為空。
參數字母，邏輯類型；可以為空。
。整數類型的局部變量x
。局部變量字符數組，文本類型，“0”
。局部變量返回文本，文本類型。
。局部變量的隨機數，整數類型
設置隨機數種子（）
如果為真（字母=假且數字=假）
數字=真
如果真的結束了。
如果為真（數字=真）
。計數循環頭（10，x）
返回文本=字符（代碼（“0“，1）+X-1）
添加成員（字符數組，返回文本）
。計數周期尾部（）
如果真的結束了。
如果為真（字母=真）
。計數循環頭（26，x）
返回文本=字符（代碼（“A“，1）+X-1）
添加成員（字符數組，返回文本）
。計數周期尾部（）
如果真的結束了。
返回文本=““
。計數周期頭（位數，x）
隨機數=隨機數（1，數組成員數（字符數組））
返回文本=返回文本+字符數組【隨機數】
。計數周期尾部（）
Return（返回文本）