欢迎来到天天文库
浏览记录
ID:38108474
大小:143.50 KB
页数:3页
时间:2019-05-25
《单选框、复选框 (2)》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、江苏省无锡立信职教中心校教案课题单选框、复选框课型讲授、练习授课日期2010.5.6授课时数2教学目标掌握用单选框、复选框进行属性设置学会如何制作收集信息的调查教学重点用单选框、复选框进行属性设置制作收集调查的表单教学难点制作收集调查的表单学情分析一种问题有多种方法解决,要让学生明白不同问题应用什么方法解决最好。板书设计项目一:字体属性设置项目二:信息调查1创建用户界面2设置属性3编写代码4调试和运行教师示范演示学生练习、教师辅导作品上传,教师点评教学后记通过对比教学,学生掌握效果很好,能完成练习任务
2、。江苏省无锡立信职教中心校备课笔记教学内容学生活动项目一:字体属性设置1创建用户界面2设置属性3编写代码提问:单选框、复选框的特征是什么?解决:单选框:任何时候有且只有一个被选中复选框:可以有任意个被选中附代码:PrivateSubCheck1_Click()Text1.FontBold=NotText1.FontBoldEndSubPrivateSubCheck2_Click()Text1.FontItalic=NotText1.FontItalicEndSubPrivateSubOption1_C
3、lick()Text1.FontSize=10EndSubPrivateSubCheck3_Click()Text1.FontUnderline=NotText1.FontUnderlineEndSub附图:老师示范演示学生练习、教师辅导学生思考回答提问学生练习江苏省无锡立信职教中心校备课笔记教学内容学生活动项目二:信息调查1创建用户界面2设置属性3编写代码提出问题:单选框、复选框是否被选中,通过什么来判断?解决:它们的value属性。附代码:PrivateSubCommand1_Click()Dim
4、str,ahAsStringxm=Text1.TextIfOption1.Value=TrueThenxb="男"Elsexb="女"EndIfIfCheck1.Value=1Thenah=Check1.CaptionEndIfIfCheck2.Value=1Thenah=ah+Check2.CaptionEndIfIfCheck3.Value=1Thenah=ah+Check3.CaptionEndIfstr="姓名:"+xm+"性别:"+xb+"爱好:"+ahMsgBoxstrEndSub附图:教
5、师提出问题、继而解决学生练习、教师辅导作品上传、教师点评学生听讲学生练习
此文档下载收益归作者所有