VB6+Mo图层顺序的调整(MoveToTop、MoveTo)

object.MoveToTop 要移动图层的索引
移动图层顺序为第一层
object.MoveToBottom 要移动图层的索引
移动图层顺序为最后一层
object.MoveTo value1, value2
(value1是移动图层的索引,value2 是要移动的图层顺序)

示例:
代码:

'在窗体加载时时,给lstLayers列表添加选择集
Private Sub Form_Load()Dim lyr As MapObjects2.MapLayer'清空lstLayers选择集中的列表lstLayers.Clear'遍历当前地图中图层, 将图层名称添加至 lstLayers选择集合中For Each lyr In Map1.LayerslstLayers.AddItem lyr.NameNext lyr
End Sub
'置顶图层
Private Sub Command1_Click()'定义一个矢量图层Dim lyr As MapObjects2.MapLayerIf lstLayers.ListIndex <> -1 Then'移动当前选中图层至第一个Map1.Layers.MoveToTop lstLayers.ListIndexMap1.RefreshlstLayers.ClearFor Each lyr In Map1.LayerslstLayers.AddItem lyr.NameNext lyr'lstLayers列表默认选中第一个图层lstLayers.Selected(0) = TrueEnd If
End Sub'上移图层
Private Sub Command2_Click()Dim i As IntegerDim lyr As MapObjects2.MapLayerIf lstLayers.ListIndex <> -1 And lstLayers.ListIndex > 0 Theni = lstLayers.ListIndex - 1Map1.Layers.MoveTo lstLayers.ListIndex, iMap1.RefreshlstLayers.ClearFor Each lyr In Map1.LayerslstLayers.AddItem lyr.NameNext lyrlstLayers.Selected(i) = TrueEnd If
End Sub'下移图层
Private Sub Command3_Click()Dim i As IntegerDim lyr As MapObjects2.MapLayerIf lstLayers.ListIndex <> -1 And lstLayers.ListIndex < lstLayers.ListCount - 1 Theni = lstLayers.ListIndex + 1Map1.Layers.MoveTo lstLayers.ListIndex, iMap1.RefreshlstLayers.ClearFor Each lyr In Map1.LayerslstLayers.AddItem lyr.NameNext lyrlstLayers.Selected(i) = TrueEnd If
End Sub'置底图层
Private Sub Command4_Click()If lstLayers.ListIndex <> -1 ThenMap1.Layers.MoveTo lstLayers.ListIndex, Map1.Layers.Count - 1Map1.RefreshlstLayers.ClearFor Each lyr In Map1.LayerslstLayers.AddItem lyr.NameNext lyrlstLayers.Selected(Map1.Layers.Count - 1) = TrueEnd If
End Sub

VB6+Mo图层顺序的调整(MoveToTop、MoveTo、MoveToBottom )相关推荐

  1. Arcgis Javascript那些事儿(八)--图层获取与图层顺序

    这两天写一些系统基本图层的时候要涉及到同一个map切换layer的功能,这里主要涉及到了图层获取与图层顺序的问题,单独拿出来总结了下. 一.图层layer获取 1.通过id获取 首先从map中获取la ...

  2. OL3中结合Jquery UI实现图层拖动并改变图层顺序

    概述: 本文讲述OL3中结合Jquery UI实现图层的拖动以及拖动好图层顺序的改变. 效果: 代码: <html xmlns="http://www.w3.org/1999/xhtm ...

  3. ArcGIS API for JavaScript 图层顺序

    1.默认图层顺序 1.1.arcgis把图层按空间分成两类 graphicsLayers(矢量图层) . featureLayers(特征图层) ,暂时标记为一类. basemapLayers(底层图 ...

  4. PDF页码顺序如何调整

    有时候我们使用的文件是公司或者学校下发的,页码的设置会有失误的情况,这个时候我们就需要对页码进行重新调整,那么如何操作呢?操作方法是什么呢?今天小编就来跟各位分享一下,一起来看看如何调整页码顺序的吧! ...

  5. html图层透明度,ps图层透明度怎么调整?Photoshop中调整图层透明度的三种方法介绍...

    Photoshop里面怎么调整图层的透明度?作为一个"切图仔",切图的时候,看到总有透明的图层估计是最头痛的事,不知道其他人怎么样,个人却是最怕做透明的样式..扯远了,但确实因为要 ...

  6. mapbox 图层顺序显示

    mapbox 图层顺序显示 1. 第一种方式 创建图层的时候控制图层的层级 示例 将markerPoint放在图层之上 map.addLayer({'id': id,'type': 'line','s ...

  7. CAD图层的顺序的调整

    一.打开图层控制面版,在图层名称前面加编号1.2.3--或a.b.c--,再点上面的名称,即可排序. 二.在图层面版中选择图层,右击置为当前,再点上面的状态,会跳到最前头和最后头. 三.在软件绘图过程 ...

  8. win7电脑右键菜单选项的顺序怎么调整

    删除右键命令 右键菜单选项良莠不齐,一些没用的命令应毫不留情地删除.在上网时常会遇到IE首页或标题栏被更改的情况,对此大家已经见怪不怪了.可是最近又有一种新的源代码,在右键菜单把自己的网站名字加上,在 ...

  9. leaflet如何为geoJson图层设置zIndex图层顺序?

    这个问题也是纠结了半天,两个geojson的面图层作为Layer,因所画的内容重要程度不同,总有主次之分,比如标记型的图标,即使被盖住了,也无伤大雅,但是一些监控或者告警的数据,如果被盖住了,就比较致 ...

  10. 2d游戏地图渲染图层顺序(1)

    2d游戏里常见的45度角,建筑物之间相互覆盖渲染问题 但是难免会遇到覆盖不正确的情况 显然后面个建筑错误的覆盖了前面一个建筑. 在建筑物覆盖时不能简单粗暴的两个for循环去按从第一排到最后排,从左到右 ...

最新文章

  1. 刮刮乐html5效果擦除,利用HTML5的画布Canvas实现刮刮卡效果
  2. JBuilder中光标错位的解决办法
  3. 不要将时间浪费到编写完美代码上
  4. 新视角来了:《用户体验四维度》
  5. php下载文件压缩包已经损坏或未知格式,这个压缩文件格式未知或者数据已经被损坏解决方法...
  6. 连接mysql报错:Access denied for user ‘root’@‘localhost’(using password: YES)的解决方法
  7. pr剪辑打开多个项目_Pr入门之十一:基本图形面板
  8. BiNGO的GO分析
  9. “汽车人”眼中的网络安全-网络安全的5W1H
  10. feologit:固定效应有序Logit模型
  11. 使用OpenCV的OpenCL(ocl)模块
  12. webstorm2020背景和字体_怎么为WebStorm更换主题 修改字体样式
  13. 开学了,献给就读IT相关专业的本科新生们
  14. Laravel Excel(maatwebsite/excel )导入
  15. 量子力学在计算机上的应用论文,《浅谈量子力学的发展与利用》-毕业论文.docx...
  16. !-- --与%-- --%
  17. 判断一张图片是否是空白图
  18. 已开源!Flutter 基于分帧渲染的流畅度优化组件 Keframe
  19. 培训机构要不要去?适合谁去
  20. 【java】BMI:体重指数,又称身体质量指数,英文为Body Mass Index,简称BMI),是用体重公斤数除以身高米数平方得出的数字,是目前国际上常用的衡量人体胖瘦程度以及是否健康的一个标准。

热门文章

  1. matlab常用开头,在MATLAB编辑中,以“”开头的表示()。
  2. 11月最新脉聊社交网站源码类似微博的社交源码 模板UI非常漂亮自适应手机版 重点是有原生AP
  3. 工程制图计算机绘图实训总结感悟,工程制图心得体会.doc
  4. 电脑有必要安装杀毒软件吗?
  5. Hibernate基础知识整理(三)
  6. T检验、F检验、Z检验、卡方检验
  7. 如何将电脑图片缩小kb?图片怎么压缩大小?
  8. win7计算机打开显卡设置在哪里,显卡设置在哪里打开【如何设置】
  9. android 6 root权限,「经验」android手机怎么开启Root权限
  10. 分享大学生关于创新创业的想法,包括外卖私人订制化,网购衣服3D化远程试衣,睡眠耳机开发等等创新创业想法。