力控脚本程序.docVIP

系统登录 （1）IF LoginEx(username,userpwd)==1 THEN Display(机组监控); ENDIF （2）IF LoginEx(username,userpwd)==1 THEN Display(机组监控); userpwd=; username=; ELSE MsgBox(用户名或密码不正确,请重新输入); #Text4.Text=; userpwd=; ENDIF 2.系统退出 IF MsgBox(确定要退出系统么？)==1 THEN Exit(0); ENDIF 3.登录界面 username=; userpwd=; LogoutEx(); CloseWindowEx(机组监控); CloseWindowEx(历史数据查询); CloseWindowEx(实时曲线); CloseWindowEx(控制参数); //#Flash.GotoFrame(1); //#Flash.Play(); 4.登录密码 IF userpwd THEN #Text22.Text=******; ELSE #Text22.Text=; ENDIF 4.机组模式转换 （1）IF MsgBox(确定要转换到手动模式吗？)==1 THEN Gasctrl_Manul_A.PV=1; Gasctrl_Temp_A.PV=0; ENDIF （2）IF MsgBox