⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 王慧芳1.txt

📁 着 是 学生管理系统的代码
💻 TXT
字号:
    end if
    sle_operator_name.text=Is_operator_name
    Is_getpassword=trim(sle_password.text)
    Is_password=trim(Is_password)
    if len(Is_password)=0 then Is_password=space(10)
    if len(Is_getpassword)=0 or isnull(Is_getpassword)  then
       Is_getpassword=space(10)
    end if
   if Is_getpassword< >Is_password then
       messagebox(“警告”、“口令错误!”) 
      
       sle_password.tex=“”
       sle_password.setfocus()
       return
       end if
   en if
   close (parent)
   gs_operator_id=Is_operator_id 
   gs_operator_id=is_operator_name
   gs_password=Is_password
   gs_permission=Is_permission
   if gs_loginparm="First" then //若是第一次登陆,则打开主窗口
      open(w_main)  /若重新登陆, 则不打开主窗口
   end if 
   //判断操作权限,11-系统级 其他-用户级
   if gs_permission="11"then
      m_main.m_score.m_score_input.enabled=true
      m_main.m_student.m_student_input.enabled=true
      m_main.m_course.m_course_set.enable=ture 
      m_main.m_course_m_course_sel.enable=true
      m_main.m_system.m_system_operator.enable=ture
   else 
      m_main.m_score.m_score_input.enabled=false
      m_main.m_student.m_student_input.enabled=false
      m_main.m_course.m_course_set.enabled=false
      m_main.m_course.m_course_sel.enabled=false
      m_main.m_system.m_system_operator.enable=false
   end if
    "退出"按钮(cb_exit)的Clicked事件代码
   close(parent)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -