第三课 使用文本框控件
教 学 目标
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.学习交流：通过本节的学习有那些收获
