触摸屏软件 使用调用键盘的方法。

accessNew001

请问一下，1。ACCESS有没方法调用WINDOWS自带的屏幕键盘。
                  2。如果自己将数字键的按键放大，那么按键的功能是需要怎么样写代码。
另外有软件外包的项目，请有兴趣的联系我

Henry D. Sy

Dim i
i = Shell("C:\WINDOWS\system32\osk.exe")

Henry D. Sy

用按钮的话，要写很多按钮事件
如果用选项组的话，也许代码会简单点
比如
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

这样可以解决切换按钮弹起的问题

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

先谢谢 HENRY 我去试一下 看看。