access使用鍵盤的加減號“+”或“ - ”上下滾動日期

2019-09-20 17:29:00
tmtony8
原創
266

在應用程序中,如果默認日期與所需選擇的日期相近。我們就可以讓用戶按“+”或者“-”來增加或者減少日期的録入。

這樣就不需重新選擇日期併輸入新值。

如下麵的代碼,通過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




按兩下“+”自動增加日期

    分享