지로 이동은 다음 레코드를 눌렀을 때입니까?

StackOverflow https://stackoverflow.com/questions/543147

문제

나는 형에 액세스하는 2003 년에만 일일 기록합니다.내가 설정할 수 있습니다 Cycle 제공하는 Current Record, 지만,형식은 여전히 점프 다음 레코드를 누르면 입력합니다.먼저 생각하였 KeyPreview 제공하지만 보지 못하고 하나입니다.내 다른 생각은 어쩌면 KeyPress 나 KeyUp 이벤트이지만,나는 요청의 경우에 의도치 않은 결과입니다.어떤 아이디어가?

도움이 되었습니까?

해결책

사이클이 시설에 영향을 미치는 있습니다.

을 제어하는 행동의 키를 입력하는 글로벌 제공합니다.

도구/옵션 키보드 탭에서"이 후에 입력"선택"다음 분야"

기의 키 및 KeyDown 이벤트에 사용할 수 있는 함정 Enter 키를 너무나 더 작동합니다.

다른 팁

이에서 수행할 수 있습 vba.

Application.GetOption "Move After Enter" 'get current setting
Application.SetOption "Move After Enter", 0 'don't move
Application.SetOption "Move After Enter", 1 'Next Field
Application.SetOption "Move After Enter", 2 'Next Record

http://www.pcreview.co.uk/forums/enter-key-moving-next-field-t3454281.html

는 순간 열쇠 TAB, Alt, PgUP, PgDn, 입력 가 누르면 끝에 추가하여 레코드(마드 대부분)데이터베이스를 자동 저장하는 모든 정보를 입력 폼에서 닦아 주시고 필드를 입력할 수 있도록 다음 값입니다.그래서 무엇이 일어나가는 데이터는 저장되지만 양식을 보 비어 있습니다.

3things to do:

  1. 양식주기 시설은 현재 레코드입니다.
  2. 형식 키 미리보기를 제공 Yes 로 설정되어 있습니다.

  3. 다음 코드를 추가하 KeyDown 이벤트의 형태로 되어 있습니다.

    '33 - PgUp; 34 - PgDown; 9 - Tab; 18=Alt; 13=Enter

Select Case KeyCode
Case 33, 34, 18, 9, 13
KeyCode = 0    
Case Else
'Debug.Print KeyCode, Shift
End Select

    내가 이것을 발견하는 동안 닦는 웹과하지 않는 신용/책임한 코드 하지만 난 어디 있는지 몰라 내가 그것을 발견했습니다.나를 위해 일한다!

사이클 속에서 작동합니다 Tab 키입니다.

두 가지 옵션이 있습니다 당신이 추구할 수 있었다.

할 수 있습 트랩에서 키를 입력 KeyDown/KeyUp/KeyPressed
-또는-
를 필터링할 수 있습 데이터 소스를 하나의 레코드 그들을 원하는 편집,사용하지 않도록 새로운 레코드 추가를 통해하는 양식입니다.

추가할 수 있습니다 코드 아래의 양식을'BeforeUpdate'이벤트입니다.는 경우에는 사용으로 이동하려면 다음을 것이다,기록하는 사용자에게 절약 양식을 닫기 전에 그들은 이동할 수 있는 다른 recorde.

  Private Sub Form_BeforeUpdate(Cancel As Integer)
    Select Case MsgBox("Save?", vbYesNo)
      Case vbYes
        DoCmd.Close
      Case vbNo
        Cancel = True
    End Select
  End Sub

으로 이동하는 경우 액세스에 대한 옵션이 파일 페이지로 이동하는 클라이언트 설정과 처음에 설정한 것입니다 당신이 당신의 위치를 선택하고 초점을 변경하는 경우 enter 키를 누릅니다.적어도에서 액세스는 2013.

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top