不用这么复杂。。。直接用
.版本 2
.子程序 _按钮1_被单击
.如果 (编辑框1.内容 = “admin” 且 编辑框2.内容 = “123”)
信息框 (“登陆成功”, 0, )
编辑框1.禁止 = 真
编辑框2.禁止 = 真
.否则
信息框 (“帐号或密码错误”, 0, )
让我来告诉你答案!.版本2
.程序集窗口程序集1
.子程序_按钮1_被单击
.局部变量变量,整数型
变量=中文判断(编辑框1.内容)
.判断开始(变量≤2且变量≠0)
.判断开始(变量=2)
信息框(“编辑框中的汉字数量为2个”,0,)
.默认
信息框(“编辑框中的汉字数量为1个”,0,)
.判断结束
.默认
信息框(“编辑框中的汉字数量为0个”,0,)
.判断结束
.子程序中文判断,整数型
.参数局部_文本,文本型
.局部变量文本长度,整数型
.局部变量i,整数型
.局部变量中文数量,整数型
文本长度=取文本长度(局部_文本)
.计次循环首(文本长度,i)
.如果真(取代码(局部_文本,i)<0)
中文数量=中文数量+1
.如果真结束
.计次循环尾()
返回(中文数量÷2)
楼上经典。。呵呵
.版本 2
.子程序 _按钮1_被单击
.判断开始 (编辑框1.内容 = “” 或 编辑框2.内容 = “”)
信息框 (“请输入帐号或密码”, 0, )
.判断 (编辑框1.内容 ≠ “admin” 或 编辑框2.内容 ≠ “123”)
信息框 (“帐号或密码错误”, 0, )
.默认
按钮1.禁止 = 真
编辑框1.禁止 = 真
编辑框2.禁止 = 真
信息框 (“登陆成功”, 0, )
.判断结束
我的邮箱:huayou60@163.com
否则
.如果 (编辑框1.内容 = “admin”)
.如果 (编辑框2.内容 = “123”)
编辑框1.禁止 = 真
编辑框2.禁止 = 真
按扭1.禁止 = 真
信息框 (“登陆成功”, 0, )
.否则
编辑框1.内容被改变 这个试试。