重点难点和错误分析-项目二四则运算

《重点难点和错误分析-项目二四则运算》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、重点难点和错误分析——项目二四则运算主讲：浙江广播电视大学陈小冬重点难点讲解程序控制结构变量与数组程序控制结构顺序结构ABPrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegera=Val(Text1)b=Val(Text2)Label1.Caption=a+bLabel2.Caption=a-bEndSub选择结构程序控制结构If<表达式>Then<语句块>EndIf单分支‘交换两个数Ifop1Then<语句块1>Else<语句块2>EndIf双分支

2、Ifop1Then<语句块1>ElseIf<表达式2>Then<语句块2>……[Else<语句块n>]EndIfSelectCase<变量或表达式>Case<表达式列表1><语句块1>Case<表达式列表2><语句块2>…[CaseElse<语句块n>]EndSelect程序控制结构循环结构循环条件Afalsetrue程序控制结构For循环语句ForintX=1To10Print"*";NextintXDo…Loop循环语句intX=1DoWhile(intX<=10)Prin

3、t"*";intX=intX+1Loop程序控制结构变量与数组数组不是一种数据类型，而是一组相同类型数据的集合，用数组名加上下标可以表示数组中的各个元素。Dimquestion(1To10)AsStringDimquestionAsStringDimscore(1To100)AsInteger变量DimscoreAsInteger数组score(1)score(2)……score(100)Dimscore(1To100)AsIntegerDimiAsIntegerFori=1To100score(i)=Val(InputBox("请输入第"&i&"个整数","录入"))Nexti变量

4、与数组Dimscore1AsIntegerDimscore2AsInteger……Dimscore100AsIntegerscore1=Val(InputBox("请输入第1个整数","录入"))score2=Val(InputBox("请输入第2个整数","录入"))……score100=Val(InputBox("请输入第100个整数","录入"))不使用数组输入100个数使用数组输入100个数常见错误分析If语句的书写问题数组的界限SelectCase语句的使用“块If没有EndIf”错误‘交换两个数Ifop1

5、因：单行式的If语句中，必须在一行上书写，若要分行，要用续行符。对多行式的If块语句中，应有配对的EndIf语句结束。解决方法：‘交换两个数Ifop1

6、xtiSelectCaseintScoreCaseintScore>=90LblResult.Caption="优秀"CaseintScore>=80LblResult.Caption="良好"CaseintScore>=70LblResult.Caption="中等"CaseintScore>=60LblResult.Caption="及格"CaseElseLblResult.Caption="不及格"EndSelect原因：“表达式列表i”中不能使用“变量或表达式”中出现的变量。始终执行CaseElse子句，运行结果不正确SelectCaseintScoreCaseIs>=90L

7、blResult.Caption="优秀"CaseIs>=80LblResult.Caption="良好"CaseIs>=70LblResult.Caption="中等"CaseIs>=60LblResult.Caption="及格"CaseElseLblResult.Caption="不及格"EndSelect解决方法：始终执行CaseElse子句，运行结果不正确谢谢!