【正文】 End SubPrivate Sub Text3_Change()End Sub成績統(tǒng)計分析（如：界面如圖七）（圖七）代碼如下：Private Sub Command1_Click()Dim SQLoriginal As StringDim SQLadd As StringDim SQLorder As StringDim strSql As String On Error Resume NextSQLoriginal = SELECT * FROM 成績表 SQLadd = WHERE 學(xué)號=學(xué)號 AND 姓名=姓名 SQLorder = If = 1 And IsNumeric(Text1) Then SQLadd = SQLadd + and 學(xué)號=39。 + Text1 + 39。End If If = 1 And Not IsNull(Text2) Then SQLadd = SQLadd + and 姓名=39。 + Text2 + 39。End IfIf = 1 And Not IsNull(Text3) Then SQLadd = SQLadd + and 考試科目=39。 + Text3 + 39。End IfIf = 1 Then SQLadd = SQLadd + and 科目分數(shù)60End IfstrSql = SQLoriginal + SQLadd + SQLordeIf = 1 Then End If strSql vbModal = = = End SubPrivate Sub Command2_Click() Unload MeEnd SubPrivate Sub Form_Load() = = = 39。 = End SubPrivate Sub Text1_Change()End Sub交費統(tǒng)計分析（如：界面如圖八）（圖八）代碼如下：Private Sub Command1_Click()Dim SQLoriginal As StringDim SQLadd As StringDim SQLorder As StringDim strSql As String SQLoriginal = SELECT 學(xué)號,姓名,學(xué)期,本學(xué)期應(yīng)交費用,實際交費,本次欠費 FROM 交費表 SQLadd = WHERE 學(xué)號=學(xué)號 AND 姓名=姓名 SQLorder = If = 1 And IsNumeric(Text1) Then SQLadd = SQLadd + and 學(xué)號=39。 + Text1 + 39。End If If = 1 And Not IsNull(Text2) Then SQLadd = SQLadd + and 姓名=39。 + Text2 + 39。End IfIf = 1 And IsNumeric(Text3) Then SQLadd = SQLadd + and 實際交費=39。 + Text3 + 39。End IfIf = 1 And IsNumeric(Text4) Then SQLadd = SQLadd + and 本次欠費=39。 + Text4 + 39。End IfstrSql = SQLoriginal + SQLadd + SQLordeIf = 1 Then End If strSql vbModal = = = = End SubPrivate Sub Command2_Click() Unload MeEnd SubPrivate Sub Form_Load() = = = = End SubPrivate Sub Text1_Change()End Sub結(jié)束語學(xué)生信息管理系統(tǒng)（課程設(shè)置和打印統(tǒng)計）的完成，它在審核這一功能中能夠?qū)Σ煌闆r的資料進行設(shè)置和打印，針對需要的信息進行設(shè)置和打印。主要參考文獻本系統(tǒng)的過程中，主要的參考文獻有：《Visual 》 林陳雷 人民郵電出版社《面向?qū)ο蟪绦蛟O(shè)計系列教材》 龔沛曾 高等教育出版社《Visual 》 何文俊《學(xué)用Visual Basic 編程》 潭 浩 西安電子科技大學(xué)出版社《Visual 數(shù)據(jù)庫開發(fā)與專業(yè)應(yīng)用》 敬 錚 國防工業(yè)出版社《Visual 數(shù)據(jù)庫程序設(shè)計高手》 溫賢發(fā) 科學(xué)出版社g an employment tribunal claiEmployment tribunals sort out disagreements between employers and employees.You may need to make a claim to an employment tribunal if: you don39。t agree with the disciplinary action your employer has taken against you your employer dismisses you and you think that you have been dismissed unfairly.For more information about dismissal and unfair dismissal, seeDismissal.You can make a claim to an employment tribunal, even if you haven39。tappealedagainst the disciplinary action your employer has taken against you. However, if you win your case, the tribunal may reduce any pensation awarded to you as a result of your failure to appeal.Remember that in most cases you must make an application to an employment tribunal within three months of the date when the event you are plaining about happened. If your application is received after this time limit, the tribunal will not usually accept i.If you are worried about how the time limits apply to you, take advice from one of the organisations listed underFurther help.Employment tribunals are less formal than some other courts, but it is still a legal process and you will need to give evidence under an oath or affirmation.Most people find making a claim to an employment tribunal challenging. If you are thinking about making a claim to an employment tribunal, you should get help straight away from one of the organisations listed underFurther help.If you are being represented by a solicitor at the tribunal, they may ask you to sign an agreement where you pay their fee out of your pensation if you win the case. This is known as adamagesbased agreement. In England and Wales, your solicitor can39。t charge you more than 35% of your pensation if you win the case.If you are thinking about signing up for a damagesbased agreement, you should make sure you39。re clear about the terms of the agreement. It might be best to get advice from an experienced adviser, for example, at a Citizens Advice Bureau. To find your nearest CAB, including those that give advice by , click onnearest CAB.For more information about making a claim to an employment tribunal, seeEmployment tribunals.The (lack of) air up there Watch mCayman Islandsbased Webb, the head of Fifa39。s antiracism taskforce, is in London for the Football Association39。s 150th anniversary celebrations and will attend City39。s Premier League match at Chelsea on Sunday.I am going to be at the match tomorrow and I have asked to meet Yaya Toure, he told BBC Sport.For me it39。s about how he felt and I would like to speak to him first to find out what his experience was.Uefa hasopened disciplinary proceedings against CSKAfor the racist behaviour of their fans duringCity39。s 21 win.Michel Platini, president of European football39。s governing body, has also ordered an immediate investigation into the referee39。s actions.CSKA said they were