《工具栏和状态栏(2)》由会员分享，可在线阅读，更多相关《工具栏和状态栏(2)（3页珍藏版）》请在金锄头文库上搜索。
1、江苏省无锡立信职教中心校教案江苏省无锡立信职教中心校教案课 题工具栏和状态栏课 型讲 授、练习 授课日期2010.5.31授课时数2教学目标巩固下拉式菜单的制作 让学生掌握工具栏、状态栏的创建 培养学生学习 VB 的兴趣教学重点工具栏 状态栏教学 难点工具栏编码的理解学情分析本课的内容学生可能感兴趣，有助于激发学生学习热情。板 书 设 计新授： 工具栏和状态栏工具栏和状态栏第一步：制作下拉式菜单第一步：制作下拉式菜单 布置任务 学生练习、教师辅导第二步：制作工具栏第二步：制作工具栏 1 创建按钮图像 2 工具栏创建 3 编程第三步：制作状态栏第三步：制作状态栏 1 添加控件 2 状态栏设置 3
2、 编码教师示范演示学生练习作品上传 老师点评总结教学 后记学生觉得本课很有意思，学习的情绪很高。江苏省无锡立信职教中心校备课笔记江苏省无锡立信职教中心校备课笔记教 学 内 容学生活动 教师展示样品 新授： 工具栏和状态栏工具栏和状态栏第一步：制作下拉式菜单第一步：制作下拉式菜单 1 创建用户界面 通过菜单编辑器 2 设置属性 3 编写代码 通过单击菜单项进入 4 调试和运行老师提出任务要求学生练习、教师辅导第二步：制作工具栏第二步：制作工具栏 在第一步完成基础之上，做第二步 添加控件：“工程”-“部件” 1 创建按钮图像 利用 imagelist 控件 2 工具栏创建 利用 toolbar 控
3、件 3 编程 附代码： Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.IndexCase 1s10_ClickCase 2s20_Click End Select End Sub 说明：Index 为按钮的索引属性；“s10_Click”为调用 s10_Click 过程教师示范演示学生练习、教师辅导学生看样品学生练习学生练习江苏省无锡立信职教中心校备课笔记江苏省无锡立信职教中心校备课笔记教 学 内 容学生活动 第三步：制作状态栏第三步：制作状态栏 1 添加控件 2 状态栏设置 3 编码 Private Sub hei_Click() Text1.Font = “黑体“ StatusBar1.Panels(2).Text = “黑体“ End Sub 说明：Panels(2)为第二个窗格教师示范演示 学生练习、教师辅导附图：学生作品上传 老师点评总结学生练习作品上传
