Mặc định, báo biểu được kết xuất ra màn hình, chúng ta cĩ thể xuất báo biểu ra máy in hoặc tập tin
theo cú pháp sau:
II.7.1. Kết xuất ra máy in
Cú pháp:
<CrystalReport>.PrintToPrinter(<số bản>, <Collate>, _
<từ trang>, <đến trang>)
II.7.2. Kết xuất ra tập tin
Cú pháp:
<CrystalReport>.ExportToDisk(<loại tập tin>, <tên tập tin>) <loại tập tin> cĩ thể cĩ các giá trị sau:
Các gía trị thuộc tính của CrystalDecisions.[Shared].ExportFormatType (loại tập tin)
Giá trị Mơ tả
Excel Xuất ra tập tin .XLS. HTML40 Xuất ra tập tin HTML4.0 NoFormat Xuất ra tập tin khơng kiểu. PortableDocFormat Xuất ra tập tin .PDF. RichText xuất ra tập tin .RTF WordForWindows xuất ra tập tin .DOC
ĐỀ THI MẪU CUỐI HỌC PHẦN
Lập Trình Quản Lý (VB.NET)
Thời gian: 60 phút Ngày thi:
*** Các kết quả lưu vào đĩa làm việc để chấm điểm ***
Phần I: Các thành phần cung cấp sẵn
1. Cơ sở dữ liệu
Mơ tả
Đơn vị ABC cĩ nhiều phịng ban với các nhân viên trực thuộc. Do nhu cầu cơng tác, nhân viên cĩ thể được điều động từ phịng ban này sang phịng ban khác. Viết chương trình tra cứu thơng tin nhân viên.
Quan hệ giữa các bảng
2. Cấu trúc thư mục tổ chức ứng dụng
Thư mục Ý nghĩa
Bao_cao Chứa tập tin báo biểu BC_QUA_TRINH.rpt.rpt sử dụng trong ứng dụng Du_lieu Chứa tập tin cơ sở dữ liệu QL_NHAN_SU.mdb
Lop_xu_ly_luu_tru Chứa XL_BANG.vb là lớp xử lý lưu trữ của ứng dụng Lop_xu_ly_nghiep_vu Chứa các lớp xử lý nghiệp vụ của ứng dụng
Man_hinh Chứa tập tin màn hình MH_TRA_CUU.vb sử dụng trong ứng dụng
3. Danh sách các lớp xử lý
Lớp xử lý Ý nghĩa
XL_BANG.vb Lớp đối tượng đọc ghi dữ liệu và một số chức năng khác
XL_<Nghiệp vụ>.vb Các lớp xử lý nghiệp vụ kế thừa từ lớp bảng ứng với mỗi bảng trong CSDL
4. Danh sách các đối tượng thể hiện
Thể hiện Ý nghĩa
MH_TRA_CUU.vb Màn hình cho phép thực hiện chức năng tra cứu thơng tin nhân viên BC_QUA_TRINH.rpt Báo biểu xuất thơng tin quá trình cơng tác của nhân viên
5. MH_TRA_CUU.vb
Màn hình Tra cứu thơng tin
Màn hình MH_TRA_CUU đã được cài đặt để:
Liệt kê ra danh sách chọn Thuộc phịng những phịng ban trong đơn vị. Lưới đã được thiết kế để hiển thị dữ liệu tìm thấy (khơng cho chỉnh sửa). Cĩ thủ tục xuất dữ liệu ra lưới
6. BC_QUA_TRINH.rpt
Báo biểu đã được thiết kế để hiển thị thơng tin như hình:
Phần II: Các yêu cầu phải thực hiện
1. Bổ sung cho các lớp xử lý nghiệp vụ: (1 điểm)
Cài đặt để XL_NHAN_VIEN cĩ thơng tin của tên phịng dựa trên MPH, cột hiển thị Nam/Nữ dựa trên Nam 2. Cài đặt cho màn hình MH_TRA_CUU: ( 7 điểm)
Viết hàm Lap_bieu_thuc_loc() As String trả về điều kiện lọc dữ liệu dựa vào các giá trị trên màn hình cĩ nội dung sau: (cộng chung 6.5 điểm)
+ Nếu Họ cĩ chứa khác rỗng, lọc theo điều kiện họ nhân viên cĩ chứa nội dung (Like ) trên điều khiển, ngược lại khơng lọc theo họ nhân viên (0.5 điểm)
+ Nếu Tên cĩ chứa khác rỗng, lọc theo điều kiện tên nhân viên cĩ chứa nội dung trên điều khiển, ngược lại khơng lọc theo tên nhân viên (0.5 điểm)
+ Giới tính lọc theo điều kiện trên màn hình: (Nam), (Nữ) hoặc khơng lọc nếu (Nam Nữ) được chọn.
(0.5 điểm)
+ Nếu Thuộc phịng rỗng, khơng lọc theo phịng ban, ngược lại lọc theo phịng được chọn (0.5 điểm) + Lọc theo hệ số lương: (1.25 điểm với điểm chi tiết như mơ tả bên dưới)
− Nếu hệ số lương từ, đến đều rỗng: khơng lọc
− Nếu hệ số lương từ khác rỗng và hệ số lương đến rỗng: lọc theo hệ số lương >= hệ số lương từ − Nếu hệ số lương từ rỗng và hệ số lương đến khác rỗng: lọc theo hệ số lương <= hệ số lương
đến.
− Ngược lại, lọc ra hệ số lương trong đoạn hệ số lương từ đến hệ số lương đến + Lọc theo tuổi (dựa vào ngày sinh): (1.5 điểm với điểm chi tiết như mơ tả bên dưới)
− Nếu tuổi từ, đến đều rỗng: khơng lọc
− Nếu tuổi từ khác rỗng và tuổi đến rỗng: lọc theo tuổi >= tuổi từ − Nếu tuổi từ rỗng và tuổi đến khác rỗng: lọc theo tuổi <= tuổi đến − Ngược lại, lọc ra tuổi trong đoạn tuổi từ đến tuổi đến
+ Khơng yêu cầu kiểm tra giá trị hệ số lượng, tuổi đến lớn hơn giá trị hệ số lương, tuổi từ. + Kết hợp các điều kiện lọc lại thành chuỗi lọc và trả về giả trị chuỗi lọc (0.5 điểm) Nhấn nút lệnh Tra cứu, thực hiện các yêu cầu sau: (chung 0.75 điểm)
+ Lập dữ liệu nhân viên theo yêu cầu tra cứu trên màn hình (nội dung của hàm Lap_bieu_thuc_loc) + Xuất dữ liệu ra lưới Kết quả tìm kiếm
Bổ sung các đối tượng thích hợp để khi nhấn nút lệnh Xuất In, xuất báo biểu BC_QUA_TRINH.rpt lọc theo nhân viên hiện hành trên lưới Kết quả tìm kiếm (1 điểm)
3. Xử lý trên báo biểu: (2 điểm)
Bổ sung tên phịng vào tiêu đề hồ sơ nhân viên như hình bằng chữ HOA (0.5 điểm) Hiển thị họ tên trong cùng một field như hình (0.5 điểm)
Đánh số thứ tự các lần thuyên chuyển như hình (0.5 điểm)
ĐỀ THI MẪU KIỂM TRA CHUYÊN MƠN GIÁO VIÊN
Đề thi kiểm tra chuyên mơn giáo viên:
LẬP TRÌNH QUẢN LÝ (VB.NET)
Thời gian: 150 phút
Phần lý thuyết (30 phút)
Câu 1. Biến khai báo trong VB.NET thuộc loại nào dưới đây: a) Value Type, Pointer Type
b) Value Type, Reference Type c) Pointer Type, Reference Type
d) Pointer Type, Reference Type, Value Type
Câu 2. Giả sử khai báo biến d cĩ kiểu ngày:
Dim d As Date d = Now
Hãy cho biết câu lệnh nào sau đây sẽ in ra ngày hiện hành theo dạng ngày tháng năm: a) Msgbox (d.Date)
b) MsgBox (d.ToString(“dd/mm/yyyy”)) c) MsgBox (d.ToString(“dd/MM/yyyy”)) d) MsgBox (d.ToShortDateString())
Câu 3. Chọn lý do khai báo thủ tục sau đây bị lỗi:
Private Sub TEST(ByVal a As Integer, ByVal b As Integer, Optional ByVal c As Boolean ) ' các lệnh
End Sub
a) Lỗi vì thiếu kiểu dữ liệu của thủ tục b) Lỗi vì từ khĩa ByVal của các tham số
c) Lỗi vì tham số Optional khơng cĩ giá trị mặc định d) Lỗi vì thừa từ ByVal trong Optional ByVal.
Câu 4. Tính chất nào sau đây khơng thuộc các tính chất của Lập trình hướng đối tượng: a) Tính Cụ thể (Concret)
b) Tính Đa hình (Polymorphism)
c) Tính Bảo bọc (Encapsulation) d) Tính Kế thừa (Inheritance)
Câu 5. Cĩ các dịng lệnh sau:
Public … Property <Ten thuoc tinh> Get
' Trả về giá trị End Get
End Property
Chọn từ khĩa thích hợp để điền vào phần … của thuộc tính: a) MustOverride
b) ReadOnly
c) WriteOnly d) ReadWrite
Câu 6. Từ khĩa Shared trong khai báo các thành phần cho biết thành phần đĩ: a) Được sử dụng chung giữa các đối tượng thuộc lớp đĩ
b) Cĩ thể sử dụng thành phần Shared thơng qua tên lớp
c) Cĩ thể sử dụng thành phần Shared thơng qua một biến thuộc lớp đĩ, ngay cả khi chưa cấp phát vùng nhớ cho biến.
d) Từ khĩa Shared hàm ý tất cả các câu trên.
Câu 7. Các thành phần được khai báo với từ khĩa Protected cho phép truy xuất: a) Chỉ trong chính lớp nơi thành phần đĩ được khai báo
b) Trong chính lớp nơi thành phần đĩ được khai báo và trong các lớp kế thừa từ lớp đĩ c) Chỉ trong chính lớp nơi thành phần đĩ được khai báo và trong các thể hiện của lớp đĩ.
d) Chỉ trong chính lớp nơi thành phần đĩ được khai báo và trong lớp cha của lớp đĩ.
Câu 8. Để tạo ra một đối tượng OleDbDataReader, chúng ta sử dụng cách nào sau đây: a) Dim bo_doc As New System.OleDb.OleDbDataReader
b) ' với Lenh là đối tượng OleDbCommand đã tạo sẵn
Dim bo_doc As System.OleDb.OleDbDataReader = Lenh.ExecuteReader() c) ' với Lenh là đối tượng OleDbCommand đã tạo sẵn
Dim bo_doc As System.OleDb.OleDbDataReader = Lenh.ExecuteDataReader() d) Các câu a, b đúng
Câu 9. Cho bảng dữ liệu như sau:
CONG_VIEC
MCV Ten_cong_viec Don_vi_tinh Don_gia
1 Đào mĩng đất cấp 3 M3 20000 2 Đổ bê tơng 4x6 M3 22000 3 Đổ bê tơng 1x2 M3 35000 4 Xây tường 10 M2 10000 5 Xây tường 20 M3 25000 6 Đổ đất nền M3 10000 7 Đĩng cốp pha M2 25000 8 Lĩt gạch men M2 30000
Cho biết biến ketqua chứa giá trị nào khi thực hiện đoạn lệnh sau đây. Biết rằng Ket_noi là đối tượng OleDbConnection đã kết đến nguồn dữ liệu cần thiết:
Dim Lenh As New System.OleDb.OleDbCommand("Select Ten_cong_viec From CONG_VIEC", _ Ket_noi)
Ket_noi.Open
Dim ketqua = Lenh.ExecuteScalar() Ket_noi.Close
a) "Đào mĩng đất cấp 3" b) "Lĩt gạch men"
c) "Đào mĩng đất cấp 3, Đổ bê tơng 4x6, …, Lĩt gạch men"
d) Chương trình bị lỗi
Câu 10. Đối tượng OleDbCommandBuilder được dùng để ? a) Khai báo các OleDbCommand
b) Phát sinh ra OleDbDataAdapter
c) Phát sinh ra SelectCommand của OleDbDataAdapter
d) Phát sinh ra các DeleteCommand, InsertCommand và UpdateCommand của OleDbDataAdapter dựa trên SelectCommand của nĩ
Câu 11. Cho bảng NHAN_VIEN cĩ cấu trúc sau:
Field Name Field Type Field Size Description
MNV Autonumber Long Integer Mã nhân viên Ho_ten Text 50 Họ tên nhân viên
Gioi_tinh Yes/No Giới tính: Yes: Nam ; No: Nữ Ngay_sinh Date/Time Ngày sinh
Dia_chi Text 50 Địa chỉ
Với Mo_ket_noi là hàm trả về OleDbConnection kết nối đến CSDL chứa bảng NHAN_VIEN nĩi trên Xét các câu lệnh sau:
(1) Dim bo_doc_ghi As New OleDbDataAdapter("Select Ho_ten, Gioi_tinh, Ngay_sinh, Dia_chi " _ & "From NHAN_VIEN", Mo_ket_noi) (2) Dim bo_phat_sinh As New OleDbCommandBuilder(bo_doc_ghi)
Khi thực hiện, bo_phat_sinh sẽ khơng phát sinh được các lệnh DeleteCommand, InsertCommand và UpdateCommand vì:
a) Dịng lệnh khai báo (2) thiếu tham số
b) OleDbCommandBuilder khơng phải là đối tượng phát sinh các Command cịn lại
c) Nội dung SelectCommand của OleDbDataAdapter khơng cĩ cột khĩa chính hoặc cột duy nhất d) Nội dung SelectCommand của OleDbDataAdapter khơng phải từ hai bảng trở lên
Câu 12. Cho cấu trúc dữ liệu như sau:
Với bang_to_xay_dung là DataTable chứa dữ liệu đọc về từ TO_XAY_DUNG bang_tho là DataTable chứa dữ liệu đọc về từ THO
Hai bảng này chưa thuộc về DataSet nào
Để tạo quan hệ giữa bang_to_xay_dung và bang_tho, sử dụng đoạn lệnh nào sau đây:
a) Dim quan_ly As New Dataset
Dim qh As New DataRelation("TO_THO", bang_to_xay_dung.Columns("MTO"), _ bang_tho.Columns("MTO")) quan_ly.Relations.Add(qh)
b) Dim quan_ly As New Dataset
quan_ly.Tables.AddRange(New DataTable(){bang_tho, bang})
Dim qh As New DataRelation("TO_THO", bang_to_xay_dung.Columns("MTO"), _ bang_tho.Columns("MTO")) c) Dim quan_ly As New Dataset
quan_ly.Tables.AddRange(New DataTable(){bang, bang_tho})
Dim qh As New DataRelation("TO_THO", bang_tho.Columns("MTO"), _
bang_to_xay_dung.Columns("MTO"))) quan_ly.Relations.Add(qh)
d) Dim quan_ly As New Dataset
quan_ly.Tables.AddRange(New DataTable(){bang_tho, bang})
Dim qh As New DataRelation("TO_THO", bang_to_xay_dung.Columns("MTO"), _ bang_tho.Columns("MTO")) quan_ly.Relations.Add(qh)
Câu 13. DataTable bang_chi_tiet cĩ các DataColumn như sau: MHD, MHH, So_luong, Don_gia với ý nghĩa Mã hĩa đơn kiểu Integer, Mã hàng hĩa kiểu Integer, Số lượng kiểu Integer, Đơn giá kiểu Integer. Để tính tốn trị giá của một mã hĩa đơn M cĩ thể sử dụng cú pháp nào dưới đây:
a) Compute( Sum(So_luong*Don_gia) )
b) Compute( "Sum(So_luong*Don_gia)", "MHD=" & M) c) Compute( "Sum(So_luong*Don_gia)", "Where MHD =" & M)
d) Khơng thể sử dụng cú pháp nào ở trên
Câu 14. Các phát biểu nào sau đây về DataView được xem là SAI: (chọn 2 câu) a) Một DataTable cĩ thể tạo ra nhiều DataView
b) Khơng thể cập nhật cho DataView
c) Cĩ thể lọc và sắp xếp dữ liệu trên DataView
d) Một DataView cĩ thể được tạo ra từ nhiều DataTable
Câu 15. Sử dụng đoạn lệnh nào sau đây để tạo cột tự động tăng STT trên DataTable bang:
a) bang.Columns.Add("STT", Type.GetType("System.Integer"), "AutoIncrement") b) bang.Columns.Add("STT", Type.GetType("System.Integer"), "AutoIncrement=True") c) bang.Columns.Add("STT", Type.GetType("System.Integer"), "Identity=True")
d) Dim cot As DataColumn= bang.Columns.Add("STT", Type.GetType("System.Integer")) cot.AutoIncrement = True
Câu 16. Giữa hai DataTable bang_hoa_don (bảng một) và bang_chi_tiet (bảng nhiều) cĩ một quan hệ (DataRelation) tên "HD_CT" thơng qua cột "MHD". Chọn hai cách tạo cột cho bang_hoa_don thể hiện số mặt hàng được bán qua mỗi hĩa đơn:
a) bang_hoa_don.Columns.Add("So_mat_hang", System.Integer, "Count(Child.MHD)") b) bang_hoa_don.Columns.Add("So_mat_hang", Type.GetType("System.Integer"), _
c) bang_hoa_don.Columns.Add("So_mat_hang", Type.GetType(System.Integer), _ "Count(Child.MHD)") d) bang_hoa_don.Columns.Add("So_mat_hang", Type.GetType("System.Integer"), _
"Count(Child(HD_CT).MHD)")
Câu 17. Thuộc tính RowState của DataRow cĩ các giá trị nào sau đây:
a) Added, Deleted, Detached, Modified, Unchanged b) Added, Deleted, Modified, Unchanged
c) Added, Deleted, Modified Original, Modified Current, Unchanged d) Deleted, EditAdd, EditInProgress, Unchanged
Câu 18. Khai báo nào sau đây khơng hợp lệ trên phần General:
a) Const Chuoi_vi_tri = "\..\Du_lieu\CSDL.mdb"
b) Const Chuoi_vi_tri As String= "\..\Du_lieu\CSDL.mdb"
c) Const Chuoi_vi_tri As String= Application.StartUpPath & "\..\Du_lieu\CSDL.mdb" d) Private Chuoi_vi_tri As String= Application.StartUpPath & "\..\Du_lieu\CSDL.mdb"
Câu 19. Date.Today trả về giá trị của ngày hiện hành. Trên một máy tính cĩ Region Settings qui định cách hiển thị ngày tháng năm là dd/MM/yyyy, trên Immediate Window, kết quả nào sau đây được in ra khi thực hiện dịng lệnh :
?Date.Today (giả sử cĩ trị ngày 15 tháng 6 năm 2005)
a) #15/06/2005#
b) #15/06/2005 12:00:00#
c) #6/15/2005# d) #06/15/2005#
Câu 20. Phương thức AddNew của DataView trả về một DataRowView và khi được gọi số dịng trên DataView (<Dataview>.Count) tăng thêm một. Trên DataTable mà DataView được tạo, số dịng (<DataTable>.Rows.Count) sẽ:
a) Bằng số dịng trên DataView
b) Bằng số dịng trên DataView cĩ tình trạng là DataViewRowState.CurrentRows
c) Khơng thay đổi so với số dịng trên DataTable trước khi AddNew của DataView được gọi d) Các câu trên đều sai
Câu 21. Xét đoạn lệnh sau trên DataTable bang_nv:
Dim a,b As Integer
a = bang_nv.Rows.Count bang_nv.Rows(0).Delete() b = bang_nv.Rows.Count
Hãy cho biết a và b thế nào sau khi thực hiện thành cơng đoạn lệnh trên (khơng bị lỗi) a) a < b
b) a = b c) a > b d) a = b + 1
Câu 22. Để xuất dữ liệu liệt kê ra điều khiển ComboBox, khi sử dụng đoạn lệnh sau:
<ComboBox>.DisplayMember = "<tên cột hiển thị>" <ComboBox>.ValueMember = "<tên cột lưu trữ>" <ComboBox>.DataSource = <DataTable>
Người ta thấy các dịng trên ComboBox hiển thị cùng nội dung là "System.Data.DataRowView" Hãy chọn giải thích đúng cho trường hợp này
a) <tên cột hiển thị> khơng cĩ trên <DataTable> b) <tên cột lưu trữ> khơng cĩ trên <DataTable>
c) <ComboBox>.DataSource phải sửa lại là <ComboBox>.RowSource d) Các giải thích trên đều sai
Câu 23. Để gọi thực hiện báo biều Crystal Report BC_NHAN_VIEN, sử dụng đoạn lệnh nào sau đây:
a) Dim bb As New BC_NHAN_VIEN bb.Show
b) Dim bb As New BC_NHAN_VIEN
Dim crv As New CrystalDecisions.Windows.Forms.CrystalReportViewer crv.ReportSource = bb
crv.Show
c) Dim bb As New BC_NHAN_VIEN
Dim crv As New CrystalDecisions.Windows.Forms.CrystalReportViewer crv.ReportSource = bb
crv.PrintReport
d) Các câu trên đều sai
Câu 24. Trong mơ hình PUSH của Crystal Report, dữ liệu xuất trên báo biểu: a) Do .Net FrameWork xử lý đọc về.
b) Do người lập trình viết lệnh đọc dữ liệu và gửi lên cho báo biểu.
c) Do Crystal Report tự đọc về qua việc khai báo các bảng và thơng tin kết nối khi thiết kế báo biểu d) Các câu trên đều sai
Câu 25. Để truyền giá trị cho tham số Ngay_sinh cho báo biểu Crystal Report BC_NHAN_VIEN, sử dụng cú pháp nào dưới đây:
a) Dim bb As New BC_NHAN_VIEN Dim ngay As New Date(1988,1,1) bb.ParameterFields(0) = ngay b) Dim bb As New BC_NHAN_VIEN
Dim ngay As New Date(1988,1,1)
bb.SetParameterValue("Ngay_sinh", ngay) c) Dim bb As New BC_NHAN_VIEN
Dim ngay As New Date(1988,1,1) bb.ParameterFields.Add( ngay)
Phần thực hành (120 phút) I. Tạo CSDL
a) Mơ tả
Vào mỗi cuối tháng, cơng ty xây dựng ABC dựa trên bảng chấm cơng và lương của các tổ xây dựng để tính lương cho thợ. Mỗi tổ trưởng, ngồi phần lương của mình cịn nhận được khoản phụ cấp trách nhiểm trích từ lợi nhuận của cơng ty.
b) Cấu trúc các bảng
Tập tin cơ sở dữ liệu QL_LUONG.mdb gồm các bảng : (các field in đậm và gạch dưới là khĩa chính) TO_XAY_DUNG – Danh sách các tổ xây dựng
Field Name Field Type Field Size Description
MTO Autonumber Long Integer Mã tổ xây dựng
Ten_to Text 30 Tên tổ xây dựng
To_truong Number Long Integer Mã thợ là tổ trưởng
THO – Danh sách thợ
Field Name Field Type Field Size Description
MTH Autonumber Long Integer Mã thợ
Ho_ten Text 30 Họ tên thợ
Gioi_tinh Yes/No Giới tính: Yes: Nam ; No: Nữ
Ngay_sinh Date/Time Ngày sinh
HSL Number Single Hệ số lương
MTO Number Long Integer Mã tổ xây dựng
CHAM_CONG – Chấm công thợ
Field Name Field Type Field Size Description
MCC Autonumber Long Integer Mã chấm công
MTH Number Long Integer Mã thợ
Ngay_nghi Date/Time Ngày nghỉ
LUONG_TO – Lương tháng của các tổ xây dựng
Field Name Field Type Field Size Description
MLG Autonumber Long Integer Mã lương tổ
MTO Number Long Integer Mã tổ xây dựng
Nam_thang Text 6 Năm tháng tính lương
Tong_luong Number Double Lương tháng của tổ
LUONG – Lương tháng của thợ
Field Name Field Type Field Size Description
STT Autonumber Long Integer Số thứ tự lương
MLG Number Long Integer Mã lương tổ
MTH Number Long Integer Mã thợ
So_cong Number Integer Số ngày công
Phu_cap Number Long Integer Phụ cấp trách nhiệm
c) Quan hệ giữa các bảng
Hình 1 – Quan hệ giữa các bảng
II. Các màn hình làm việc a) Màn hình khởi động
Tạo form MDI với tiêu đề Quản lý lương cĩ thực đơn như sau:
Hình 2 – Màn hình và các thành phần của hệ thống menu
Khi người dùng chọn các mục trong menu, thực hiện các yêu cầu tương ứng sau: o Giới thiệu: dùng MsgBox hiển thị thơng tin của thí sinh: Họ tên – Năm sinh
o Chọn thời gian: Hiển thị màn hình chọn thời gian câu 2 ở chế độ hộp thoại.
o Đĩng: Hiển thị cửa sổ thơng báo “Ứng dụng sẽ đĩng lại. Bạn cĩ đồng ý khơng ?”. Tùy theo trả lời của
người dùng, sẽ thực hiện đĩng ứng dụng hay khơng (Cĩ thể sử dụng hàm MsgBox).