(19-12-22, 10:24 PM)Sang.dinh Đã viết:

(19-12-22, 05:24 PM)AnNguyen Đã viết: Nếu muốn không cho sửa dòng 1-6 thì bạn gán thuộc tính .Enable = false cho nó

cảm ơn bạn chia sẻ ( nhưng do tự học Access nên chưa nẵm rõ cách bạn chỉ, hiện tại mình sử dụng code builder để viết  trong Event )

Xem video của bạn thì hình như là bạn đang muốn copy cái giá trị của dòng bên cạnh đúng không?
Nếu vậy bạn dùng code này. còn không phải ý bạn thì mình chưa hiểu lắm

(19-12-22, 05:24 PM)AnNguyen Đã viết: Nếu muốn không cho sửa dòng 1-6 thì bạn gán thuộc tính .Enable = false cho nó

Thuộc tinhe Enable = False là vô hiệu hóa. Khi gán textbox Enable = false bạn vô hiệu hóa textbox trên form vì vậy toàn bộ control của textbox đó đều bị làm mờ, vô hiệu hóa, cả con trỏ cũng không vào được. Vô hiệu hóa hơi khác khóa data control. Khóa data control không làm mờ textbox, con trỏ vẫn vào được, nhưng không chỉnh sửa, xóa được nội dung. Thuộc tính của nó là Data / Locked.
Để khóa dòng 7 sử dụng lệnh
Private Sub Form_Current()
    If Me.CurrentRecord = 7 Then
         ' Gán tất cả các textbox trên dòng locked =True
    Else
         ' Gán tất cả các textbox trên dòng locked =False
    End If
End Sub
Nhưng như tôi dã nói khi load form những record trên table ở vị trí >= 7 đếu có thể năm trên vị trí 7 nên chỉ cần di chuyển thì có thể phá khóa bất kỳ record nào > =7

(20-12-22, 09:14 AM)AnNguyen Đã viết:

(19-12-22, 10:24 PM)Sang.dinh Đã viết:

(19-12-22, 05:24 PM)AnNguyen Đã viết: Nếu muốn không cho sửa dòng 1-6 thì bạn gán thuộc tính .Enable = false cho nó

cảm ơn bạn chia sẻ ( nhưng do tự học Access nên chưa nẵm rõ cách bạn chỉ, hiện tại mình sử dụng code builder để viết  trong Event )

Xem video của bạn thì hình như là bạn đang muốn copy cái giá trị của dòng bên cạnh đúng không?
Nếu vậy bạn dùng code này. còn không phải ý bạn thì mình chưa hiểu lắm

Mã:

Dim rs As Recordset, i As Integer
    Set rs = Child0.Form.Recordset ' subform
    While Not rs.EOF And i = 0
        txt1 = rs.Fields("cot1")
        txt2 = rs.Fields("cot2")
        '...
        i = 1
    Wend

Đúng rồi á Tiền bối, nếu em bấm vào nút tiếp tục nó thì sẽ thực hiện lệnh coppy từ dòng 1-6 và em chỉ việc nhập dòng 7 và dòng 8 sau đó save thì nó sẽ tự có 1 record mới cho mình 
để en thử code như tiền bối chia sẻ vào nút tiếp tục thử coi sao

(20-12-22, 10:01 AM)tranthanhan1962 Đã viết: Thuộc tinhe Enable = False là vô hiệu hóa. Khi gán textbox Enable = false bạn vô hiệu hóa textbox trên form vì vậy toàn bộ control của textbox đó đều bị làm mờ, vô hiệu hóa, cả con trỏ cũng không vào được. Vô hiệu hóa hơi khác khóa data control. Khóa data control không làm mờ textbox, con trỏ vẫn vào được, nhưng không chỉnh sửa, xóa được nội dung. Thuộc tính của nó là Data / Locked.

Vâng. tại cháu hay dùng .Enable để màu nó xám lại cho người dùng biết luôn không lại cứ đặt chuột mất công gõ không được ạ