Tránh chuyển sang bản ghi tiếp theo khi nhấn Enter?

Question

Tôi có một biểu mẫu trong Access 2003 chỉ nên làm việc với một bản ghi duy nhất. Tôi có thể đặt thuộc tính Cycle thành Current Record nhưng biểu mẫu vẫn chuyển sang bản ghi tiếp theo khi tôi nhấn Enter. Suy nghĩ đầu tiên của tôi là tài sản KeyPreview, nhưng tôi không thấy một. Suy nghĩ khác của tôi có lẽ là sự kiện KeyPress hoặc KeyUp, nhưng tôi nghĩ tôi sẽ hỏi trong trường hợp có hậu quả ngoài ý muốn. Ý tưởng nào?

Answer 1

Thuộc tính Chu kỳ chỉ ảnh hưởng đến khóa TAB.

Để kiểm soát hành vi của phím Enter là thuộc tính toàn cầu.

Đến Tools/Options - tab Bàn phím và vào "Move Sau Enter" chọn "Next Field"

Có KeyPress và KeyDown sự kiện mà bạn có thể sử dụng để bẫy các phím Enter quá nhưng đó là công việc nhiều hơn.

Answer 2

Thuộc tính chu kỳ chỉ hoạt động với phím Tab.

Có hai tùy chọn bạn có thể theo đuổi.

Bạn có thể bẫy phím Enter trong KeyDown/KeyUp/keyPressed
- HOẶC -
Bạn có thể lọc các nguồn dữ liệu vào một bản ghi bạn muốn họ chỉnh sửa, và vô hiệu hóa thêm kỷ lục mới thông qua hình thức đó.

Answer 3

Bạn có thể thêm mã bên dưới vào biểu mẫu 'BeforeUpdate' của sự kiện. Nếu sử dụng muốn chuyển sang bản ghi tiếp theo, nó sẽ yêu cầu người dùng lưu sau đó đóng biểu mẫu trước khi họ có thể chuyển sang một bản ghi khác.

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

Answer 4

Điều này cũng có thể được thực hiện trong 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

Answer 5

Các phím khoảnh khắc như TAB, Alt, PgUp, PgDn, Nhập được ép vào cuối thêm kỷ lục (sau trường cuối cùng chủ yếu), cơ sở dữ liệu tự động lưu tất cả thông tin bạn đã nhập vào biểu mẫu và xóa các trường để bạn có thể nhập giá trị tiếp theo. Vì vậy, những gì xảy ra là dữ liệu được lưu nhưng biểu mẫu có vẻ trống.

3 điều cần làm:

1. Mẫu Cycle tài sản thiết lập để Current Record.
2. Thuộc tính xem trước khóa biểu mẫu được đặt thành Có.

3. Thêm mã sau đây để các tổ chức sự kiện KeyDown dạng:

   '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 
   

   Tôi tìm thấy điều này trong khi sục sạo các trang web và không có thẻ tín dụng/trách nhiệm về mã nhưng tôi không biết nơi tôi tìm thấy nó . Làm việc cho tôi!

Answer 6

Nếu bạn truy cập vào Tùy chọn truy cập trên trang tệp, chuyển đến Cài đặt ứng dụng và cài đặt đầu tiên sẽ cho phép bạn chọn vị trí của bạn thay đổi khi bạn nhấn enter. Ít nhất trong Access 2013.