Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Tạo form Tiếp đón Bảo hiểm y tế
#1
Hôm trước có tạo một tiêu đề để hỏi mà bây giờ mình đã tìm ra được hướng giải quyết, chỉ còn rắc rối này 
Cho mình hỏi?

1. Mình có 1 table chứa Họ tên và số Bảo Hiểm Y Tế
2. Giờ tạo from Tiếp đón có nội dung (STT, Số BHYT, Họ Tên, Địa chỉ, Tuổi)

Yêu cầu: + Khi Bấm nút "thêm" thì chỉ cần nhập số BHYT, còn các ô bên cạnh thì nó sẽ tự động nổi tên, địa chỉ... của họ lên luôn?
               + Khi nhập vào ô BHYT thì nhập hết ô này nó sẽ tự động nhảy sang ô khác?

Mong mọi người giúp đở

File demon mong mọi người xem giúp
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#2
Sau khi xem xong demo của bạn thì tôi gợi ý như vầy:
1.  Bạn chỉ cần tạo 1 trường là số BHYT chứ nếu tạo thành 5 trường như CSDL của bạn thì rất tốn dung lượng bộ nhớ và rất khó tìm kiếm xử lý, khi load nó vào form thì ta dùng hàm cắt chuỗi để thể hiện
Theo câu hỏi của bạn thì ta sẽ tạo 10 control nhập liệu gồm:
-  1 Textbox chứa trường STT (hình như bạn lấy ID làm STT thì phải?), đặt tên là TxtSTT.
-  5 Textbox chứa trường số BHYT, ta đặt tên ta lần lượt là TxtSoBHYT1...TxtSoBHYT5
-  1  Texbox chứa kết quả là 5 Textbox số BHYT cộng lại, đặt tên là TxtSoBHYT, thuộc tính Visible=False

-  3 Textbox còn lại chứa các trường Họ tên, địa chỉ, tuổi...đạt tên là TxtHoten, TxtDiachi, TxtTuoi
Khi đặt tên cho các control nhập liệu bạn phải đặt gợi nhớ, dễ phân biệt gồm 3 từ đầu chứa tên control+tên trường dữ liệu mà nó thể hiện (Textbox thì là Txt, Combobox là Cbo, nút Option là Opt, Listbox là Lst, nút lệnh là Cmd...)
VD: Textbox chứa controlsource là STT thì đặt là TxtSoTT

Trong sự kiện AfterUpdate của TxtSoBHYT5 bạn viết mã lệnh sau:

Private Sub TxtSoBHYT_AfterUpdate()
Me.TxtSoBHYT=Me.TxtSoBHYT1 & "-" & Me.TxtSoBHYT2 & "-" & & Me.TxtSoBHYT3 & "-" & Me.TxtSoBHYT4 & "-" & Me.TxtSoBHYT5
'Theo ý tôi thì bạn nên ngăn cách các dãy mã số BHYT bằng dấu "-" cho dễ xử lý chuổi bằng hàm
Me.TxtHoten=Dlookup("hoten","tiepdon","SoBHYT='" & me.TxtSoBHYT & "'"
Me.TxtDiachi=Dlookup("diachi","tiepdon","SoBHYT='" & me.TxtSoBHYT & "'"
Me.Txttuoi=Dlookup("tuoi","tiepdon","SoBHYT='" & me.TxtSoBHYT & "'"
End Sub
Chữ ký của lmthu Xin chào, mình là lmthu, Tham gia http://thuthuataccess.com/forum từ ngày 04-07 -14.
Reply
Những người đã cảm ơn thanhtruong


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Hỏi] Mở form có điều kiện. Các bác giúp em với! cannguyen 2 93 13-02-17, 11:23 AM
Bài mới nhất: cannguyen
Wink [Hỏi] Tạo Nút Print- chọn theo trang, khôn in trwcj tiếp connguoi123 4 1,180 05-02-17, 03:24 PM
Bài mới nhất: maidinhdan
  [Help] Truy vấn nhiều giá trị, nhập trong 1 textbox duy nhất ở form ckno1no 11 694 23-01-17, 01:32 PM
Bài mới nhất: ckno1no
  [Help] khoanh vùng tìm kiếm trong Search Form Godspear 3 139 19-01-17, 05:31 AM
Bài mới nhất: Godspear
  [Hỏi] Tạo Login Form cùng với Advanced Security Level Godspear 10 414 16-01-17, 11:33 AM
Bài mới nhất: Godspear

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ơ