End If If (Duration <> "") Then foundDur = True End If If (Des <> "") Then foundDes = True End If If (foundCN = False) And (foundDur = False) And (foundDes = False) Then MsgBox "You must input either Name or Duration or Description of the course!" Exit Sub ...
Wend rec.Close : cn.close: set cn = Nothing 4. Đối tượng Record Là một bản ghi (row) của đối tượng Recordset. 5. Field Thể hiện một cột (column) dữ liệu của đối tượng Recordset. 6. Property Chứa các thuộc tính động của đối tượng ADO được ...
Sql = "UPDATE Course SET DurationInHour = 45 WHERE DurationInHour = 30" con.Execute sql con.Close Set con = Nothing Ví dụ: Xóa các bản ghi thỏa mãn điều kiện Đoạn mã sau sẽ xóa các bản ghi trong bảng Course thuộc CSDL C:\Users\M11x- ...
If (rec.RecordCount = 0) Then lblSearch.Caption = "There is no item found!" Exit Sub Else rec.MoveLast lblSearch.Caption = "There are " & CStr(rec.RecordCount) & " items found" Dim i As Integer While (lbCourse.ListCount > 0) i = lbCourse.ListCount - 1 ...
Option Compare Database Dim editingCID As Integer Dim db As DAO.Database Private Sub cmdAddNew_Click() 'Lay cac du lieu nguoi dung nhap tu form 'Dua vao bang Course 'Hien thi ket qua ra ListBox cmdEdit.SetFocus: cmdEdit.Caption = "Edit": editingCID = -1 Dim CN As String: ...
Recordsets(0) Recordsets("name") Recordsets![name] 9. QueryDefs QueryDefs chứa tập các đối tượng QueryDef. Mỗi đối tượng QueryDef dùng để tham chiếu tới các query có sẵn trong CSDL MS Access, hoặc có thể là các query lập trình bằng câu lệnh ...
Hình 7.17. Tham chiếu đến Microsoft DAO 3.6 Object Library Sơ đồ sau minh họa kiến trúc phân tầng gồm nhiều thành phần, đối tượng trong mô hình DAO. Hình 7.18. Các đối tượng và tập hợp trong kiến trúc DAO 1. DBEngine DBEngine là một lớp được ...
Songay = sn End Function Có thể chạy hàm này ngay trong cửa sổ immediate bằng lệnh: ?songay(2, 2000). Kết quả bạn nhận được sẽ là 29. 4.3 Cấu trúc lặp Có hai cấu trúc lặp: lặp với số lần xác định và lặp dựa trên biểu thức điều kiện ...
Const: từ khóa quy định để khai báo hằng constname : tên hằng type : là một trong các kiểu dữ liệu Byte , Boolean , Integer , Long , Currency , Single , Double , Decimal , Date , String , hoặc Variant . Nếu không có kiểu dữ liệu VBA tự xác định kiểu phù ...
+ Thiết kế giao diện + Cài đặt 1 lớp doubleArray hỗ trợ xử lý các thao tác cần thiết với mảng số thực + Cài đặt các hàm hành xử cho các sự kiện ứng với giao diện trên form, sử dụng lớp doubleArray. Chạy thử chương trình Như vậy, ...
Trang 400, Trang 401, Trang 402, Trang 403, Trang 404, Trang 405, Trang 406, Trang 407, Trang 408, Trang 409,