Office中国论坛/Access中国论坛

标题: 触摸屏软件 使用调用键盘的方法。 [打印本页]

作者: accessNew001    时间: 2008-12-27 23:07
标题: 触摸屏软件 使用调用键盘的方法。
请问一下,1。ACCESS有没方法调用WINDOWS自带的屏幕键盘。
                  2。如果自己将数字键的按键放大,那么按键的功能是需要怎么样写代码。[qq]34363452[/qq]
另外有软件外包的项目,请有兴趣的联系我
作者: Henry D. Sy    时间: 2008-12-27 23:24
Dim i
i = Shell("C:\WINDOWS\system32\osk.exe")
作者: Henry D. Sy    时间: 2008-12-27 23:37
用按钮的话,要写很多按钮事件
如果用选项组的话,也许代码会简单点
比如
Private Sub Frame34_Click()
    Dim str As String
    If Not IsNull(Me.Frame34) Then
        str = Me.Frame34
    End If
    Me.Text15 = Me.Text15 & str
End Sub
作者: Henry D. Sy    时间: 2008-12-28 09:32
这样可以解决切换按钮弹起的问题

Private Sub Frame34_AfterUpdate()
   Dim str As String
    If Not IsNull(Me.Frame34) Then
        str = Me.Frame34
    End If
    Me.Text15 = Me.Text15 & str
End Sub
Private Sub Frame34_Click()
    Me.Frame34 = Null
End Sub
作者: accessNew001    时间: 2008-12-28 18:08
先谢谢 HENRY 我去试一下 看看。




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3