数字键盘如何实现

WEB 开发	开发语言	Java 技术	.Net 技术	数据库	硬件使用
图象媒体	Linux/Unix	移动平台	嵌入开发	Windows 专区	软件工程

你的位置：首页 > 开发语言 > VB

数字键盘如何实现

[ 来源：ITWENKU 时间：2007-4-16 17:43:28 | 浏览：259人次 ]

简单的说就是我要点击屏幕上的0~9个数字然后在一个文本框中输出.但是最多只能输入4个数字.
谢谢大大们指点啊~ 在线等.

你做9个按钮,把每个按下的事件中定义一个整型变量如(a)
文本框为text1
把text1 控件的maxlength 设成4

Option Explicit

Private Sub Command1_Click()
Dim a As Integer
a = 1
Text1.Text = Text1.Text & a
End Sub

Private Sub Command2_Click()
Dim a As Integer
a = 2
Text1.Text = Text1.Text & a
End Sub

你就做9个按钮,分别把a设成 1,2,3,4,5,6,7,8,9

简单的说,就是一个不能转移输入焦点的topmost窗口(用setwindowlong可以实现),至于按键,你用sendkeys即可实现

·问个关于绘图的问题
·picturebox控件中设置left和height的值
·怎么样单击触发DataGrid
·vb如何后台操作word2007新建,另存
·vb用Inet如何实现FTP上传下载啊？(vs2005)
·文件是否已经打开？

推荐文章

初学VB 3天菜鸟问题很幼稚大家帮帮我谢谢。

MsgBox( ) 如何指定默认焦点按钮为否？

怎么样单击触发DataGrid

我的查询语句把结果放在datagrid中

在Picture中把窗体绘图显示，怎么知道窗体已经完全加载完毕？

我的Access时间字段查询出了点问题，望热心人相助

ActiveBar2如何传递在菜单工具条内textbox的值？

vb 菜单 (新建文件项)

vb程序报错,但找不到原因,并且错误里什么也没有写.请各位指教

vb-vc混合编程。。。堆栈溢出问题---在线等

如何用VB远程锁定无盘工作站上的卡拉OK点歌系统？只要使其不接受遥控器的遥控功能就行了，谢谢

解决就给分,请高手帮忙:richtextbox 的一个问题