拼音输入法的小键盘

《拼音输入法的小键盘》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、看见微软智能拼音输入法的小键盘了吗？那东东可以在输入的时候用代替键盘。 当不希望操作员使用键盘的时候，那么你就要考虑为她或他提供软键盘了。下面我们就用VB来做这 个软键盘。 准备工作： 先画两个窗体Form1和Form2,Form2是作为接收按键测试用的，在上面放一个文本框Text1，把 Text1的MultiLine属性设为True,ScrollBars设为3-Both,然后写入如下代码： Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEna

2、ble As Long) As Long Private Sub Form_Load() '调整大小 Me.Width = Screen.Width * 0.9 Me.Height = Screen.Height * 0.9 Form1.Show '禁止鼠标和键盘输入 EnableWindow Text1.hwnd, False End Sub Private Sub Form_Resize() '调整文本框大小 Text1.Top = 0 Text1.Left = 0 Text1.Width = Me.ScaleWidth Text1.Height =

3、 Me.ScaleHeight End Sub Private Sub Form_Unload(Cancel As Integer) End End Sub Form1作为小键盘用，把它的BorderStyle设为3-Fixed Dialog,把ControlBox属性设 为False，这样小键盘就没有标题栏了。Form1得跟微软智能拼音输入法的小键盘完全一样的大小 的窗体，经笔者的计算长×高是5310×2130。然后放上10个按扭，其中九个的Caption分别是 Tab、Caps、↑Shift、Ins、Del、(空格)、Esc、Enter和←(退格)。

4、它们的位置和大小如下设 置： Caption Top Left Height Width Name ↑Shift 1230 0 400 840 Command1 Caps 828 0 400 560 Command2 Tab 410 0 400 480 Command3 Ins 1640 0 400 570 Command4 Del 1640 870 400 550 Command5 (空格) 1640 1400 400 2565 Command6 Esc 1640 4670 400 550 Command7 Enter 820 4590 400 630

5、 Command9 ←(退格) 820 4590 400 630 Command10 接下来做一个Height为400、Width为360的按扭Command8,Caption为A a（注意中间是两个空 格，这一点非常重要！），由于按扭太小，系统会自动换行，看上去A在a的上面。复制该按扭，然 后在窗体上粘贴，程序会提示你是否产生控件数组，选择是，Command8变成了Command8(0),新产 生的按扭为Command8(1),一直粘贴，直到Command8(46)，修改它们的Caption使之与键盘上的其 它键一样。这里要注意几点： 1、按扭的字体为

6、“小五”，有几个键显示的结果是纵向并排，可把字体设为“六号”，使之横向 并排，字体使用宋体，否则↑和←显示的不漂亮。 2、&符号要使用两个，即 && 7(&&与7之间只有一个空格)，确保每个按扭的Caption的长度为四 个字母。 3、把窗体的MousePointer设为15 - Size All，以便在运行的时候移动小键盘。 4、把所有按键的MousePointer都设为99 - Custom,而MouseIcon设为手形指针。 5、由于要指示Shift是否按下，Command1的Style属性设置为1-Graphical。 6、Form2的Start

7、UpPosition属性设置为2-屏幕中心。 我们把Command8(x)的这些键暂时叫做“普通键”。由于前面已经定位了9个特殊键，所以可以通 过菜单栏的“格式”里面的“顶端对齐”、“相同水平间距”等选项很容易地把47个普通键放到与 键盘对应的位置上。另外，为了显示CAPS LOCK的状态，我们在窗体上加一个标签Label1，把它的 AutoSize属性设为True,Caption属性设为●，它的Top、Left、Height和With分别为1340、 4800、180和180。 接下来是写代码了，这里主要用了SendMessage发送消息的API函数，

8、由于按扭CAPTION设置的巧 妙，所以47个普通键的代码就用的很少。所有代码如