office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access使用键盘的加减号“+”或“ - ”上下滚动日期

2019-09-20 17:29:00
tmtony8
原创
4950

在应用程序中,如果默认日期与所需选择的日期相近。我们就可以让用户按“+”或者“-”来增加或者减少日期的录入。

这样就不需重新选择日期并输入新值。

如下面的代码,通过KeyPress事件获取键盘输入的KeyAscii值

Private Sub Text0_KeyPress(KeyAscii As Integer)
    Select Case KeyAscii
    Case 43            ' Plus key
        KeyAscii = 0
        Screen.ActiveControl = Screen.ActiveControl + 1
    Case 45            ' Minus key
        KeyAscii = 0
        Screen.ActiveControl = Screen.ActiveControl - 1
    End Select
End Sub




按两下“+”自动增加日期

    分享