Các bạn xem file bên dưới của mình và cho mình lời khuyên nhé

http://www.mediafire.com/?gx52u7393g9ll95

Trong bảng frmSearchExample, double-click vào 1 giá trị trong listbox

Sẽ có 1 bảng frmContactDetail hiện ra, tương ứng với giá trị đã chọn

Mình chọn nhấn Delete, nhưng sau khi xóa xong thì bảng listbox lại hiện thông tin đã xóa là delete

Mình muốn sau khi nhấn nút Delete thì listbox sẽ refresh luôn

Cả nhà cho mình lời khuyên nhé

Cảm ơn

(09-06-12, 05:28 PM)uronmapu Đã viết: Các bạn xem file bên dưới của mình và cho mình lời khuyên nhé

http://www.mediafire.com/?gx52u7393g9ll95

Trong bảng frmSearchExample, double-click vào 1 giá trị trong listbox

Sẽ có 1 bảng frmContactDetail hiện ra, tương ứng với giá trị đã chọn

Mình chọn nhấn Delete, nhưng sau khi xóa xong thì bảng listbox lại hiện thông tin đã xóa là delete

Mình muốn sau khi nhấn nút Delete thì listbox sẽ refresh luôn

Cả nhà cho mình lời khuyên nhé

Cảm ơn

Ghi thêm vào một dòng lệnh dưới cùng của nút Delete câu lệnh sau

Lệnh của bạn ko được đâu bạn ạ, bạn thử file của mình mà xem

Phải thêm dòng code bên dưới vào After Update Event của listbox lstItems

Private Sub lstItems_AfterUpdate()
Me.lstItems.Requery
End Sub

Nhưng khi đó phải click sang 1 bản ghi khác nó mới làm mới listbox

Mình muốn khi xóa là nó làm mới luôn, ko phải click sang bản ghi nào khác

thế này được không bạn hơi nghèo ý tưởng một chút nhưng mình nghĩ chắc cũng đủ để đáp ứng nhu cầu của bạn.
http://www.mediafire.com/?0phj3hpg8w73j28
nếu có ý tưởng nào hay hơn share cho mình với nha.

Khà khà, cách này quá hay luôn à, đơn giản nhưng hiệu quả, chỉ là lệnh đóng và mở form

Thanks bạn,

Tiện đây cho mình hỏi thêm với, với file đó của mình, mình muốn ở cái table frmSearchExample có thêm nút next record để tiến về bản ghi phía trước, và nút lùi để lùi về bản ghi phía sau thì làm thế nào ạ?

Đây là listbox ko phải sub form nên mình ko làm được

---

Thêm một cách nữa là dùng code sau

Private Sub lstItems_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmContactDetail", , , , , acDialog
Me.lstItems.Requery
End Sub

(09-06-12, 10:52 PM)uronmapu Đã viết: Khà khà, cách này quá hay luôn à, đơn giản nhưng hiệu quả, chỉ là lệnh đóng và mở form

Thanks bạn,

Tiện đây cho mình hỏi thêm với, với file đó của mình, mình muốn ở cái table frmSearchExample có thêm nút next record để tiến về bản ghi phía trước, và nút lùi để lùi về bản ghi phía sau thì làm thế nào ạ?

Đây là listbox ko phải sub form nên mình ko làm được

---

Thêm một cách nữa là dùng code sau

Private Sub lstItems_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmContactDetail", , , , , acDialog
Me.lstItems.Requery
End Sub

Thử cái này xem,,tạo Button gán cho nó
thay cái acPrevius đó = next,,, last hay.. gì đó bạn muốn...