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

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

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

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

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