Sub DeleteSv(cmasv as string) Dim db as database Dim rstsv as Recordset Dim csql as string Set db = Currentdb() Set rstsv = | Phương pháp Delete - Ý nghĩa Dùng để xóa dữ liệu. - Cú pháp DoiTuongRecordset tenField bieuthuc - Giải thích THÀNH PHẦN MÔ TẢ TenField Tên field của Table hay query. BieuThuc Biểu thức mà giá trị sẽ gán vào Field. Thí dụ Xóa một sinh viên trong bảng sinh viên khi biết Masv. Sub DeleteSv cmasv as string Dim db as database Dim rstsv as Recordset Dim csql as string Set db Currentdb Set rstsv sinhvien dbOpenDynaset Csql masv cmasv csql If then Msgbox Maso cmasv khong co vbCritical Else End if End Sub 1 Thí dụ tông quát Các thủ tục tương ứng Nút Next Private Sub cmdNext_click Dim rst as Recordset If then End .
