实时数据库
A:数值型
领料:数值型
帐号:字符型
画面
“请输入帐号”可见度表达式:领料=1
“请重新输入帐号”可见度表达式:领料=2
输入框,可见度表达式:领料 = 1 OR 领料 = 2
“您不能领料”可见度表达式:领料=3
“您能领料”可见度表达式:领料=4
“领料”按钮脚本程序:
领料 = 1
帐号 = ""
循环脚本,循环时间为50
表达式:1
脚本程序:
A = !StrComp(帐号,"")
表达式:领料 AND A<>0,正跳变时执行一次
脚本程序:
IF 领料 = 2 THEN
IF !StrComp(帐号,"ABCD") = 0 THEN
领料 = 4
ELSE
领料 = 3
帐号 = ""
!TimerRun( 1 )
!TimerWaitFor( 1 , 3 )
!TimerStop( 1 )
领料 = 0
ENDIF
ENDIF
IF 领料 = 1 THEN
IF !StrComp(帐号,"ABCD") = 0 THEN
领料 = 4
ELSE
领料 = 2
帐号 = ""
ENDIF
ENDIF
和你的不同处是输入正确了会显示“您能领料”(输入的正确内容为ABCD,不分大小写),你可以将这个改成换面切换之类的
望采纳