欢迎来到天天文库
浏览记录
ID:38109427
大小:84.00 KB
页数:4页
时间:2019-05-25
《程序流程控制二》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、江苏省无锡立信职教中心校教案课题程序流程控制二课型讲授、练习授课日期授课时数2教学目标熟悉If…Then…Else结构,Select…Case结构了解多重If语句,If语句的嵌套教学重点If…Then…Else结构Select…Case结构教学难点多重If语句,If语句的嵌套学情分析通过综合运用提高学生自己解决类似问题的动手能力板书设计3.1.1If测试语句1.If…Then结构2.If…Then…Else结构3.多重If语句3.1.2SelectCase测试语句SelectCase语句的一般形式学生练习教师巡回辅导总结教学后记一要分清什
2、么情况下分别使用If和Select…Case结构二注重书写规范江苏省无锡立信职教中心校备课笔记教学内容学生活动3.1.1If测试语句1.If…Then结构单行语句格式:If条件表达式Then语句多行语句格式:If条件表达式Then语句块EndIf2.If…Then…Else结构语句格式:If条件表达式Then语句块1Else语句块2EndIf3.多重If语句语句格式:If条件表达式1Then语句块1ElseIf条件表达式2Then语句块2ElseIf条件表达式3Then语句块3……ElseIf条件表达式nThen语句块nElse语句块En
3、dIf提问相关计算机英语学生练习江苏省无锡立信职教中心校备课笔记教学内容学生活动例:以下示例完成对所输入的整数进行判断,若输入数为正数,则显示“大于零”,若输入数为负数,则显示“小于零”,否则显示“等于零”。在Command1按钮的Click事件中输入如下代码:PrivateSubCommand1_Click()IfVal(Text1.Text)<0ThenText2.Text=²小于零²ElseIfVal(Text1.Text)>0ThenText2.Text=²大于零²ElseText2.Text=²等于零²EndIfEndSub3.
4、1.2SelectCase测试语句1.SelectCase语句的一般形式语句格式:SelectCase测试表达式Case表达式列表1语句块1Case表达式列表2语句块2……Case表达式列表n语句块n学生练习江苏省无锡立信职教中心校备课笔记教学内容学生活动语句块EndSelect【例3.1】将输入文本框中的所有小写字母转换成大写字母,并将一些特殊符号变成等价的字符串,如DLR表示$、AT表示@、0/0表示%、BPT表示#、AND表示&等。可以在KeyPress事件中修改文本框控件的缺省操作,使它能在用户输入这些字符时进行相应修改。Priv
5、ateSubText1_KeyPress(KeyAsciiAsInteger)DimspesymbolsAsStringDimchAsString*1Spesymbols=²$#%&@²ch=Chr(KeyAscii)IfInStr(Spesymbols,ch)ThenKeyAscii=0ElseKeyAscii=Asc(Ucase(ch))ExitSubEndIfSelectCasechCase²$²:Text1.SelText=²DLR²Case²#²:Text1.SelText=²BPT²Case²%²:Text1.SelText=
6、²0/0²Case²&²:Text1.SelText=²AND²Case²@²:Text1.SelText=²AT²EndSelectEndSub学生练习学生练习
此文档下载收益归作者所有