Đánh giá chủ đề:
  • 1 Votes - 2 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Cách không cho nhập chỉ cho chọn trong combobox của access
#1
Minh muốn làm cái combobox chỉ cho chọn chứ không cho nhập mà không biết làm, bạn nào biết chỉ giúp mình với,
Chữ ký của thunga25 Xin chào, mình là thunga25, Tham gia http://thuthuataccess.com/forum từ ngày 09-03 -15.
Reply
Những người đã cảm ơn
#2
(09-03-15, 09:45 AM)thunga25 Đã viết: Minh muốn làm cái combobox chỉ cho chọn chứ không cho nhập mà không biết làm, bạn nào biết chỉ giúp mình với,

Bạn thêm dòng lệnh sau vào sự kiện KeyPress

Mã PHP:
Private Sub cbchon_KeyPress(KeyAscii As Integer)
MsgBox "Không nhập du liệu bằng bàn phím, Nhấp chọn theo danh sách là được rồi. Cảm ơn"vbInformation"Thông báo"
Me.cbchon.Dropdown
End Sub 

Trong đó: cbchon là Combobox của bạn.

Khi chọn xong nếu bạn muốn nó nhảy đến ô tiếp theo nào đó: giả sử tên ô tiếp theo là ô Gioitinh thì thêm code vào sự kiện After Update của combobox cbchon như sau
Mã PHP:
Private Sub cbchon_AfterUpdate()
Me.gioitinh.SetFocus
End Sub 

Chúc bạn thành công!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thunga25
#3
Mình xin góp ý chút:

Làm như cách của bạn maidinhdan cũng được nhưng tất cả các phím nhấn trên Combobox (kể cả phím Enter, Tab,...) đều hiển thị thông báo thì khá bất tiện

Có lẽ ý của chủ thớt là không cho người dùng nhập thêm những gì nằm ngoài danh sách có trong list của cbo (ví dụ chỉ được chọn Nam hay Nữ chứ không được nhập vào BD hay ...), Cách của mình thường làm như sau:

1/- Set thuộc tính cho cbo:
- Limit To List : Yes
- AllowValueListEdits : No
2/Code cho sự kiện On Not in List tương tự như sau:

Mã:
Private Sub Combo20_NotInList(NewData As String, Response As Integer)
    Response = acDataErrContinue
    MsgBox "nhap sai, vui long nhap lai"
    With Me.Combo20  'voi Combo20 la ten cua ComboBox
        .Value = ""
        .SetFocus
    End With
End Sub
Chữ ký của MatTroiNguQuen Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn maidinhdan
#4
Các bạn maidinhdan và MatTroiNguQuen giới thiệu với bạn cách xử lý cách không cho nhập chỉ cho chọn trong combobox của access với thông báo. Mình giới thiệu thêm cho bạn 2 cách để xử lý.
Giả sử combobox của bạn tên là Danh_sách.
1/ Trường hợp bạn không quan tâm đến người nhập liệu mà chỉ cần cấm không cho nhập, không cần thông báo:

Private Sub Danh_sách_NotInList(NewData As String, Response As Integer)
Response = acDataErrContinue
Danh_sách.Value=""
End Sub


2/ Trường hợp combobox Danh_sách có RowSource là field của một bảng khác, và bạn nhập cần nhập giá trị của field bổ sung thêm cho Danh_sách ngay khi chọn giá trị mới: bạn có thể theo dõi tại đây
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn maidinhdan , amazonvn82
#5
ok rồi, cảm ơn các bạn nhiều
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tạo Menu dạng TreeView bằng Query (không dùng ActiveX) ongke0711 4 269 06-12-16, 09:16 PM
Bài mới nhất: toancvp
  [Help] Cập nhật combobox 2 từ combobox 1 (dữ liệu ở nhiều bảng) votinh.tq 6 209 22-11-16, 11:34 PM
Bài mới nhất: votinh.tq
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 195 22-11-16, 09:23 AM
Bài mới nhất: jason
  [Help] Giúp đỡ về cách xóa nội dung trong một field nam8384 2 120 17-10-16, 08:43 PM
Bài mới nhất: toancvp
  [Hỏi] Sử dụng chuột giữa trong subform là report. toancvp 10 362 12-10-16, 01:01 AM
Bài mới nhất: toancvp

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ