怎么让软件密码只能使用一次

.版本 2



.程序集 窗口程序集_启动窗口



.子程序 _按钮1_被单击

.局部变量 正确卡密, 文本型

.局部变量 m, 整数型



m ＝ 1

正确卡密 ＝ “123”

.如果 (编辑框1.内容 ＝ 正确卡密 且 m ＝ 1)



    信息框 (“卡密正确，你已或得648元奖励”, 0, , )

.否则

    信息框 (“卡密错误”, 0, , )

.如果结束



m ＝ m ＋ 1



.如果 (m ≠ 1 且 编辑框1.内容 ＝ “123”)

    信息框 (“卡密无效”, 0, , )

.否则



.如果结束

怎么改进我这个