Alıntıdır
Yaptığımız projelerin daha profesyonel olması için .....
Numpadde bulunan + ve - tuşları ile tarihleri veya sayıları artırıp azaltabilmek için ...
her hangi bir kontrolün key pressed bölümüne şu kodlar yazılır

Select Case KeyAscii
Case 43 ' +
KeyAscii = 0
Screen.ActiveControl = Screen.ActiveControl + 1
Case 45 ' -
KeyAscii = 0
Screen.ActiveControl = Screen.ActiveControl - 1
End Select

Hayırlı akşamlar 
Benim giriş formunun sıra numarası sütununa bazen sıra numarası giriyorum bazen sıra numarası girmiyorum. 
Benim isteğim sıra numarası yazdığım son numarayı 1 ile toplayıp formun metin kutusuna yazsın ben yeni kayıtta numara vermek istediğimde butona basınca metin kutusundaki numarayı sıra numarası sütununa eklesin istiyorum.
Son numarayı bulup 1 ile toplama oluyor mu acaba bana yardım edebilirmisiniz.