拼音输入法的小键盘

拼音输入法的小键盘

ID:32425768

大小:32.50 KB

页数:9页

时间:2019-02-04

拼音输入法的小键盘_第1页
拼音输入法的小键盘_第2页
拼音输入法的小键盘_第3页
拼音输入法的小键盘_第4页
拼音输入法的小键盘_第5页
资源描述:

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

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个普通键的代码就用的很少。所有代码如

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。