锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net虚拟键盘控件 vbs 模拟键盘( 二 )

IT技术指定


F5
{F5}
F6
{F6}
F7
{F7}
F8
{F8}
F9
{F9}
F10
{F10}
F11
{F11}
F12
{F12}
F13
{F13}
F14
{F14}
F15
{F15}
F16
{F16}
为了指定那些与
SHIFT、CTRL
及
ALT
等按键结合的组合键，可在这些按键码的前面放置一个或多个代码，这些代码列举如下：按键
代码
【vb.net虚拟键盘控件 vbs 模拟键盘】SHIFT
+
CTRL
^
ALT
%
为了说明在按下其它按键时应同时按下
SHIFT、CTRL、及
ALT
的任意组合键，请把那些按键的码放在括号当中 。例如，为了说明按下
E
与
C
的时候同时按下
SHIFT
键，请使用
"+(EC)" 。为了说明在按下
E
的时候同时按下
SHIFT
键 ， 但接着按
C
而不按
SHIFT ， 则使用
"+EC" 。为了指定重复键，使用
{key
number}
的形式 。必须在
key
与
number
之间放置一个空格 。例如，{LEFT
42}
意指
42
次按下
LEFT
ARROW
键；{h
10}
则是指
10
次按下
H
键 。注意
不能用
SendKeys
将按键消息发送到这样一个应用程序 ， 这个应用程序并没有被设计成在
Microsoft
Windows
中运行 。Sendkeys
也无法将
PRINT
SCREEN
按键
{PRTSC}
发送到任何应用程序 。
参考资料：MSDN
求VB.net 制作的软键盘“屏幕键盘”我现在没有现成的代码给你，不过可以给你一些建议 。如果你想在同一进程内实现屏幕键盘，则你只需要再F2打开的时候，将F1的当前焦点控件对象作为参数，传递给F2窗体，在F2点击屏幕控件时，设置该“控件.Text = 键值” 即可，这种我称之为假屏幕键盘 。如果你想跨进程实现屏幕键盘，就比较难些了（比如：你想用你的F2窗体上的按键，实现QQ聊天内容的输入、记事本内容的输入） 。这个需要用到 “键盘钩子”技术，有关这方面的资料，你不妨自己找找 。另外，你提的F2焦点老处理不好，我认为F2根本不需要焦点控件（不要用按钮做控件，而实用Label或图片就可以了 。）
vb制作软键盘dim n as Integer
Textbox1的getfocus 事件：
n=1
............................（其他textbox的getfocus事件设置相应的n值）
commandbotton1的click事件：
select case n
case 1
textbox1.text=textbox1.text"1"
textbox1.setfocus
......................
以上只是思路，具体操作建议你使用控件数组，这样可以简化很多代码 。
如何用VB做一个软件键盘?主要是数字键盘就行了!在窗体上放置以下控件：
1、lblResult Label控件 设置lblResult.Caption = 0
2、btnNum(0)~btnNum(9) 按钮控件数组 ， 下标对应齐数字（如：btnNum(0).Caption=0，依次类推）
3、添加btnAdd（加法）、btnSub（减法）、btnMul（乘法）、btnDiv（除法）、btnEnter（等于号）、btnReset（清除键）六个按钮 。
在窗体代码中输入以下内容：
Dim byteOperation As Byte'操作符
Dim byteTmp As Byte'临时操作符
Dim intNum As Double'输入的数字
Sub Calc()
Select Case byteOperation
Case 1'Add
lblResult.Caption = CDbl(lblResult.Caption) + intNum
Case 2'Sub
lblResult.Caption = intNum - CDbl(lblResult.Caption)
Case 3'Mul
lblResult.Caption = CDbl(lblResult.Caption) * intNum
Case 4'Div
lblResult.Caption = intNum / CDbl(lblResult.Caption)

推荐阅读


上一篇：宝鸡专注sap联系方式，宝鸡哪个酒店有spa

下一篇：cssinput样式属性，css选择input的type属性