Phương pháp AddNew

Chia sẻ: Nguyễn Phương Hà Linh Linh | Ngày: | Loại File: PDF | Số trang:2

Thêm vào BST

Báo xấu

53
lượt xem 5
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Thí dụ : Trên một biểu mẫu có các điều khiển hộp văn bản là txtMakh và txttenKh, hai điều khiển này là hai điều khiển không có dữ liệu nguồn (thuộc tính Control Source để trống).

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: Phương pháp AddNew

1) Phương pháp AddNew  Ý nghĩa : Thêm mẫu tin trong bộ mẫu tin.  Cú pháp : DoiTuongRecordset.AddNew Doituongrecordset!tenField = bieuthuc ……….. DoituongRecordSet.Update Thí dụ : Trên một biểu mẫu có các điều khiển hộp văn bản là txtMakh và txttenKh, hai điều khiển này là hai điều khiển không có dữ liệu nguồn (thuộc tính Control Source để trống). Sau khi người sử dụng nhập thông tin của một khoa mới vào hai điều khiển này, chúng ta sẽ cập nhập thông tin vào bảng khoa. Private Sub cmdSave_click() Dim db as database Dim rst as Recordset
Set db = Currentdb() Set rst = db.OpenRecordset(“Khoa”,dbOpenDynaset) With rst .AddNew ![makh] = Me![txtMakh] ![tenkh] = Me![txttenkh] .Update End with End Sub