分类

学习笔记 [17]
渗透测试 [4]
一些杂文 [14]
coding [16]
漏洞信息 [17]
技术文章 [15]
开发文档 [8]
个人作品 [5]
PS:个人作品在各种下载栏目均有下载

站内搜索

日历

«  February 2011  »
Su Mo Tu We Th Fr Sa
  12345
6789101112
13141516171819
20212223242526
2728

访问统计(起于2010/10/2)

访问统计
PortWatcher's Blog
Monday, 2025-06-30, 7:27 AM
Welcome Guest
Main | Registration | Login | RSS

Blog

Main » 2011 » February » 03
最近有人过生日,想写个程序作为生日礼物,打算用VB来写,功能是利用keydb_event()实现计算机虚拟人打字````
思路是1,2年前在<精通VB黑客编程>上看到的,时间隔得比较久,而书中对于虚拟键与真实键盘对应的声明描述得又不够完整```所以GOOGLE整理一下

Code


Option Explicit
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const VK_ADD As Long = &H6B '加号键
Private Const VK_APPS As Long = &H5D 'Applications 键(相当于鼠标右键)
Private Const VK_BACK As Long = &H8 'BackSpace 键
Private Const VK_CAPITAL As Long = &H14 'Caps Lock 键(大小写转换键)
Private Const VK_CANCEL As Long = &H3 'Ctrl + Break 过程
Private Const VK_CONTROL As Long = ... Read more »
Category: 学习笔记 | Views: 1018 | Added by: Jury | Date: 2011-02-03 | Comments (0)