Ví dụ lấy về lớp dữ liệu trên bản đồ và xóa lớp dữ liệu khỏi bản đồ
myView = av.GetProject..FindDoc(“bản đồ”)
theTheme = myView.FindTheme(“hchanh.shp”)
xacnhan = Msgbox.YesNo(“ bạn thực sự muốn xoá Theme ” + theTheme + “?”, “Xoá theme”, true)
if (xacnhan=true) then
myView.DeleteTheme(theTheme)
end
Tài liệu tham khảo: Giáo trình lập trình GIS - Lê Đức Trị
|