Xem tất cả 114 trang, được chia thành 14 bài viết trong tài liệu này. Không yêu cầu đăng nhập hay tải về.
Chương 7: Lập Trình Cơ Sở Dữ Liệu Trong Ms Access 1. Giới Thiệu Lập Trình Visual Basic Application Ms Access Không Chỉ Đơn Thuần Là Một Hệ Quản Trị Cơ Sở Dữ Liệu (Csdl) Quan Hệ Mà Nó Còn Cung Cấp Một Môi Trường Lập Trình Với Các Công ...
‘là 0 và tùy chọn phải khai báo biến tường minh trước ‘khi dùng Option Base 1 Option Explicit ‘Khai báo một biến mảng toàn cục dùng chung a ‘Khai báo một hằng n dụng ý là số phần tử của mảng ‘Phạm vi truy xuất mặc định của a, n là ...
End Function Sub callSub() Dim a(100) As Double Dim n As Integer InitArray a, n showArray a, n End Sub Trong đoạn mã trên: + Mục tiêu của các hàm/thủ tục không thay đổi + Thay đổi tham số đầu vào của các hàm/thủ tục. Bạn chú ý, cách truyền tham biến cho ...
If x = a(i) Then kt = True Exit For End If Next containInArray = kt End Function 2.2.5 Ví dụ Ta viết lại Standard Module trong ví dụ trước theo cách tiếp cận của Class Module và đặt tên là doubleArray , gồm các mã lệnh sau đây: ‘Khai báo các tùy chọn Option ...
+ 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, ...
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ù ...
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 ...
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 ...
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 ...
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: ...
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 ...
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- ...
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 ...
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 ...
