选修教材(VB模块)第八节-程序设计教案新部编本三(2课时)

选修教材(VB模块)第八节--程序设计教课设计新部编本之三(2课时)选修教材(VB模块)第八节--程序设计教课设计新部编本之三(2课时)选修教材(VB模块)第八节--程序设计教课设计新部编本之三(2课时)教师学科教课设计[20–20学年度第__学期]任教课科：_____________任教年级：_____________任教老师：_____________市实验学校育人如同春风化雨，授业不惜蜡炬成灰程序设计教课设计之三一、教课目标1．掌握关系表达式的使用。2．掌握If语句的四种格式及功能。3．学会用MsgBox函数输出信息。4．学会用流程图描绘算法。5．学会编写拥有分支构造的程序。二、知识准备1．关系表达式。2．If语句的四种格式。3．MsgBox函数。4．程序设计的基本方法5．文本框控件。三、内容及步骤1．编一程序，求以下分段函数y的值。y

xx10exx10要求：⑴先画流程图，后编写代码。⑵使用InputBox函数输入自变量x，计算结果使用MsgBox函数显示。⑶代码放在窗体的Click事件过程中。育人如同春风化雨，授业不惜蜡炬成灰⒉利用准时器控件实现如图6-10所示的转动字幕程序，一行“欢迎莅临我的个人网站”文字在蓝天白云的背景下从下到上转动。要求：图6-10单击窗体后，屏幕上显示出“输入”转动文字的对话框。⑵请写出达成本程序界面需要设置的对象名和属性，并编写相关控件的事件过程。缺省的对象名设置的对象名属性设置值⒊设计一个界面如图6-11所示的程序，求一元二次方程ax2+bx+c=0(a≠0)的根。由代数可知，先求出b24ac，而后对Δ≥0进行判断，假如条件建立，说明有两个实根，再依据>0或=0,判断出是两个不等的实根，或两个相等的实根。假如Δ≥0不建立，说明无实数根。要求：⑴在输入系数a后，应付其进行合法性检查，假如a=0，使用MsgBox函数显示犯错育人如同春风化雨，授业不惜蜡炬成灰信息，并用SetFocus方法将焦点定位在系数a文本框处，从头输入。（提示：在LostFocus事件中检查）⑵计算结果使用Print方法显示在窗体内的图形框中。⑶先画出流程图，再写出需要设置的对象名和属性，并编写相关控件的事件过程。⑷程序设计好后，可能有各样错误。语法错误在输入程序的过程中就能发现，运转错误也比较简单排查。可是，即便运转过程中没有出现错误，运转的结果也未必正确，由于程序中出现的逻辑错误，计算机是没法判断的。比如，假如把求一元二次方程实数根的表达式写成：x1=(-b+Sqr(b*b-4*a*c))/2*a程序的运转结果一定不正确，为了发现这样的错误，应设计一些测试数据并确立预期的运转结果，可为此题设计以下几组数据：测试数据预期结果a=1,b=2,c=-3x1=1,x2=-3a=1,b=2,c=1x1=-1,x2=-1a=3,b=4,c=5方程无实根a=0从头输入输入数据，把程序的运转结果与预期结果对比较，看能否一致，如不一致，查找错误，改正程序，直至正确为止。四、思虑题⒈三种数学符号“≠”、“≤”、“≥”，在VisualBasic的关系表达式中怎样书写的？⒉可否用下述语句实现第1题的分段函数的计算？为何？Ifx<10Theny=Exp(x)Y=Sqr(x)育人如同春风化雨，