Ứng dụng gis trong việc đánh giá chất lượng học sinh

Đại Học Quốc Gia Tp Hồ Chí Minh   ✁ ✂ ✄ ✑ ✑ ✠ ☛ ✾ ✙ ✚ ✿ ✛ ❀ ✜ ❁ ✢ ✢ ✢ ✣ ✣ ✢ ✢ ✑ ✑ ✑ ✗ ● ✠ ✥ ✦ ✥ ✒ ✑ ✑ ✑ ✑ ✓ ✑ ✑ ✑ ✕ ✡ ✑ ✑ ☛ ✑ ☎ ✫ ❅ ✑ ✑ ☛ ✬ ✭ ☞ ✑ ✑ ✖ ✮ ✌ ✑ ✑ ✑ ☛ ★ ☛ ✑ ✗ ✯ ✰ ✑ ✠ ✑ ✍ ✑ ✠ ✑ ✑ ✂ ✱ ✑ ✠ ✑ ✑ ✘ ✲ ✎ ✑ ✑ ☎ ✬ ✳ ✏ ✆ ✰ ✴ ✯ ✰ ✵ ★ ✶ ✯ ✭ ★ ✩ ✷ ✸ ✹ ✺ ✻ ✶ ✭ ✼ ✽ ❂ ☎ ✾ ✠ ✪ ❄ ❇ ❍ ✑ ✩ ❄ ✟ ✔ ★ ❃ ✠ ✞ ✓ ✧ ❂ ☛ ✑ ✆ ❆   ✝ ✑ ☎ ✙ ✙ ✆ ✑ ✒ ✤ ✤ ☎ ❈ ✟ ❉ ☎ ☎ ✠   ■ ❏ ✠ ✙ ❑ ✞ ✢ ☛ ✣ ❊ ▲ ▲ ❋ ✢ ▼ ◆ ❖ ❃ ❃ ❅ Trong suốt q trình học tập, nghiên cứu, tơi ln hướng dẫn, giúp đở tận tình Quý Thầy, Cô bạn Tôi vô cảm ơn bày tỏ lòng chân thành gởi đến : TS TRẦN TRỌNG ĐỨC, người Thầy tận tình giảng dạy, hướng dẫn, tạo điều kiện thuận lợi việc học tập nghiên cứu, giúp đỡ tơi hồn thành luận văn Quý Thầy, Cô lớp cao học ngành đồ, viễn thám hệ thông tin địa lý tận tình giảng dạy, hướng dẫn giúp đở tơi học tập nghiên cứu khoa học Quý thầy mơn Địa Tin học Phịng Đào tạo Sau đại học - Trường Đại học Bách Khoa tạo điều kiện tốt cho trang thiết bị tài liệu học tập suốt khóa học Lãnh đạo Trung tâm Công nghệ Thông tin Địa lý, bạn đồng nghiệp công tác Trung tâm Công nghệ Thông tin Địa lý - Trường Đại học Bách Khoa, học viên cao học Trắc địa GIS quan tâm, động viên khuyến khích tơi suốt khóa học thực luận văn tốt nghiệp Cuối tơi xin bày tỏ lịng biết ơn đến người thân gia đình : Cha, mẹ, anh, chị, em không ngại hy sinh gian khổ để động viên tơi hồn thành luận văn     ✾   ✁   ❆ ✓ ❇ ☎ ❈ ❉ ☎   ✠ ✞ ☛ ❊ ❋ Những năm vừa qua, ngành giáo dục Việt Nam nói riêng có cải cách thiết thực nhằm mục tiêu “Nâng cao dân trí, phát triển nhân tài, đào tạo nhân lực” phục vụ cho công cơng nghiệp hóa, đại hóa đất nước Từ nhìn nhận nêu trên, Quận đổi cải tiến công tác quản lý nhằm nâng cáo chất lượng dạy học gắn kết với phát triển cộng đồng dân cư Do phát triển khoa học công nghệ, nghiệp giáo dục chuyển theo phát triển xu thời đại việc áp dụng công nghệ công tác quản lý, đánh giá chất lượng dạy - học hoạch định sách Đề tài luận văn nghiên cứu xây dựng công cụ để chọn vùng, phân tích, thống kê đánh giá chất lượng học sinh địa phương dựa đồ địa phương kết hợp công nghệ GIS Kết đạt nhằm tạo điều kiện thuận lợi cho việc nghiên cứu trình độ học vấn cộng đồng xã hội đánh giá tầm ảnh hưởng cấu kinh tế – văn hóa - xã hội đến kết đào tạo giáo dục địa phương ✏ ☞ ❊   ✁ ✏ ☛   In recet years, VietNam education and particularly education of District which title based on “Heighten intellectual standard of the people, developing gifted people, and prepare manpower” have been pressingly reformed These new changes thoroughly supports the nation’s industrilization and modernization Follow abouve judges, District 6th has been improved on management process for teaching qualify and attached it on the people community educational development According to the technology cut-edge, educational occupation has changed for the growth of present tendency That is applying new tools in management, and education quality as well as line out the better policies, This thesis studies and builds some GIS tools to select, analyze and estimate the region for the local disciple on the map The archieve results focus on study the relation between the standard of knowledge and some social factors in regionale ducation Một số hình ảnh sử dụng đề tài CHƯƠNG 1: GIỚI THIỆU 11 1.1 ĐẶT VẤN ĐỀ 11 1.1.1 Đặc điểm tình hình 11 1.1.2 Nhu cầu quản lý phòng Giáo dục Ủy Ban Nhân Dân Quận 12 1.2 MỤC TIÊU ĐỀ TÀI 12 1.3 PHẠM VI NGHIÊN CỨU 12 1.4 PHƯƠNG PHÁP NGHIÊN CỨU 13 1.5 NỘI DUNG NGHIÊN CỨU 13 CHƯƠNG 2: CƠ SỞ LÝ THUYẾT 14 2.1 NGHIÊN CỨU VỀ LÝ THUYẾT THỐNG KÊ TRONG NGÀNH GIÁO DỤC 14 2.1.1 Hoạt động thống kê giáo dục 14 2.1.2 Chỉ tiêu thống kê 14 2.1.3 Hệ thống tiêu thống kê 15 2.1.4 Báo cáo thống kê 15 2.1.5 Điều tra thống kê 16 2.1.6 Tổng điều tra 16 2.1.7 Điều tra chọn mẫu 16 2.1.8 Phương aùn điều tra thống kê 17 2.1.9 Bảng danh mục nghề nghiệp 17 2.1.10 Bảng danh mục giáo dục, đào tạo 18 2.1.11 Bảng danh mục đơn vị hành 18 2.1.12 Bảng danh mục dân tộc Việt Nam 18 2.1.13 Số tuyệt đối thống kê 18 2.1.14 Số tương đối 18 2.1.15 Số bình quân 19 2.1.16 Dãy số biến động theo thời gian 20 2.1.17 Dự báo thống kê 20 2.1.18 Phương pháp số 21 2.1.19 Phương pháp đồ thị 21 2.2 NGHIÊN CỨU VỀ LÝ THUYẾT THỐNG KÊ KHƠNG GIAN: 23 2.2.1 Vai trị thống kê địa lý 23 2.2.2 Phân tích mối liên hệ tương quan tiêu biến đổi theo không gian: 25 2.2.3 Sơ đồ phân tán (Scattergram) 25 2.2.3 Hệ số tương quan tuyến tính hai tiêu (ký hiệu r): 27 2.3 CÁC CHỈ TIÊU THỐNG KÊ 28 2.3.1 Số liệu thông tin thống kê 28 2.3.2 Chỉ tiêu 29 3.3 Chỉ tiêu giáo dục sử dụng đề tài 32 2.4 PHƯƠNG PHÁP THỂ HIỆN CÁC CHỈ TIÊU THỐNG KÊ TRÊN BẢN ĐỒ:   ❄ 2.4.1 Giới thiệu đồ học chuyên đề 34 2.4.2 Biểu diễn số liệu thống kê đồ chuyên đề giáo dục 39 CHƯƠNG 3: XÂY DỰNG CHƯƠNG TRÌNH PHÂN VÙNG VÀ ĐÁNH GIÁ CHẤT LƯỢNG HỌC SINH TRÊN ĐỊA BÀN QUẬN 53 3.1 QUY TRÌNH TỔNG QUÁT XÂY DỰNG CHƯƠNG TRÌNH 53 3.1.1 Quy trình tổng quát thành lập chương trình đánh giá chất lượng học sinh:53 3.1.2 Mơ tả quy trình 55 3.2 XÂY DỰNG CƠ SỞ DỮ LIỆU 56 3.2.1 Yêu cầu 56 3.2.2 Phương pháp thực 56 3.2.3 Phân tích thiết kết Cơ sở Dữ liệu 57 3.2.4 Mô hình liệu mức vật lý 63 3.4 SỰ CẦN THIẾT PHẢI CĨ CÁC CƠNG CỤ ĐO LƯỜNG MỐI QUAN HỆ GIỮA CÁC BIẾN CHỈ TIÊU 74 3.4.1Mối quan hệ mức thu nhập hộ gia đình chất lượng học học sinh hộ gia đình 74 3.4.2 Tỷ lệ học sinh có học lực thấp (học lực trung bình) số lượng tụ điểm giải trí khơng phù hợp với lứa tuổi vùng 76 3.4.3 Số lượng học sinh bỏ học số lượng hộ nghèo, thất nghiệp (hoặc thu nhập thấp) vùng: 77 3.5 SỰ CẦN THIẾT PHẢI CÓ CÁC CÔNG CỤ CẬP NHẬT, HIỂN THỊ, XUẤT KẾT QUẢ: 78 3.5.1 Sơ đồ chức chính: 78 3.5.2 Mô tả chức 80 3.5.3 Xây dựng công cụ 82 CHƯƠNG : KẾT QUẢ 90 4.1 CƠ SỞ DỮ LIỆU GIÁO DỤC CỦA QUẬN 90 4.2 CHƯƠNG TRÌNH PHÂN VÙNG ĐÁNH GIÁ CHẤT LƯỢNG GIÁO DỤC TRÊN ĐỊA BÀN QUẬN 91 4.2.1 Giao diện chương trình 91 4.2.2 Xem cập nhật thơng tin nhà 92 4.2.3 Chức tìm kiếm, thống kê phân tích tương quan 97 4.2.4 Chức thống kê hiển thị kết đồ hành chánh 104 4.2.5 Danh mục 105 CHƯƠNG 5: KẾT LUẬN VÀ HƯỚNG PHÁT TRIỂN CỦA ĐỀ TÀI 109 5.1 KẾT QUẢ ĐẠT ĐƯỢC 109 5.2 HƯỚNG PHÁT TRIỂN CỦA ĐỀ TÀI 110 TÀI LIỆU THAM KHẢO 111 PHỤC LỤC 113 ❊     ✠   ✢ ✙ ✁ ✢ ✙ Hình 2.1.21: Phương pháp đồ thị Hình 2.2.1: Vai trị thống kê khơng gian địa lý Hình 2.2.3: Các trường hợp phân tán Hình 3.3: Một số tiêu giáo dục Hình 2.4.1.1a: Bản đồ địa lý tổng quát Hình 2.4.1.1b: Bản đồ địa lý chuyên đề Hinh 2.4.1.4.1: Phân loại đồ chuyên đề theo nội dung Hinh 2.4.1.4.2: Phân loại đồ chuyên đề theo mục đích Hinh 2.4.1.4.3 : Phân loại đồ chuyên đề theo tỉ lệ 10 Hình 2.4.2 a: Ví dụ số liệu 11 Hình 2.4.2 b: Với biểu đồ vẽ tranh rõ ràng 12 14 Hình 2.4.2.c: Biểu đồ có màu sắc để phân biệt nhấn mạnh Hình 2.4.2d: Những lời thích đồ nêu rõ thông tin truyền đạt đến người đọc Hình 2.4.2e: Biểu đồ cột 15 Hình 2.4.2f: Biểu đồ đường kẻ 16 Hình 2.4.2g: Biểu đồ diện tích 17 Hình 2.4.2g: Biểu đồ hình bánh 18 Hình 2.4.2.1: Vị trí trường học cấp 19 Hình 2.4.2.2: Bản đồ phân bố chi nhánh trường đại học 20 Hình2.4.2.3: Phương pháp thể số liệu thống kê dạng biểu đồ cột 21 23 Hình 2.4.2.4: Bản đồ thể phần trăm giáo dục dân số tuổi Hình 3.1.1: Quy trình tổng quát xây dựng chương trình phân vùng đánh giá chất lượng học sinh Hình 3.2.3.3: Danh sách ràng buộc tĩnh 24 Hình 3.2.4.2: Cơ sở liệu cài Arc Catalog 25 Hình 3.4.1: Sơ đồ chức chương trình 26 Hình 3.4.3.1: Lưu đồ cập nhật thơng tin nhân 27 Hình 3.4.3.2: Lưu đồ cập nhật thơng tin nhân 28 Hình 3.4.3.3: Lưu đồ tìm kiếm 13 22 void Sua(string a) Class DuongGiaoThong{ (extent duonggiaothong) attribute Arc Geometry //relationships //bieåu diễn mối liên kết - nhiều lớp ConDuong lớp DuongGiaoThong relationship ConDuong thuoc inverse ConDuong:: gom //operations void Them() void Xoa(string a) void Sua(string a) void Tim(string a)} Class GiaoThong{ (extent giaothong Key IDGiaoThong) attribute string IDGiaoThong attribute string TenDoanDuong attribute enum LoaiMatGThong { Lề đường, Lồng đường, Hẻm, Mặt đường sắt, Khác } attribute float ChieuDai attribute float ChieuRong attribute enum VatLieu {Nhựa, Bêtông, Xi măng, Đá, Đất } attribute enum Cap{ Quốc lộ, Tỉnh lộ, Huyện lộ, Xã lộ, Đường phố vùng đô thị có tên, 123 Đường phố hẻm, Đường ôtô nhỏ, nhựa, gạch} attribute Polygon Geometry //relationships //biểu diễn mối liên kết - nhiều lớp ConDuong lớp GiaoThong relationship ConDuong thuoc inverse ConDuong:: gom //operations void Them() void Xoa(string a) void Sua(string a) void Tim(string a)} Class ConSong { (extent ConSong Key MaConSong) attribute string TenConSong attribute float Chiều dài attribute float Chiều rộng //relationships Class Nha { (extent Nha Key IDNha) attribute string SoNha attribute string TenNha attribute string TenChuHo attribute float DienTich attribute string KhuPho 124 attribute Polygon Geometry attribute string GhiChu //relationships // Biểu diễn mối liên kết nhiều lớp Nha lớp HoKhau relationship Set Co inverse HoKhau:: Thuoc // Bieåu diễn mối liên kết nhiều lớp Nha lớp Phuong relationship Phuong Thuoc inverse Phuong:: Gom // Biểu diễn mối liên kết nhiều lớp Nha lớp Phuong relationship ConDuong Thuoc inverse ConDuong:: Gom //operations void Them() void Xoa(string a) void Sua(string a) void Tim(string a)} Class Hokhau{ (extent Hokhau Key SoHoKhau) attribute string SoHoKhau attribute date NgayDangKy attribute string ThanhPhan attribute string GhiChu //relationships // Biểu diễn mối liên kết nhiều lớp HoKhau lớp NhanKhau relationship Set Co inverse NhanKhau:: Thuoc // Biểu diễn mối liên kết nhiều lớp HoKhau lớp Nha relationship Nha Thuoc inverse Nha:: Gom 125 //operations void Them() void Xoa(string a) void Sua(string a) void Tim(string a)} Class NhanKhau{ (extent NhanKhau Key MaNhanKhau) attribute string MaNhanKhau attribute string HoTen attribute enum GioiTinh attribute date NgaySinh attribute enum QuanHeChuHo {Chủ hộ, Cha, Me, Con, Vợ, Chồng,Ông ,Bà} attribute enum TonGiao {Phật giáo, Công giáo, Cao đài, Hòa hảo, Hồi giáo, Không tôn giáo, Khác } attribute enum DanToc {Kinh, Hoa, Khơ me, Khác } attribute enum TinhTrangGiaDinh {Đã có gia đình, Độc thân, Mồ côi, Sống với ông bà, Sống với cô chú, Khác} attribute enum TinhTrangHienTai (Còn địa phương, Đã chết, Đã chuyển nơi khác, Xuất cảnh, Khác} attribute string GhiChu //relationships // Biểu diễn mối liên kết nhiều lớp NhanKhau lớp HoKhau 126 relationship HoKhau Thuoc inverse HoKhau:: Gom / Biểu diễn mối liên kết nhiều lớp NhanKhau lớp TrinhDo relationship TrinhDo thuoc inverse TrinhDo:: Co // Biểu diễn mối liên kết nhiều lớp NhanKhau lớp NgheNghiep relationship NgheNghiep thuoc inverse NgheNghiep :: Co //operations void Them() void Xoa(string a) void Sua(string a) void Tim(string a)} Class TrinhDo{ (extent TrinhDo Key MaTrinhDo) attribute string MaTRinhDo attribute string TrinhDo attribute string Ghichu //relationships //biểu diễn mối liên kết - nhiều lớp TrinhDo lớp NhanKhau relationship Set Co inverse NhanKhau:: thuoc //operations void Them() void Xoa(string a) void Sua(string a) Class NgheNghiep{ (extent NgheNghiep 127 Key MaNgheNghiep) attribute string MaNgheNghiep attribute string NgheNghiep attribute string Ghichu //relationships //biểu diễn mối liên kết - nhiều lớp NgheNghiep lớp NhanKhau relationship Set Co inverse NhanKhau:: thuoc //operations void Them() void Xoa(string a) void Sua(string a) 128 PH ☛ ✥ ✒ ☛ ✥ 3: M T S ☞   ✏ O N CODE TRONG CH   ✓   NG TRÌNH: Module thống kê: Private Sub ThucHienThongKe(ByVal cot As Integer, Optional ByVal WS As String = "") Dim i As Integer Try Dim ErrorTrap As String = "" ErrorTrap = Me.lvwThongKe.Items(0).SubItems(cot).Text Catch ex As Exception For i = To SOTIEUCHI - Me.lvwThongKe.Items(i).SubItems.Add("") Next If WS = "" Then For i = To SOTIEUCHI - Me.lvwThongKe.Items(i).SubItems(cot).Text = CStr(intSLStat(i)) Next End If End Try 'Xoa tat ca du lieu cu mang doi voi cung don vi hanh chinh: System.Array.Clear(intSLStat, 0, SOTIEUCHI) If WS "" Then 'Duyet mang tat ca cac thua 'neu thua nao thao dieu kien thi truy van ho gia dinh cua thua For i = To nRegionParcel - If RegionParcel(nChoiceRegionType, i) = WS Then 'Goi ham thong ke thua: theo gia tri RegionParcel(4,i) intSLStat(6) += isKhuGiaiTri(RegionParcel( u44 ? i)) TinhToanSoLieuPhucVuChoThongKeThua(RegionParcel(4, i)) End If Next End If 'Ghi du lieu thong ke vao cot: ' kiem tra xem da co du lieu chua? neu co thi khong can thong ke nua 129 If WS "" Then 'truong hop thong ke tat ca For i = To SOTIEUCHI - Me.lvwThongKe.Items(i).SubItems(cot).Text = CStr(intSLStat(i)) Next End If End Sub Private Sub lvwThongKe_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lvwThongKe.SelectedIndexChanged Dim i As Integer XX = "" YY = "" For i = To nRegion2Stat - XX += Me.lvwThongKe.Columns(3 + i).Text + "|" YY += Me.lvwThongKe.Items(Me.lvwThongKe.FocusedItem.Index).SubItems(3 + i).Text + "|" Next XX += Me.lvwThongKe.Columns(3 + nRegion2Stat - 1).Text YY += Me.lvwThongKe.Items(Me.lvwThongKe.FocusedItem.Index).SubItems(3 + nRegion2Stat - 1).Text 'Ve thi: VeDoThi2(XX, YY) End Sub Module tính tương quan: Private Sub cmdTuongQuan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdTuongQuan.Click Dim i As Integer Dim k, l As Integer k = Me.cboTieuChi1.SelectedIndex l = Me.cboTieuChi2.SelectedIndex n = Me.lvwThongKe.Columns.Count - '''Thiet lap XX va YY If Me.lvwThongKe.Columns.Count >= 3_cf2 Then XX = Trim(Me.lvwThongKe.Items(k).SubItems(3).Text) 130 YY = Trim(Me.lvwThongKe.Items(l).SubItems(3).Text) End If If Me.lvwThongKe.Columns.Count >= 4_cf2 Then For i = To Me.lvwThongKe.Columns.Count - XX += "|" + Trim(Me.lvwThongKe.Items(k).SubItems(i).Text) YY += "|" + Trim(Me.lvwThongKe.Items(l).SubItems(i).Text) Next End If Select Case Me.cboTuongQuan.SelectedIndex Case r = StatPearson(XX, YY) Case r = StatSpearman(XX, YY) Case Else MsgBox("Vui long chon phuong an tuong quan") Exit Sub End Select 'Gan nhan ket qua: Me.lblStatRelation.Text = CStr(Format(r, "0.000")) 'Ve thi: VeDoThi3(XX, YY) End Sub Vẽ polygon xác định vùng lựa chọn đồ: Public Sub DrawPolygonXOR(ByVal pPolygon As IPolygon, Optional ByVal refresh As Boolean = True) Dim pFillSymbol As IFillSymbol Dim pLineSymbol As ILineSymbol Dim pSymbol As ISymbol Dim pRGBColor As IRgbColor Dim m_ActiveView As IActiveView Dim pLSymbol As ISymbol ' This function draws a polygon on the screen using a XOR pen ' it is used by the buffer routine to quickly draw and undraw a ' polygon on the screen without the need to redraw any other features ' construct the symbol 131 pFillSymbol = New SimpleFillSymbol pSymbol = pFillSymbol ' set the drawing mode so that_u116 ?wo draws undraw the symbol pSymbol.ROP2 = esriRasterOpCode.esriROPXOrPen pRGBColor = New RgbColor With pRGBColor UseWindowsDithering = False Red = 45 Green = 45 Blue = 45 End With pFillSymbol.Color = pRGBColor pLineSymbol = pFillSymbol.Outline pLSymbol = pLineSymbol pLSymbol.ROP2 = esriRasterOpCode.esriROPXOrPen With pRGBColor UseWindowsDithering = False Red = 145 Green = 145 Blue = 145 End With pLineSymbol.Color = pRGBColor pLineSymbol.Width = 0.1 pFillSymbol.Outline = pLineSymbol ' Set the symbol into the display m_ActiveView = m_map m_ActiveView.ScreenDisplay.StartDrawing(0, esriScreenCache.esriNoScreenCache) m_ActiveView.ScreenDisplay.SetSymbol(pSymbol) ' if func called to draw aswell as undraw then plot the polygon If (pPolygon Is Nothing) Then If (Not m_pSearchPolygon Is Nothing) Then m_ActiveView.ScreenDisplay.DrawPolygon(m_pSearchPolygon) If (Not refresh) Then m_pSearchPolygon = Nothing Else m_pSearchPolygon =_cf2 Nothing 132 m_ActiveView.ScreenDisplay.DrawPolygon(pPolygon) m_pSearchPolygon =_u112 ?Polygon End If m_ActiveView.ScreenDisplay.FinishDrawing() End Sub ' Ve Polygon bao vung lua chon ' Thao tac Query tren Spatial vung lua chon (Polygon) Public Sub QueryBySpatial(ByVal m_pApp As IApplication,ÌByVal operator As esriSelectionResultEnum) On Error GoTo Handle Dim i As Long Dim sLoop As Long Dim sSelectionEnvÌAs ISelectionEnvironment Dim prevSelMethodÌAs esriSelectionResultEnum Dim prevAreaSelection As esriSpatialRelEnum Dim prevLineSelection As esriSpatialRelEnum Dim prevPointSelection As esriSpatialRelEnum Dim sCol As Collection Dim sLayer As ILayer Dim sFeatureLayerÌAs IFeatureLayer Dim sGeoLayer As IGeoFeatureLayer Dim sUID As UID Dim sEnumLayer As IEnumLayer Dim sMxdoc As IMxDocument Dim sMap As IMap If (m_pSearchGeometry Is Nothing) Then Exit Sub End If sSelectionEnv = m_pApp.SelectionEnvironment prevAreaSelection = sSelectionEnv.AreaSelectionMethod prevLineSelection = sSelectionEnv.LinearSelectionMethod prevPointSelection = sSelectionEnv.PointSelectionMethod sSelectionEnv.AreaSelectionMethod = esriSpatialRelEnum.esriSpatialRelContains 133 sSelectionEnv.LinearSelectionMethod = sSelectionEnv.AreaSelectionMethod sSelectionEnv.PointSelectionMethod = sSelectionEnv.AreaSelectionMethod prevSelMethod = sSelectionEnv.CombinationMethod sSelectionEnv.CombinationMethod = operator m_ActiveView = m_map If (prevSelMethod esriSelectionResultEnum.esriSelectionResultAdd) Then m_ActiveView.PartialRefresh(esriViewDrawPhase.esriViewGeoSelection, Nothing, Nothing) End If sUID =ÌNew UID sUID.Value = "{E156D7E5-22AF-11D3-9F99-00C04F6BC78E}" sMxdocÌ= m_mxDoc sMap =ÌsMxdoc.FocusMap sEnumLayer = sMap.Layers(sUID, True) sEnumLayer.Reset() sLayerÌ= sEnumLayer.Next i=0 sCol =ÌNew Collection Do While Not sLayer Is Nothing sGeoLayer = sLayer sCol.Add(sGeoLayer.Selectable, CStr(i)) sGeoLayer.Selectable = False 'MsgBox("aliasÌname = " + CStr(UCase(fFeatureLayer.FeatureClass.AliasName))) If UCase(sLayer.FeatureClass.AliasName) = "NHÀ Ở" Then 'UCase(CLASSSTR) Then Ì Dim Str As String Ì Str = sLayer.Name Ì If Str = sGeoLayer.Name Then 134 Ì sGeoLayer.Selectable = True Ì End If End If i=i+1 sLayer = sLayer.Next Loop m_map.SelectByShape(m_pSearchGeometry, sSelectionEnv, False) 'DoEvents() m_ActiveView.PartialRefresh(esriViewDrawPhase.esriViewGeoSelection, Nothing, Nothing) ' reset the selection status of this layers back sEnumLayer.Reset() sLayerÌ= sEnumLayer.Next i=0 Do While Not sLayer Is Nothing If (TypeOf sLayer Is IGeoFeatureLayer) Then Ì sGeoLayer = sLayer Ì sGeoLayer.Selectable = sCol.Item(CStr(i)) End If i=i+1 sLayer = sEnumLayer.Next Loop sSelectionEnv.CombinationMethod = prevSelMethod sSelectionEnv.AreaSelectionMethod = prevAreaSelection sSelectionEnv.LinearSelectionMethod = prevLineSelection sSelectionEnv.PointSelectionMethod = prevPointSelection Exit Sub Handle: MsgBox(Err.Number & " " & Err.Description & vbCrLf & "Hy chn li vng khơng gian cho ph hõịp", vbCritical, "LơÞi") 135 136 TÓM TẮT LÝ LỊCH TRÍCH NGANG A - Thông tin chung - Họ tên: HỒ NGUYỄN CÚC PHƯƠNG - Ngày, tháng, năm sinh: 05/07/1979 Phái: Nữ Nơi sinh: TP HCM - Địa liên lạc: 26 lầu đường Phạm Văn Chí F1 TP Hồ Chí Minh - Email: hncphuong_79@yahoo.com - Điện thoại : 08 – 8562797 Điện thoại di động : 0918279760 B- Quá trình đào tạo TT Chuyên ngành Công nghệ thông tin GIS Bậc Cơ quan đào tạo học Đại học Trường ĐH Kỹ Thuật Công Nghệ TPHCM Thạc só Trường ĐH Bách Khoa – ĐH Quốc gia Tp.HCM Năm (Bắt đầu - Kết thúc) 1997-2002 2005-2007 C- Quá trình công tác TT Lónh vực Tin học Tin Học Vị trí Giáo viên Giáo viên Cơ quan Trường THPT Bình Chánh Trường Trung cấp Kỹ thuật Nghiệp vụ Phú Lâm Thời gian 2002 - 2007 2007 – đến 137 ... cứu ứng dụng Gis việc chọn vùng đánh giá chất lượng học sinh, nhằm giúp tìm nguyên nhân để khắc phục nâng cao trình độ văn hóa chất lượng dạy học địa bàn Quận hiểu theo nghĩa tổng số học sinh. .. ✂ ☎ ☞   Đề tài: ? ?Ứng dụng GIS việc phân vùng đánh giá chất lượng giáo dục học sinh địa bàn Quận 6”, sử dụng đồ học chuyên đề kinh tế - xã hội phục vụ mục đích giáo dục , khoa học văn hóa…để thể... đình chất lượng học học sinh hộ gia đình 74 3.4.2 Tỷ lệ học sinh có học lực thấp (học lực trung bình) số lượng tụ điểm giải trí khơng phù hợp với lứa tuổi vùng 76 3.4.3 Số lượng học sinh bỏ học