第三课 使用文本框控件

教 学 目标
1、熟悉文本框控件。
2、认识对象的Visible属性。
3、了解用代码设置对象属性的方法。
课时安排 3课时
第一课时教学内容：程序的感知,通过对程序的操作知道此程序有那些功能，有那些元素构成。猜想应设置什么内容命令，对对象属性的设置应该是什么性质的。
教学重、难点：程序的功能、元素的组成、命令代码内容猜想。 教法、学法：讲授法、演示法、小组合作学习。
教学过程一.创设情景引入新课
演示：教师演示本课的程序。
引言:通过老师的操作，此程序的功能比我们学的第一程序功能强大了，大家有没有信心通过几节课的时间来掌握它，现在我们先来认识一下它。
二、学生操作：小组合作讨论，并回答：
A次序的应用有什么样的功能？
B应用程序大体上由哪些元素组成？
C猜想命令代码内容
三、小组合作学习:
教师巡视指导、参与讨论
四、小组回报
小结：
此程序功能：程序运行时，程序界面上就会显现“同学，欢迎你！”字样。出现输入文字信息文本框。当使用者在文字信息文本框内输入本人的名字后，点击确定按钮，隐藏文本框和第一个标签，显示第二个标签，并且把用户输入的文字加在第二个标签的文字前面。单击“退出”按钮后，可以退出程序。
组成程序元素有：两个标签、两个按钮、一个文本框，一个程序界面
命令代码内容猜想：隐藏第一个欢迎提示标签。
显示第二标签，且内容是把用户输入的文字加在第二个标签的文字前面。
五、设计程序界面
1．绘制绘制程序界面
两个标签、两个按钮、一个文本框控件，
2.文件的保存
六.本课小结：程序的功能、元素构成，
同学们课后有兴趣，自己多去探究、去发现，下一节课我们再来交流。”。
七、作业：预习下节讲的内容（课本第三课）

第二课时
教学内容：对象属性的设置、编写程序代码。
教学重、难点：编写程序代码
教法、学法：讲授法、演示法、小组合作学习。
教学过程
一、    复习旧知引入新课通过上节的学习我们知道了本课程序的功能其构成的元素，每个控件属性不同。下面我们一起回忆：
⑴第一个标签先显性后隐藏，输入的文字是“请输入姓名”。
⑵第二个标签先隐藏后显示，显示的文字是：“输入的姓名＋第二个标签的（同学，欢迎你）”。
⑶“确定”按钮是运行程序的子程序。
⑷“退出”按钮是结束程序.
⑸文本框是操作者输入姓名
二、授新课
1．设置对象的属性
①窗体“属性”由Caption改为“欢迎加入”。
②label1标签把窗口属性值由label改为lblName,把Ｃaption属性值改为“请输入姓名”。
③label2标签把窗口属性值由labe2改为lblDisplay,把Ｃaption属性值改为“同学，欢迎你！”，把属性Visble的属性改为False。
④两个标签字体属性的设置.
⑤把文本框属性名称改为txtNane,其值“Ｔext”删除，设成为空及无文字。
⑥Command1按钮的名称改为cmdok，把Ｃaption属性值改为“确定”。
⑦Command2按钮的名称改为cmdok，把Ｃaption属性值改为“退出”。
2学生练习：设置对象的属性
3. 学习交流：（小组、同桌之间）教师巡视
4．编写程序代码
⑴.首先让学生看本课给“确定”按钮加的代码，让学生从感性上认识赋值语句特点：出示代码
Private Sub cmdOk_Click()
lblName.Visible = False
txtName.Visible = False
lblDisplay.Caption = txtName.Text + lblDisplay.Caption
lblDisplay.Visible = True
End Sub
⑵特点
①VB代码书写格式比较自由。代码不区分字母的大小写，一行允许多达255个字符。通常一行写一条语句，这样程序看起来比较清晰。在同一行上也可写多个语句，这时语句间用冒号“：”分隔。例如，a=4：b=5：c=6。单行语句也可分若干行书写，要使用一个空格后跟一个下划线作续行符，如下所示：
dim a as single，b as single，c as single _
d as single，e as single
②. 赋值语句是VB程序最常用、最基本的语句，它能为变量提供数据。另外，若要在程序代码中设置对象的属性，也要使用赋值语句。
赋值语句有两种格式：
格式1： 变量名=表达式
格式2： [对象名.]属性名=表达式
赋值语句的作用是：首先计算“=”右边表达式的值，然后将该值赋给“=”左边的变量或对象的属性。在格式2中，若对象名省略，则默认对象为当前窗体。
例如：
x=2 ' 把2赋给x
y=x*3 ' 计算x*3的值，得6，把6赋给y
x=x+1 ' 计算x+1的值，得3，把3赋给x
a$= "Hello" ' 把“Hello”赋给a$
Text1.Text="你好！" ' 把“你好！”赋给Text1的Text属性
⑶本课代码分析
执行语句lblName.Visible = False，把标签lblName的Visible属性值设为False，使这个标签在事件发生是隐藏起来。
执行语句txtName.Visible = False，把文本框txtName的Visible 属性值设为False，使它在事件发生是隐藏起来
执行语句lblDisplay.Caption = txtName.Text + lblDisplay.Caption，为lblDisplay的Caption设置属性值。属性值由txtName.Text + lblDisplay.Caption确定。其中的txtName.Text是文本框的Text属性值（用户输入的内容），lblDisplay.Caption是标签lblDisplay的Caption原有的属性值，“＋”号的作用是把这两个属性值（文字）连接起来形成一个新值。
执行语句lblDisplay.Visible = True，把标签lblDisplay的Visible 属性值设为True,使它在事件发生是显示出来。
5．上机练习, 学习交流：（小组、同桌之间）教师巡视
6.保存
三、小结：赋值语句特点
四、作业：阅读本课的书

第三课时：练习课
教学目的：1。通过练习巩固赋值语句编写特点
2．进一步体验程序设计的过程
教学重、难点：赋值语句的编写
教学过程
一创设情景引入新课
1.学生上机操作上节课讲的内容，并运行。
2.问题：每单击一次“确定” 按钮,就会在欢迎信息前面出现一个姓名.
3.分析原因：每单击一次“确定” 按钮,就会在欢迎信息前面出现一个姓名,就会执行一次代码，在最近一次的lblDisplay Caption值前面加上一个姓名。
代码修正：在代码中加上一条语句txtName.Text = ""
完整的代码是：
Private Sub cmdOk_Click()
lblName.Visible = False
txtName.Visible = False
lblDisplay.Caption = txtName.Text + lblDisplay.Caption
lblDisplay.Visible = True
txtName.Text = ""
End Sub
4. 上机练习, 学习交流：（小组、同桌之间）教师巡视
5.练习作业：
1）。练习1（课本P33 练习2）全体学生练习。
请完成最快的学生展示
2）．练习2（课本P33 练习3）全体学生练习。
请完成最快的学生展示
3）．练习3（选作题：课本P33 练习1）全体学生练习。
请完成最快的学生展示
6.学习交流：通过本节的学习有那些收获