当前位置:首页 >> 其它课程 >>

VB6.0程序设计教案


第 33、34 课时 上课时间:2014 年 4 月 16 日 备课时间:2014 年 4 月 13 日 【课题】

3.3
【教学目标】

制作键盘按键测试程序

1、了解窗体的 KeyPreview 属性的用法 2、了解窗体的 Keydown、Keyup 和 Keypress 事件的用法 【德育目标】 培养

学生勇于探索未知世界,积极主动学习的思想,将来为祖国的科技发展 做出贡献。 【教学重点】 上述属性和事件的应用 【教学难点】 属性和事件的应用 【教具】 多媒体、计算机 【教学过程】 一、复习 1、窗体的 Resize 事件和 Unload 事件的使用? 二、导入 上一章讨论了 Visual Basic 中的窗体的常用属性以及两个事件的用法。本 节课我们来学习窗体的属性和事件的应用。 三、自主学习 1、窗体的 Keypreview 属性 窗体的 KeyPreview 属性用于返回或设置一个值,决定是否在控件的键盘事 件之前激活窗体的键盘事件,这些键盘事件包括 Keydown、KeyUp、KeyPreview

属性可在设计阶段通过属性窗口 进行设置,在本任务中就是采用这种办法。也 可以在运行阶段通过代码改变设置,语法格式如下: 窗体名.KeyPreview = boolean 其中 Boolean 为布尔表达式,指定如何接收事件。如果设置为 True,则窗 体先接收键盘事件,然后是活动控件接收事件;如果设置为 False(默认值) ,则 活动控件接收键盘事件,而窗体不接收键盘事件。 用 Keypreview 属性可以生成窗体的键盘处理程序。例如,应用程序利用功 能键时,需要在窗体级处理击键,而不是为每个可以接收击键事件的控件编写程 序。 如果窗体中没有可见和有效的控件,它将自动接收所有键盘事件。 若要在窗体级处理键盘事件,而不允许控件接收键盘事件时,也可以在窗 体的 KeyPress 事件中设置参数 KeyAscii 为 0,在窗体的 Keydown 中设置参数 KeyCode 为 0。 需要注意的是,一些控件能够拦截键盘事件,导致窗体不能接收它们。例 如,当命令按钮控件有焦点时的 Enter 键及焦点在列表控件上时的方向键。 1、窗体的 KeyPress 事件 KeyPress 事件是当用户按下和松开一个 ANSI 键时发生(ANSI 是可见的字 符,ASCII 字符 1~127) ,语法格式如下: Private sub form_keypress (keyascii as integer) 其中 keyascii 是返回一个标准数字 ANSI 键代码的整数。 具有焦点的对象接收该事件。一个窗体仅在 KeyPreview 属性被设置为 TRUE 时才能接收该事件。一个 KeyPress 事件可以引用任何可打印的键盘字符, 一个来自标准字母表的字符或少数几个特殊字符之一的字符与 Ctrl 键的组合, 以 及 Enter 或 Backspace 键。KeyPress 事件过程在截取击键时,可立即测试击键的 有效性或在字符输入时对其进行格式处理。在本任务中,通过 Chr(KeyAscii)函 数将 KeyPress 事件获得的标准数字 ANSI 键代码转变成可显示的字符并在标签中 显示。 2、窗体的 KeyUp 属性和 KeyDown 事件 在 Keypress 处理不了的功能可以由 Keydown 属性和 Keyup 事件来处理。 这

些事件是当一个对象具有焦点时按下(KeyDown)或松开(KeyUp)一个键时发 生,语法格式如下: Private sub object_keydown ( keycode as integer , shift as integer ) Private sub object_keyup (keycode as integer , shift as integer ) 其中 Keycode 是一个键代码,诸如 vbKeyF1(F1 键)或 vbKeyHome(Home 键) ;参数 Shift 是在该事件发生时响应 Shift、Ctrl 和 Alt 键的状态的一个整数。 Shift、Ctrl 和 Alt 键在这些位分别对应于值 1、2 和 4。 对于这两个事件来说,带焦点的对象都接收所有击键。一个窗体只有在不 具有可视的和有效的控件时才可以获得焦点。KeyDown 属性和 KeyUp 事件可应 用于大多数键,通常应用于扩展的字符键,如功能键、定位键、键盘修饰键合按 键的组合、 区别数字小键盘和常规数字键; 在需要对按下和松开一个键都响应时, 可使用 KeyDown、KeyUp 事件过程。 在下列情况下,不能引用 KeyDown 属性和 KeyUp 事件:窗体有一个命令 按钮控件且 Default 属性设置为 TRUE 时的 Enter 键。窗体有一个命令按钮控件 且 Cancel 属性设置为 True 时的 Esc 键、Tab 键。

四、合作探究 编程设计:创建一个键盘测试程序。程序运行后,当在键盘上按下任一个键 时,在窗体上显示出该键的代码和相应的字符并显示 SHIFT、CTRL 和 ALT 键的状 态,当按“ESC”键时,退出程序。 设计步骤: 1、在 Visual Basic 集成开发环境中新建一个 EXE 工程,并把窗体文件和工 程文件分别命名并保存。 2、把窗体 Form1 调整到所需的大小,并将其 Caption 属性值设置为“键盘 按键测试程序”,同时设置窗体的 KeyPreview 属性为 True。 3、在窗体 FORM1 上添加 3 个标签控件 Label1、Label2、Label3,把它们调 整到合适的大小和位置。 4、在窗体 Form1 的代码窗口中编写以下代码。 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case Shift

Case 1 label3.Caption = "alt、ctrl、shift 状态:shift 键按下" Case 2 label3.Caption = "alt、ctrl、shift 状态:ctrl 键按下" Case 4 label3.Caption = "alt、ctrl、shift 状态:alt 键按下" Case Else label3.Caption = "alt、ctrl、shift 状态:未按" End Select End Sub

Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 27 Then Unload Me Else label2.Caption = "你按得键是:" & ",ASCII 码为:" & KeyAscii End If End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) Form_KeyDown keycoad, Shift End Sub

5、保存所有文件。 6、按 F5 运行程序。 7、当在键盘上按任意键时,中部标签显示所按键的字符和对应的代码。当 按下键盘上的 SHIFT、CTRL 和 ALT 键时,下方标签显示按下的具体键名,松开后 显示“ALT、CTRL、SHIFT 状态:未按”。当按下“ESC”键时,程序关闭。 五、课堂小结

本节课主要通过设计小程序, 熟悉了窗体的 KeyPreview 属性和窗体的 KeyDown 事件、KeyUp 事件和 Keypress 事件。


相关文章:
VB6.0程序设计教案_4.5
VB6.0程序设计教案_4.5_计算机软件及应用_IT/计算机_专业资料。4.5 一、 复习。 创建简单选课系统 1 、单选按钮控件 (OptionButton) 、框架控件 (Frame) 、复选...
《VB程序设计》教案
本课小结: 面向对象程序设计 可视化程序设计 布置作业: P20 页 习题一 2、3,预习:第 2 课 教案首页 2009 年 9 月 9 日 1 周 课题:VB6.0 应用程序的...
VB6.0程序设计教案_第63、64课时
VB6.0程序设计教案_第63、64课时_其它课程_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 VB6.0程序设计教案_第63、64课时_其它课程_高中教育_教育专区...
VB6.0程序设计教案_4.7
VB6.0程序设计教案_4.7_计算机软件及应用_IT/计算机_专业资料。4.7 一、复习 制作简单动画 滚动条(HScrollBar、VScrollBar)的常用属性和常用事件? 二、本节重点 1...
VB6.0程序设计教案_创建简单选课系统
VB6.0程序设计教案_创建简单选课系统_其它_高等教育_教育专区。4.5 一、复习 创建简单选课系统 1 、单选按钮控件 (OptionButton) 、框架控件 (Frame) 、复选框...
VB6.0程序设计教案_第29、30课时
VB6.0程序设计教案_第29、30课时 暂无评价|0人阅读|0次下载|举报文档 第29、30 课时 上课时间:2014 年 4 月 9 日 备课时间:2014 年 4 月 7 日 【课题...
VB6.0程序设计教案_第1、2课时
VB6.0程序设计教案_第1、2课时_工学_高等教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 VB6.0程序设计教案_第1、2课时_工学_高等教育_教育专区。...
VB6.0程序设计教案_7.1
VB6.0程序设计教案_7.1_计算机软件及应用_IT/计算机_专业资料。7.1 一、复习 制作图片浏览器 1、滚动条的常用属性和常用事件; 2、计时器控件的常用属性和常用...
vb程序设计教案(详细)
vb程序设计教案(详细)_IT/计算机_专业资料。vb程序设计教案(详细)第1 章 Visual Basic 6.0 概述 [课程引入]:先用教师机播放《VB教学实例程序演示系统》软件,将...
VB6.0程序设计教案_第61、62课时
VB6.0程序设计教案_第61、62课时_其它课程_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 VB6.0程序设计教案_第61、62课时_其它课程_高中教育_教育专区...
更多相关标签:
vb程序设计教案 | vb6.0程序设计 | vb6.0程序设计教程 | 高中 vb6.0入门 教案 | vb6.0打包程序 | vb6.0程序打包工具 | vb6.0串口通讯程序 | vb6.0发布程序 |