一、基本要求
1.进一步掌握用流程图描述算法。
2.掌握逻辑表达式的运算方法。
3.了解分支语句的嵌套用法。
4.了解焦点方法，掌握SetFocus方法的使用。
二、教学过程
课内完成1—2个实例
实例一：闰年判断器
编写一个判断某年是否为闰年的VB工程。要求：当你输入一个数据后，单击“判断”命令按钮，若数据符合年份要求，则程序显示该年是否为闰年，否则，清空输入的数据并将焦点保持在文本框内，等待用户重新输入数据。
一、算法分析
第一步，判断输入的数据是否是大于零的整数。大于零的整数的条件：
x>0Andx=Fix(x)
第二步：判断是否为闰年。判断闰年的条件是：能被4整除但不能被100整除的，是闰年；能被100整除又能被400整除的，是闰年；其他为非闰年。
二、设计界面
图8.3“闰年判断器”
三、设置属性：
对象属性属性值Form1名称
Caption
BorderStylefrm_pd
闰年判断器
1-FixedsingleCommand1名称
CaptionCmdadjudge
判断Command2名称
Captioncmdexit
退出Text1名称
TexttxtinputLabel1名称
Captionlbl_view
请输入年份
四、编写程序代码
重点是cmdadjudge_Click()事件过程的代码，要分析清楚。这是一个块if结构，而且是块if结构的嵌套：
第一个语句x=Fix(x)Andx>0，这是判断x是否是大于零的整数的条件；
第二个语句x/4=Fix(x/4)Andx/100<>Fix(x/100)，排除世纪年同时又能被4整除，满足润年的条件；
第三个语句x/100=Fix(x/100)Andx/400=Fix(x/400)，x是世纪年同时又能被400整除，满足润年的条件。
其它的都不是润年。
当我们把这些语句与润年法则结合起来，就非常容易理解。
五、调试运行程序
三、知识小结
(一)逻辑表达式与逻辑运算符（阅读理解，高一数学讲过）
⒈逻辑表达式
⒉逻辑运算符
常用的逻辑运算符有3种，它们是And（逻辑与）、Or（逻辑或）和Not（逻辑非）。
⒊真值表（高一数学中有）
⒋算术运算、关系运算与逻辑运算的优先级（重点）
(二)分支语句的嵌套
正确的嵌套、错误的嵌套
（三）焦点（Focus）
（四）SetFocus方法（会用）
SetFocus方法用于将焦点移至指定的控件或窗体。一般格式：
对象名.SetFocus
其中，对象必须是窗体对象或者能够接收焦点的控件。
四、课后练习
1.加减法练习器
2.设计一个求一元二次方程的根的程序。
要求：系数a、b及常数项c由键盘输入；单击“计算”按钮，完成求根计算并输出结果（若b2-4ac<0，则显示“无实根”的消息）；单击“退出”按钮结束程序运行。第八课闰年判断器--分支结构(二)(2课时)这一教案您现在访问的是中国学科吧旗下教案网http://www.jsfw8.com/jafs/