bây giờ mình có 2 bảng, 1 bảng chứa danh sách các thực nghiệm thuốc, 1 bảng chứa danh sách các bệnh nhân trong thực nghiệm thuốc, 2 bảng có quan hệ vs nhau ( one to many), 1 thực nghiệm gắn vs nhiều bệnh nhân

hiện giờ, ở bảng 1 có 1 mục là "bệnh nhân đầu tiên" - ngày có bệnh nhân đầu tiên thử nghiệm thuốc, mình dg nghĩ cách để làm sao mà khi mình thêm bệnh nhân đầu tiên vào cho thực nghiệm thì mục "bệnh nhân đầu tiên" này sẽ tự hiển thị cái ngày mà mình làm hành động này

gần giống vs khi tạo form để điền thông tin bệnh nhân và sau khi chỉnh sửa, click Lưu và Form sẽ tự động điền vào 2 mục mình tạo là "Thay_Doi_Boi" - user dg login vào máy tính và "Vao_Luc" - Now() như trong code dưới mà mình dg bí vs cái vấn đề trên vì ko biết viết code sao cho access chỉ nhận diên cho bệnh nhân đầu tiên mà thôi nên đăng lên hỏi các cao nhân nhờ chỉ giáo giúp vs


Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.Vao_Luc.Value = Date
Me.Thay_Doi_Boi.Value= Environ$("username")
End Sub

Thật sự mình cũng chưa có hiểu ý bạn giải thích.
Một phần cũng tuỳ bạn đang sử dụng phương thức nào để thay đổi dữ liệu nữa. Bạn thay đổi trực tiếp trên Form(Form lấy Source từ Tabe) hay ntn nữa.
Nếu được thì bạn nên làm một file đưa lên thì dễ hình dung hơn.

Với lại bạn dùng dg là đương hay đang thế @@ viết đủ ra nhé

(20-04-18, 11:41 AM)Godspear Đã viết: ...
 ko biết viết code sao cho access chỉ nhận diên cho bệnh nhân đầu tiên mà thôi nên đăng lên hỏi các cao nhân nhờ chỉ giáo giúp vs
...

- Theo đọc hiểu bài này và tôi nghĩ có thể bạn đã làm phức tạp vấn đề hơn chút. Cứ có bệnh nhận thực nghiệm thuốc thì bạn gắn ngày vô. Sau đó khi cần tìm bệnh nhân đầu tiên thì cứ query: Select Top 1 From …. Where [thực nghiệm thước] = mã gì đó Order by Ngay Asc;”
- Còn theo cách của bạn nếu muốn xác định ngay khi nhập liệu đây có phải là bệnh nhân đầu tiên không để làm các bước thêm thông tin thì cũng dùng query hoặc Dcount () kiểm tra:
  + “Select count (**)  As SoBenhNhan From tblBenhNhan Where [Mã thực nghiệm] = mã gì đó”. 
         Hoặc
      SoBenhNhan= Nz(Dcount (“Mã bênh nhân”, “tblBenhNhan”, “[Mã thực nghiệm] = Mã gì đó”), 0)

       If SoBenhNhan =0 Then
           Msgbox “Đây là bệnh nhân đầu tiên”
           Làm tiếp cái gì đó
       Else
           ‘Do nothing
       End If