mapx+vb实战摘要（五）

ppp80

于 2005-01-24 11:03:00 发布

阅读量1.6k

点赞数

分类专栏： GIS(MapX) 文章标签： vb .net

本文链接：https://blog.youkuaiyun.com/ppp80/article/details/265647

版权

GIS(MapX) 专栏收录该内容

6 篇文章

订阅专栏

博主在天津完成一个项目第一阶段后进行总结。原本做.NET，项目中需用VB。博主自学一个月supermap后参与项目。文中分享了在项目中如何修改柱状专题图、饼状专题图样式，以及标注样式的方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

ppp80上个月去天津(2004)做这个项目，加班加点忙乎过了十一，现在项目终

于完成了第一阶段，可以闲下来总结一下了。
在做这个项目之前我只是自学了一个月的supermap，不过感觉gis这些东

西都是大同小异，没什莫可怕；关键比较郁闷的是本来根本就是做.net，现

在却要用vb实在太。。。算了，赶鸭子上架，不会也得会呀！

其实本人对这个实在只能称得上一知半解，学的和用的一样多，不过还

是给自己和别人留下点东西吧，也许会有帮助呢：）(共五篇)

1如何修改柱状专题图的样式？
Map1.DataSets.Item(DsName).Themes("trafficflubar").Properties.Size = BarSize
Map1.DataSets.Item(DsName).Themes("trafficflubar").Properties.BarWidth = BarWidth

Map1.DataSets.Item(DsName).Themes("trafficflubar").ThemeProperties.MultivarCategories.Item(1).style.RegionColor = SmallTruck_Color

2如何修改饼状专题图的样式？
Map1.DataSets.Item(DsName).Themes("trafficflupiebar").Properties.Size = PieBarSize
'Map1.DataSets.Item(DsName).Themes("trafficflupiebar").Properties.Width = PieBarWidth

Map1.DataSets.Item(DsName).Themes("trafficflupiebar").ThemeProperties.MultivarCategories.Item(1).style.RegionColor = SmallTruck_Color

3如何修改标注的样式？
Set oStyle = New MapXLib.style
        oStyle.TextFont.Size = 12
        oStyle.TextFont.Bold = True
        oStyle.SymbolFontColor = vbWhite
        oStyle.TextFontBackColor = vbBlue
        oStyle.TextFontOpaque = True

        Map1.Annotations.AddText(rs(showfield), lyr.Selection(1).CenterX, lyr.Selection(1).CenterY, 3).Graphic.style = oStyle
        （白字黑底）