Lập trình với Module

Lập trình với Module

PhÇn VI: LËp tr×nh Module Saturday, September 1, 2012 2Access2000 - ModulesAccess 2000 cho phép sử dụng ngôn ngữ VBA = Visual Basic for Application để viết các hàm (Function) và thủ tục (Sub) nhằm xử lý các đối tượng (Table, Queries, Form, Report, Macro .) được tạo ra bằng các công cụ của Access. Saturday, September 1, 2012 3Access2000 - ModulesI. Các khái niệm cơ bản1. Module là gì?Là một đối tượng dùng để xây dựng các chương trình con bao gồm: thủ tục (Sub) và hàm (Function), có thể thực hiện trực tiếp hoặc gián tiếp thông qua các điều khiển trên biểu mẫu (Form).Module chia làm hai loại:Module sử dụng chung: dùng để xây dựng các thủ tục và hàm cấp chương trình (Public).Module riêng của các đối tượng trên Form, report (Private). Saturday, September 1, 2012 4Access2000 - Modules2. Cấu trúc chương trình con trong Modulea)Thủ tục Sub:[Public]/ [Private] Sub Tên_Thủ_Tục()Các lệnh của thủ tụcEnd Subb)Hàm Function:[Public]/ [Private] Function Tên_Hàm(DS biến) As Kiểu DLCác lệnh tính toán của hàmTên_Hàm = Giá trịEnd FunctionChú ý: Tên hàm, tên thủ tục phải được viết liền và không được bắt đầu từ số. Saturday, September 1, 2012 5Access2000 - Modules3. Biến trong chương trình:a)Khái niệm biến:Biến là một vùng bộ nhớ được định danh bởi một tên gọi, nhằm lưu trữ dữ liệu trong quá trình xử lý, tính toán trong chương trình.b)Cách khai báo biến:Trong Access biến không bắt buộc phải khai báo trước khi sử dụng. Nhưng để kiểm soát được bộ nhớ và tránh việc sử dụng tên biến trùng nhau ta nên khai báo các biến trước khi sử dụng.Để khai báo biến ta dùng từ khoá DIM như sau: Saturday, September 1, 2012 6Access2000 - ModulesDIM Tên_biến As Kiểu_dữ_liệuDIM, AS là hai từ khoá dùng để khai báo biến.Tên_biến: là một chuỗi ký tự liên tiếp được bắt đầu từ ký tự văn bản, không chứa dấu cách và không trùng với từ khoá như: DIM, AS, SUB, .Kiểu dữ liệu là một trong các kiểu sau: Saturday, September 1, 2012 7Access2000 - ModulesBảng mô tả giá trị của các kiểu dữ liệu cơ bảnKiểu dữ liệu Mô tả kiểu Giá trị ban đầuByteNguyên từ 0 đến 255 0IntegerNhận giá trị nguyên ngắn 0LongNhận giá trị nguyên dài 0SingleNhận giá trị thực đơn 0DoubleNhận giá trị thực kép 0StringNhận giá trị văn bảnRỗng BooleanTrue/ False FalseVariantChưa định trướcRỗng VD: DIM A As Single, B As Long, Hoten As String*25Nếu một biến chưa được khai báo khi sử dụng thì nó được mang kiểu Variant. Saturday, September 1, 2012 8Access2000 - Modulesa) Phân tich một chương trình.B1: Xác định dữ liệu vào (Input) để khai báo biến.B2: Xử lý, tính toán trên các biến.B3: In kết quả.VD: Chương trình vào hai số A, B từ bàn phím sau đó tính Tổng và Tich.-A, B là hai biến có kiểu số thực, Tong, Tich là hai biến để lưu kết quả của quá trình tính toán.-Tong = A + B, Tich = A*B.-In Tong và Tich4. Soạn thảo và chạy chương trình. Saturday, September 1, 2012 9Access2000 - Modulesb) Các bước soạn thảo chương trình.B1: Mở hoặc tạo mới một CSDL/ Modules/ New.B2: Khai báo các biến cần sử dụng trong chương trình bằng từ khoá DIM Tên_biến As Kiểu_dữ liệu.B3: Khai báo một thủ tục chương trình bằng từ khoá Sub Tên_thủ_tục().B4: Cài đặt mã lệnh cho thủ tục Sub.B5: Ghi chương trình lên đĩa: File/ Save.B6: Chạy chương trình để kiểm thử: RUN/ Run Sub. Saturday, September 1, 2012 10Access2000 - Modulesa)Lệnh nhập dữ liệu InputBox.Chức năng:Dùng để nhập dữ liệu từ bàn phím và gán giá trị đó cho một biến nhớ trong chương trình.Cú pháp:Tên_biến = InputBox( Lời nhắc , Tiêu đề , Giá trị) -Lời nhắc : là một dòng văn bản dướng dẫn nhập liệu, bắt buộc phải có trong lệnh InputBox,-Tiêu đề : là tiêu đề của hộp thoại nhập liệu, không bắt buộc phải có.-Giá trị: là giá trị mặc định của hộp nhập liệu, không bắt buộc phải có.-VD: A = InputBox( Nhap a = , Nhap lieu , 0) 5. Các lệnh nhập/ xuất dữ liệu. [...]... September 1, 2012 3 Access2000 - Modules I. C¸c kh¸i niƯm cơ bản 1. Module là gì? Là một đối tượng dùng để xây dựng các chương trình con bao gồm: thủ tục (Sub) vµ hµm (Function), cã thĨ thùc hiƯn trùc tiÕp hoặc gián tiếp thông qua các điều khiển trên biểu mẫu (Form). Module chia làm hai loại: Module sử dụng chung: dùng để xây dựng các thủ tục và hàm cấp chương trình (Public). Module riêng của các đối... 8 Access2000 - Modules a) Ph©n tich mét chương trình. B1: Xác định dữ liệu vào (Input) để khai báo biến. B2: Xử lý, tính toán trên các biến. B3: In kết quả. VD: Chương trình vào hai số A, B từ bàn phím sau đó tính Tổng và Tich. - A, B là hai biÕn cã kiĨu sè thùc, Tong, Tich lµ hai biến để lưu kết quả của quá trình tính toán. - Tong = A + B, Tich = A*B. - In Tong vµ Tich 4. Soạn thảo và chạy chương trình. ... chạy chương trình. Saturday, September 1, 2012 2 Access2000 - Modules Access 2000 cho phÐp sử dụng ngôn ngữ VBA = Visual Basic for Application để viết các hàm (Function) và thủ tục (Sub) nhằm xử lý các đối tượng (Table, Queries, Form, Report, Macro ) được tạo ra bằng các công cụ của Access. Saturday, September 1, 2012 16 Access2000 - Modules 2. LÖnh lùa chän Select Case  Có ph¸p: Select Case... thoá khỏi lƯnh IF.  Chó ý: – Mét IF chØ cã mét Else vµ mét End If, nếu If không có Else thì về trư ờng hợp a). Các ví dụ: Saturday, September 1, 2012 11 Access2000 - Modules Chức năng: Dùng để xuất dữ liệu từ các biến trong chương trình ra màn hình. Cú pháp: MsgBox Tên_biến, Kiểu_biểu_tượng, Tiêu đề - Tên_biến: có thể là một biến hoặc một giá trị cụ thể, bắt buộc phải có. - Kiểu_biểu_tượng: để... (Public). Module riêng của các đối tượng trên Form, report (Private). Saturday, September 1, 2012 6 Access2000 - Modules DIM Tên_biến As Kiểu_dữ_liệu DIM, AS là hai từ khoá dùng để khai báo biến. Tên_biến: là một chuỗi ký tự liên tiếp được bắt đầu từ ký tự văn bản, không chứa dấu cách và không trùng với từ khoá như: DIM, AS, SUB, Kiểu dữ liệu là một trong các kiểu sau: ...Saturday, September 1, 2012 15 Access2000 - Modules b) LƯnh dÏ nh¸nh IF đầy đủ: Cú pháp: IF ĐK Then { Khối lệnh 1 } Else { Khối lệnh 2 } End If Hoạt động: Nếu ĐK = True thì thùc hiÖn { Khèi lÖnh 1 }, bá qua { Khối lệnh 2 } và thoá khỏi lệnh... & Tong, VbOkOnly, Ket qua“ “ “ ” - VD3: MsgBox A = & A & “ “ VbCrlf & B = & B, VbInformation, “ “ Ket qua“ ” b) LƯnh xt d÷ liÖu MsgBox. Saturday, September 1, 2012 17 Access2000 - Modules Hoạt động: - Kiểm tra giá trị của biểu thức. - Nếu BT bằng một trong các giá trị (GT1, GT2, , GTN) thì thực hiện khối lệnh ®ã ( { Khèi lÖnh 1 }, { Khèi lÖnh 2 }, , { Khèi lÖnh N }), bá qua tất . trên biểu mẫu (Form) .Module chia làm hai loại :Module sử dụng chung: dùng để xây dựng các thủ tục và hàm cấp chương trình (Public) .Module riêng của các. September 1, 2012 3Access2000 - ModulesI. Các khái niệm cơ bản1. Module là gì?Là một đối tượng dùng để xây dựng các chương trình con bao gồm: thủ tục (Sub)