论文无忧网提供:计算机毕业论文范文|计算机毕业设计|计算机毕业论文
栏目导航 ASP Java Web .NET VB6.0 JAVA VC VF DELPHI PB 计算机网络 计算机科学与技术 PHP 安卓APP 其他 C# 代写论文
当前位置: > 计算机 > PB >

A40022理工学院考试成绩分析PB+SQL2000

dw_1.GetChild("dw_graph1",dwc_graph)

内容来自www.paper51.com

if var_semester<> ""  then

paper51.com

      

paper51.com

       decimalthere_paper http://www.paper51.com

       内容来自论文无忧网 www.paper51.com

       SELECT top1 paper.due1 paper51.com

    INTO :there_paper

内容来自www.paper51.com

    FROM paper  内容来自论文无忧网 www.paper51.com

   WHERE ( paper.semester =:var_semester )   ; 内容来自论文无忧网 www.paper51.com

            http://www.paper51.com

      

paper51.com

       ifsqlca.sqlcode <> 0 then 内容来自论文无忧网 www.paper51.com

              messagebox("´错误","您所指定的专业在指定的学期不存在试卷!")

paper51.com

             

paper51.com

              dwc_score.SetTransObject(SQLCA)

http://www.paper51.com

              dwc_score.Retrieve("") 内容来自论文无忧网 www.paper51.com

              copyright paper51.com

              dwc_graph.SetTransObject(SQLCA)

copyright paper51.com

              dwc_graph.Retrieve("") 内容来自www.paper51.com

              return

内容来自www.paper51.com

       end if

copyright paper51.com

       内容来自www.paper51.com

       dwc_score.SetTransObject(SQLCA)

paper51.com

       dwc_score.Retrieve(var_semester) 内容来自www.paper51.com

       dwc_graph.SetTransObject(SQLCA)

内容来自www.paper51.com

       dwc_graph.Retrieve(var_semester,var_spec) 内容来自论文无忧网 www.paper51.com

else 内容来自www.paper51.com

       dwc_score.SetTransObject(SQLCA) 内容来自论文无忧网 www.paper51.com

       dwc_score.Retrieve("")

copyright paper51.com

              内容来自www.paper51.com

       dwc_graph.SetTransObject(SQLCA)

http://www.paper51.com

       dwc_graph.Retrieve("","")

http://www.paper51.com

end if

http://www.paper51.com

内容来自论文无忧网 www.paper51.com

成绩分析: copyright paper51.com

DataWindowChilddwc_section1,dwc_section2

内容来自论文无忧网 www.paper51.com

dw_1.GetChild("dw_section1",dwc_section1) paper51.com

//dw_1.GetChild("dw_section2",dwc_section2)

内容来自www.paper51.com

if var_semester<> ""  then

copyright paper51.com

       decimalthere_paper[6,10] paper51.com

      

http://www.paper51.com

       SELECT top1 paper.due1, paper.due2, paper.due3, paper.due4, paper.due5,   内容来自www.paper51.com

        paper.due6, paper.due7, paper.due8, paper.due9, paper.due10  http://www.paper51.com

    INTO :there_paper[1,1],:there_paper[1,2], :there_paper[1,3], :there_paper[1,4],   paper51.com

        :there_paper[1,5], :there_paper[1,6], :there_paper[1,7],:there_paper[1,8],  

copyright paper51.com

        :there_paper[1,9], :there_paper[1,10] 

copyright paper51.com

    FROM paper  http://www.paper51.com

   WHERE ( paper.semester =:var_semester )   ;

paper51.com

            paper51.com

      

内容来自www.paper51.com

       ifsqlca.sqlcode <> 0 then 内容来自论文无忧网 www.paper51.com

              messagebox("错误","您所指定的专业在指定的学期不存在试卷!")

http://www.paper51.com

              dwc_section1.SetTransObject(SQLCA)

内容来自论文无忧网 www.paper51.com

              dwc_section1.Retrieve()

内容来自www.paper51.com

              //dwc_section2.SetTransObject(sqlca)

paper51.com

              //dwc_section2.retrieve("","") paper51.com

              return copyright paper51.com

       end if http://www.paper51.com

       intvar_questions = 1 //get questins numbers

paper51.com

       forvar_questions=1 to 10 paper51.com

              ifthere_paper[1,var_questions] = 0 then EXIT

内容来自论文无忧网 www.paper51.com

       next http://www.paper51.com

      

paper51.com

       var_questions-= 1

内容来自www.paper51.com

      

内容来自www.paper51.com

       //calculatedifficult

http://www.paper51.com

       realtemp[2,10] copyright paper51.com

       内容来自论文无忧网 www.paper51.com

       SELECT sum(case when paper.due1=score.score1 then 1 else 0 end),   内容来自论文无忧网 www.paper51.com

        sum( case when paper.due2=score.score2 then 1 else 0 end),  

内容来自www.paper51.com

        sum( case when paper.due3=score.score3 then 1 else 0 end),   http://www.paper51.com

        sum( case when paper.due4=score.score4 then 1 else 0 end),  

http://www.paper51.com

        sum( case when paper.due5=score.score5 then 1 else 0 end),  

内容来自www.paper51.com

        sum( case when paper.due6=score.score6 then 1 else 0 end),  

内容来自www.paper51.com

        sum( case when paper.due7=score.score7 then 1 else 0 end),  

paper51.com

        sum( case when paper.due8=score.score8 then 1 else 0 end),   内容来自www.paper51.com

        sum( case when paper.due9=score.score9 then 1 else 0 end),   http://www.paper51.com

        sum( case when paper.due10=score.score10 then 1 else 0 end), 内容来自www.paper51.com

                     avg(score.score1), max(score.score1), paper51.com

                   avg(score.score2), max(score.score2), copyright paper51.com

                     avg(score.score3), max(score.score3), paper51.com

                     avg(score.score4), max(score.score4),

内容来自www.paper51.com

                     avg(score.score5), max(score.score5), paper51.com

                     avg(score.score6), max(score.score6),

内容来自www.paper51.com

                     avg(score.score7), max(score.score7), 内容来自论文无忧网 www.paper51.com

                     avg(score.score8), max(score.score8),

内容来自www.paper51.com

                     avg(score.score9), max(score.score9),

内容来自www.paper51.com

                     avg(score.score10), max(score.score10) copyright paper51.com

     http://www.paper51.com

------分隔线----------------------------
联系方式