VB第45、46课时(制作键盘按键测试程序)
VB完美模拟键盘输入
Public Const VK_CONTEXTKEY = &H5D
Public Const VK_NUMPAD0 = &H60
Public Const VK_NUMPAD1 = &H61
Public Const VK_NUMPAD2 = &H62
'▼该函数检取指定虚拟键的状态。该状态指定此键是UP状态，DOWN状态，还是被触发的（开关每次按下此键时进行切换）。
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
'▼该函数使过程休眠以毫秒计的用户定义时间。
'参数bVk表示要模拟的按键的虚拟码，bScan表示该按键的扫描码(一般可以传0)，dwFlags表示是按下键还是释放键(按下键为0，释放键为2)，dwExtraInfo是扩展标志，一般没有用。
'▼键码常量表
Private Const KEYEVENTF_KEYUP = &H2
Public Const VK_LBUTTON = &H1
'=============全功能模拟键盘鼠标操作(一）－－－－模拟键盘进行按键或信息录入操作。范围：任意数字、字母的组合，模拟过程：逐个发送连续字符串中键名信息================================
'作者: ghong3298226 (原创)
'作者QQ:87732850
Public Const VK_RETURN = &HD
VB教程：第四章-按钮
VB教程：第四章-按钮文章来源：vb大世界-从本章开始我们将正式进入VB的编程世界，但这还仅仅是个开端，要编出功能强大的软件，还要学很多东西，那就要看以后的VB高级教程了，我也得努力学啊！按钮是我们在Windows操作见到最多的控件，它们有着各种各样的功能：“确认”、“取消”、“下一步”等等，这些都是按钮的表现，另外还有很多图形话的按钮，其实它们并没什么不同，所有的按钮都是通过单击（click）事件实现的，只不过是在外表不同罢了。
下面就让我们建立一个最简单的按钮，双击工具箱的CommandButton，将在窗体上建立一个形如图4－1的按钮，它的缺省名（Name属性）为Command1，我们可以把它改名为cmdExit，把Caption属性设为“退出”，然后双击，按钮填写代码：Private Sub cmdExit_Click()Unload MeEnd Sub按下F5或者工具条上的播放按钮，运行程序。
图4－2当你按下退出按钮的时候，就会自动退出程序，原因是当你单击按钮时激活了它的Click事件，执行“Unload Me”语句，使得窗体被卸载。
上面举了一个比较简单的例子，下面的例子稍微复杂些：新建窗体，控件布局如图4－3所示，包括一个Label控件，一个Text控件和两个按钮（Command1和Command2），（比较简单的程序我们都采用缺省名），对它们属性做如下修改：把使用Button1的Enabled属性设为False（假），是使程序在初始时，无法单击Command1。
按F5，运行程序，图4－4，复原按钮成为灰色，不可选。
当然现在程序还什么也不能做，下面我们在程序中添加代码：首先在General里声明全局变量：Dim StoreString As String '用来储存字符串※注意：为什么用全局变量？VB里每一个小过程都相当于一个程序，程序里的变量称为局部变量，是只能在程序内部使用的，而当程序调用结束后，由于从内存中被清除，所以变量储存的值也就消失了，这里的全局变量是用来在过程中传递字符串。
用VB编写打字测试程序的难点和技巧
一
Ｌ ｔ（５ Ｔ ０ ，ｎ ｍ （８ Ｔ ７ ， ｐ ，Ｓｈｔ ｒ ＡＩ Ｂ，ＲＢ， ｅｔ６ ｏ ９ ） ｕ ４ ｏ ５ ） Ｃａ ｓ ｆ，Ｃｔｌ ｔ ， ，Ｌ
ｎ ｍ（） Ｇｅ Ｋ Ｖ ｔｔ （） ｕ ｏ＝ ｔ ｅ Ｓ ａｅ Ｏ
ｌ ｎ ｍ （）＜ ０ Ｔ ｅ ｆｕ ｏ ｈｎ
ＩＩ ｂＮＵＭ 《） ｓｂｅ＝Ｔｒｅ Ｏ ． ｉｌ Ｖｉ ｕ
Ｅｌｅ ｓ
（ ２）设 计 要 点
５ ）核 心 代 码 示 例 ：
（ 窗 体 上 创建 ３个 时 间控 件 ，其 中 的第 ３个 时 间控 件 用 在
来 监 控 虚 拟 键 盘 的按 键 情 况 ，Ｉｔｒａ 属 件 设 置 为 １ ｎｅｖｌ 。 Ｐ ｉａｅ Ｓ ｂＴｉ ｒ ｉ ｒ ｒ ｔ ｕ ｍｅ ３＿ ｍｅ （ ｖ Ｔ ）
…
…
…
…
…
…
…
…
…
…
…
…
’
。
实用第一 智慧密集
… ．
ｊ
用 ｖＢ编 写打 字测 试 程 序 的 难 点和 技 巧
２ ）在 每 个 按 键 上 都要 添加 一 个 Ｌ ｂ ｌ 件 。 ａｅ 控
以编 写 的两 个 键 盘 操作 测 试 程 序 ，解 答用 Ｖ Ｂ编 写打 字 测 试 程 序 中 的难 点 和 技 巧 。
Ｑ ， Ｄ， Ｂ ， Ｂ ， Ｐ Ｅ ｔ Ａ Ｔ Ｓ Ｌ Ｓ Ｒ Ｓ ， ｎ
Ｄｉ ｆ《 １ Ｏ １ ３ ｍ ｆ１ ２Ｔ ２ ）
VB第45、46课时(制作键盘按键测试程序)
第45、46课时（总第46课时）课题：制作键盘按键测试程序备课时间： 2016.11.2 上课时间：教学目标：1、掌握窗体的KEYPREVIEW属性2、掌握窗体的键盘事件3、掌握窗体的KEYPRESS事件教学重点：窗体的KEYPREVIEW属性教学难点：键盘事件教学方法：讲练结合法，演示法，任务驱动法教具：计算机、班班通投影仪设备教学过程：一、课前检测1、窗体的外观尺寸有哪两个属性决定？2、窗体的RESIZE事件什么时候发生？3、窗体的UNLOAD事件什么时候发生？二、新课<一>确定主题明确目标学习目标：1、掌握窗体的KEYPREVIEW属性2、掌握窗体的键盘事件3、掌握窗体的KEYPRESS事件学习重难点：窗体的KEYPREVIEW属性，键盘事件<二>依据提纲合作学习1、窗体的键盘事件有哪三个?2、窗体的KEYPRESS事件的语法格式是什么？3、窗体的KEYPREVIEW属性的功能是什么？4、当KEYPREVIEW值为TRUE时表示什么含义？5、当KEYPREVIEW值为FALSE时表示什么含义？6、如果窗体中没有可见和有效控件，则窗体会自动接收什么事件？7、如要要在窗体级处理键盘事件，而不允许控件接收键盘，则应进行什么设置？8、在窗体的KEYUP和KEYDOWN事件中，参数SHIFT有哪几个值？含义分别是什么？9、参数KEYCODE表示什么含义？10、当参数SHIFT值为6时，表示什么含义？<三>交流展示教师点拨各小组同学依据提纲内容认真研讨答案，并指派代表在班上进行回答，教师根据回答情况及时做出补充、纠正、点评。
<四>课堂训练信息反馈练习：1、当用户按下或松开一个可见字符键时发生_______事件。
2、如果只允许窗体接收键盘事件，而不允许控件接收键盘事件，则应在KEYPRESS事件中，将参数KEYASCII设置为______。
3、窗体的KEYPREVIEW属性值是______类型的数据。
VB程序设计教程 习题解答
《VB程序设计教程》（第4版）习题解答单元一巩固与提高答案一、选择题1. Visual Basic 6.0分为3种版本，不属于这3种版本的是A）学习版B）专业版C）企业版D）业余版【答】D。
2. 下列方法中不能退出Visual Basic的是A）按Alt+Q组合键B）按下Alt+F组合键，然后按Esc键C）按F10键，然后按F键，再按X键D）打开“文件”菜单→“退出”命令【答】B。
3. Visual Basic集成的主窗口中不包括A）属性窗口B）标题栏C）菜单栏D）工具栏【答】A。
4. 下列操作可以打开立即窗口的是A）Ctrl+D B）Ctrl+F C）Ctrl+G D）Ctrl+E【答】C。
二、填空题1. 与传统的程序设计语言相比，Visual Basic最突出的特点是____。
【答】事件驱动编程机制。
2. 如果不使用鼠标，用键盘打开菜单和执行菜单命令，第一步应按____键。
【答】功能键F10或Alt键。
3. 建立一个新的标准模块，应该选择____菜单下的“添加模块”命令。
【答】“工程”菜单。
三、思考题1. 简述Visual Basic的特点。
【答】与一般的程序设计语言相比，VB具有以下特点：(1) 可视化的设计平台；(2) 面向对象的设计方法；(3) 事件驱动的编程机制；(4) 结构化的设计语言；(5) 充分利用Windows资源；(6) 开放的数据库功能与网络支持。
2. 简述Visual Basic集成开发环境的组成。
【答】VB 6.0集成开发环境除了具有标准Windows环境的标题栏、菜单栏、工具栏外，还有工具箱、属性窗口、工程管理器窗口、窗体设计器、立即窗口、窗体布局窗口等有用的开发工具。
(1) 标题栏和菜单栏：标题栏中显示的有窗体控制菜单图标、当前激活的工程名称、当前工作模式以及最小化、最大化∕还原、关闭按钮。
菜单栏中显示了“文件”、“编辑”、“视图”、“工程”、“格式”等菜单项，其中包含了VB编程的常用命令。
VB模拟按键终极教程
VB模擬按鍵終極教程`有了它`啥游戏都不怕全局級模擬你會發現，用上面的方法類比按鍵並不是對所有程式都有效的，有的程式啊，你向它發了一大堆消息，可是它卻一點反應也沒有。
這是怎麼回事呢？這就要看具體的情況了，有些程式(特別是一些遊戲)出於某些原因，會禁止用戶對它使用類比按鍵程式，這個怎麼實現呢？比如可以在程式中檢查一下，如果發現自己不是活動視窗，就不接受鍵盤消息。
或者仔細檢查一下收到的鍵盤消息，你會發現真實的按鍵和類比的按鍵消息總是有一些小差別，從這些小差別上，目的程式就能判斷出：這是假的！是偽造的！！因此，如果用PostMessage發送局部消息類比按鍵不成功的話，你可以試一試全局級的鍵盤消息，看看能不能騙過目的程式。
類比全局鍵盤消息常見的可以有以下一些方法：(1) 用API函數keybd_event，這個函數可以用來類比一個鍵盤事件，它的VB聲明為：Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags A s Long, ByVal dwExtraInfo As Long)參數bVk表示要類比的按鍵的虛擬碼，bScan表示該按鍵的掃描碼(一般可以傳0)，dwFlags表示是按下鍵還是釋放鍵(按下鍵為0，釋放鍵為2)，dwExtraInfo是擴展標誌，一般沒有用。
比如要模擬按下A鍵，可以這樣：Const KEYEVENTF_KEYUP = &H2keybd_event VK_A, 0, 0, 0'按下A鍵keybd_event VK_A, 0, KEYEVENTF_KEYUP, 0'釋放A鍵注意有時候按鍵的速度不要太快，否則會出問題，可以用API函數Sleep來進行延時，聲明如下：Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)參數dwMilliseconds表示延時的時間，以毫秒為單位。
国家二级VB机试(上机操作)模拟试卷287(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷287(题后含答案及解析) 题型有：1.jpg />正确答案：第1小题步骤1：新建一个“标准ExE”工程，如表4—45在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题步骤1：新建一个“标准EXE”工程，如表4—46在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写命令按钮的单击事件过程。
参考代码：Private Sub Text1_Change( )P1：Print Text1．TextEnd Sub步骤3：按要求将文件保存至考生文件夹中。
解析：第1小题：本题只需按要求画出控件并设置其相关属性即可。
第2小题：要实现本题所要求的功能，可在文本框的Change事件过程中，将当前文本框中的文本用Print方法输出到图片框中。
简单应用题2．(1)在考生目录下有一个工程文件sjt3．vbp，窗体上有一个单选按钮数组，含三个单选按钮，均没有标题，请利用属性窗口，为单选按钮依次添加标题为“北京”、“上海”、“广州”；再添加一个标题为“显示”的命令按钮，如图3—75所示。
程序的功能是在运行时，如果选中一个单选按钮后，单击“显示”按钮，则根据单选按钮的选中情况，在窗体上显示“我的出生地是北京”、“我的出生地是上海”或“我的出生地是广州”。
要求：①依次添加单选按钮标题为“北京”、“上海”、“广州”；设初始选中的是“上海”，添加命令按钮标题为“显示”。
②去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的其他属性。
最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4．vbp，请在Form1窗体中画三个标签，名称分别为B1、B2、L1，标题分别为“字号”、“字体”、“计算机等级考试”，其中L1的高为500，宽为3000；再在B1、B2标签的下面画两个组合框，名称分别为Cb1、Cb2，并为Cb1添加项目：“10”、“15”、“20”，为Cb2添加项目：“黑体”、“隶书”、“宋体”。
Visual Basic教案第45、46课时
4.2 制作注册窗体【教学目标】1、掌握文本框控件的常用属性、常用方法和常用事件；2、熟悉为文本框控件设置访问键的方法。
【教学重点】文本框控件的常用属性、常用方法和常用事件【教学难点】为文本框控件设置访问键【教具】多媒体、计算机【教学过程】一、复习1、标签控件的常用属性有哪些？二、导入上一章讨论了Visual Basic中标签控件的常用属性、常用方法、常用事件以及控件的基本操作。
本节课我们来通过制作小程序，学习文本框控件的属性、方法、事件及如何将文本框控件设置访问键。
三、自主学习1、文本框的常用属性。
除拥有控件的通用属性哇塞，文本框控件还具有以下常用属性。
1）MaxLength：返回或设置一个值，指出在文本框控件中能够输入的字符是否有一个最大值，如果是：则指定能够输入的字符的最大数量。
在DBCS系统中，每个字符能够取两个字节而不是一个字节，以此来限制用户能够输入的字符的数量。
2）MultiLine：返回或设置一个布尔值，决定文本框是否可以接受或显示多行文本。
若设置为TRUE，则文本框允许多行文本，此时可在文本框内用Alignment 属性设置文本的对齐方式；若设置为False（默认值），则忽略回车符并将数据限制在一行内，此时Alignment属性不起作用。
该属性在运行时是只读的。
3）PasswordChar：返回或设置一个值，指示所输入的字符或占位符在文本框控件中是否要显示出来。
例如，在用文本框输入密码时，通常将该属性设置为“*”。
若MultiLine属性设置True，则设置PasswordChar属性将不起效果。
4）ScrollBasrs：返回或设置一个值，指示一个对象是有水平滚动条还是有垂直滚动条。
该属性有以下4个取值。
vbSBNone-0（默认值）：无滚动条vbHozontal-1：有水平滚动条vbVertical-2：有垂直滚动条vbBoth-3：同时有两种滚动条5）SelLength、SelStar和SelText：这些属性用于对文本框中的文本进行选定操作。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第45、46课时（总第46课时）
课题：制作键盘按键测试程序
备课时间： 2016.11.2 上课时间：教学目标：
1、掌握窗体的KEYPREVIEW属性
2、掌握窗体的键盘事件
3、掌握窗体的KEYPRESS事件
教学重点：
窗体的KEYPREVIEW属性
教学难点：
键盘事件
教学方法：
讲练结合法，演示法，任务驱动法
教具：
计算机、班班通投影仪设备
教学过程：
一、课前检测
1、窗体的外观尺寸有哪两个属性决定？
2、窗体的RESIZE事件什么时候发生？
3、窗体的UNLOAD事件什么时候发生？
二、新课
<一>确定主题明确目标
学习目标：
1、掌握窗体的KEYPREVIEW属性
2、掌握窗体的键盘事件
3、掌握窗体的KEYPRESS事件
学习重难点：
窗体的KEYPREVIEW属性，键盘事件
<二>依据提纲合作学习
1、窗体的键盘事件有哪三个?
2、窗体的KEYPRESS事件的语法格式是什么？
3、窗体的KEYPREVIEW属性的功能是什么？
4、当KEYPREVIEW值为TRUE时表示什么含义？
5、当KEYPREVIEW值为FALSE时表示什么含义？
6、如果窗体中没有可见和有效控件，则窗体会自动
接收什么事件？
7、如要要在窗体级处理键盘事件，而不允许控件接
收键盘，则应进行什么设置？
8、在窗体的KEYUP和KEYDOWN事件中，参数SHIFT
有哪几个值？含义分别是什么？
9、参数KEYCODE表示什么含义？
10、当参数SHIFT值为6时，表示什么含义？
<三>交流展示教师点拨
各小组同学依据提纲内容认真研讨答案，并指派
代表在班上进行回答，教师根据回答情况及时做出补充、纠正、点评。
<四>课堂训练信息反馈
练习：
1、当用户按下或松开一个可见字符键时发生
_______事件。
2、如果只允许窗体接收键盘事件，而不允许
控件接收键盘事件，则应在KEYPRESS事
件中，将参数KEYASCII设置为______。
3、窗体的KEYPREVIEW属性值是______类型
的数据。
<五>整理检测总结反思
检测：
解释下列事件完成的功能：
1、在KEYUP和KEYDOWN事件中，当参数SHIFT
值为6时，表示同时按下了______ 键和
______键。
2、如果参数KEYCODE的值为VBKEYF1，则表
示按下了键盘上的______键。
3、窗体的键盘事件包括
_______,________,___________。
4、窗体的KEYPREVIEW属性的功能是
_________________。
小结：本节主要学习窗体的KEYPREVIEW属性以及窗体的键盘事件。
课后反思：。