delphi+access通用会员管理系统[开题报告＋论文＋源代码＋答辩ppt＋外文翻译]

sp;   xingzuo := '白羊座'
      else
        if (birth >= strtodatetime(stryear + '-4-21')) and (birth <= strtodatetime(stryear + '-2-18')) then
          xingzuo := '金牛座'
        else
          if (birth >= strtodatetime(stryear + '-5-21')) and (birth <= strtodatetime(stryear + '-6-21')) then
            xingzuo := '双子座'
          else
            if (birth >= strtodatetime(stryear + '-6-22')) and (birth <= strtodatetime(stryear + '-7-22')) then
              xingzuo := '巨蟹座'
            else
              if (birth >= strtodatetime(stryear + '-7-23')) and (birth <= strtodatetime(stryear + '-8-22')) then
                xingzuo := '狮子座'
              else
                if (birth >= strtodatetime(stryear + '-8-23')) and (birth <= strtodatetime(stryear + '-9-22')) then
                  xingzuo := '处女座'
                else
                  if (birth >= strtodatetime(stryear + '-9-23')) and (birth <= strtodatetime(stryear + '-10-22')) then
                    xingzuo := '天秤座'
                  else
                    if (birth >= strtodatetime(stryear + '-10-23')) and (birth <= strtodatetime(stryear + '-11-22')) then
                      xingzuo := '天蝎座'
                    else
                      if (birth >= strtodatetime(stryear + '-11-23')) and (birth <= strtodatetime(stryear + '-12-21')) then
                        xingzuo := '射手座'

首页上一页 8 9 10 11 12 13 14 下一页尾页 11/15/15

delphi+access通用会员管理系统[开题报告＋论文＋源代码＋答辩ppt＋外文翻译](十一)