-
01-18-2010, 05:35 PM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Cho mình hỏi Tạo msgbox xác nhận trước khi xoá bản ghi trên form
Mình mới học Access nên không biết gì về VB
Các bạn có thể chỉ giúp mình đoạn code gán cho 1 nút ,khi nhấn nút này trên Form sẽ hiện ra 1 message xác nhận Yes/ No để xoá 1 bản ghi đi không ?
:k5798618:
ThanksView more random threads:
- Giúp sinh mã quản lý cho từng sản phẩm
- Khái niệm đầu tiên về lập trình trên Access
- phần mềm quản lý nhân sự
- Chỉ giùm việc tự động điều chỉnh textbox trong report
- Cần Giúp đỡ về giải thuật Xuất-Nhập-Tồn từ ngày này đến ngày kia
- Quản lý mua bán hàng - Phần 2: Thiết kế CSDL
- Cho mình hỏi một số hàm Visual Basic dùng trong Access:
- Xin giúp đỡ về việc kết hợp giữa hai bảng
- TIP : Chạy ảnh động trên Form ! Thật hay Đùa ?
- Không cập nhật được khi tiến hành Append rồi Delete
-
01-18-2010, 05:43 PM #2Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Tạo msgbox xác nhận trước khi xoá bản ghi trên form
Bạn tự chế trên dòng code nay nhé :
If MsgBox("shgfs", vbYesNo, "Thông báo") = vbYes Then
-
01-19-2010, 03:44 AM #3Silver member
- Ngày tham gia
- Jan 2016
- Bài viết
- 13
Ðề: Cho mình hỏi Tạo msgbox xác nhận trước khi xoá bản ghi trên form
Bạn ơi trong Marco này có cách nào để thêm Msg xác nhận không ?
Vì mình muốn dùng marco này để xoá bản ghi trên Form,chứ viết code thay cho toàn bộ marco này thì mình chịu.
Thanks
-
01-23-2010, 05:05 AM #4Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Tạo msgbox xác nhận trước khi xoá bản ghi trên form
Gửi bởi haocaocu
Còn đây mình làm một cách khác cũng chạy tốt
Dim dbX As Database, rsX As Recordset, DKX As String
Set dbX = CurrentDb
Set rsX = dbX.OpenRecordset("tblSKT", dbOpenDynaset)
DKX = "CT_Thu = '" & Me!txtSCT & "'"
rsX.FindFirst DKX
If Not rsX.NoMatch Then
rsX.Delete
End If
rsX.Close
Set dbX = Nothing
MsgBox "Đã xoá thành công, dzeeee....", vbInformation, "Thong bao !"
Nếu hổng hiểu pốt-sờ lên nhé, anh em cùng nhau bàn lụn tiếp
-
06-11-2012, 04:46 AM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Tạo msgbox xác nhận trước khi xoá bản ghi trên form
Cho mình hỏi là làm thế nào để tạo 1 hộp thoại
Ban có muốn tiếp tục nữa hay ko?
Nếu nhấn Có thì đóng bảng hiện tại và mở 1 bảng A
Nếu nhấn Không thì đóng bảng hiện tại và mở bảng B
Mã:Private Sub Save_Click() MsgBox ("Saved") If MsgBox("shgfs", vbYesNo, "Thông báo") = vbYes Then DoCmd.Close acForm, Me.Name DoCmd.OpenForm "A" Else DoCmd.Close acForm, Me.Name DoCmd.OpenForm "B" End If End Sub
Các mẫu cột cổng đá đẹp nhất được làm từ đá xanh tự nhiên có độ bền coi như vĩnh cửu dù cột đá được đặt ngoài hiên có thể chịu mưa , chịu nắng. Mẫu mã đẹp nhất, chạm khắc hoa văn đẹp, tinh tế. ...
Mẫu mẫu cột cổng đá được làm bằng đá xanh tự nhiên đẹp nhất hiện nay