Đá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
  Cập nhật người dùng lên form hiển thị kutieu2016 2 91 15-04-17, 09:13 PM
Bài mới nhất: kutieu2016
  [Hỏi] Vấn đề về form field "String too long" vuthaiha90 2 120 18-03-17, 07:40 AM
Bài mới nhất: vuthaiha90
  [Help] Lọc Form theo ngày tháng Godspear 3 204 03-03-17, 08:22 AM
Bài mới nhất: Godspear
  [Hỏi] Mở form có điều kiện. Các bác giúp em với! cannguyen 3 237 23-02-17, 09:46 AM
Bài mới nhất: dutuan80637
Wink [Hỏi] Tạo Nút Print- chọn theo trang, khôn in trwcj tiếp connguoi123 4 1,250 05-02-17, 03:24 PM
Bài mới nhất: maidinhdan

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ơ