vb.net地图统计图 地图统计图生成

用vb.net做出气象图首先要有矢量化的地图,剩下的就是计算机图形学中的填充问题了 。还有一种笨方法,但很可行,将大地图拆分成多个小地图,并分别填充不同的颜色,需要哪个区域哪个颜色直接调用就行了 。
vb.net 如何嵌入地图新建一个文件,写入下面vb.net地图统计图的代码:
!doctype html
html
head
meta name="viewport" content="initial-scale=1.0, user-scalable=no" /
meta http-equiv="Content-Type" content="text/html; charset=gbk" /
titleBaidu Map V1.2/title
script type="text/javascript" src="/images/defaultpic.gif"
!-- add baidu map api --
/script
/head
body
div id="container" style="width: 600px; height: 400px;"
/div
/body
/html
script type="text/javascript"
var map = new BMap.Map("container");// new Map
var point = new BMap.Point(116.397128, 39.916527);// Location, (经度, 纬度)
map.centerAndZoom(point, 15);// show Map
// 添加缩放功能
map.enableScrollWheelZoom();
map.enableKeyboard();
/script
保存到程序exe同一目录下,文件名:map.html
然后BUTTON点击事件:
WebBrowser1.Navigate(Application.StartupPath"\map.html")
这样就可以vb.net地图统计图了
ps:经纬度可以到百度地图去获取
或者到:去生成代码
vb.net2005怎么做曲线统计图啊 。画饼图的例子,
Me.LoadDriveInfo(DrivesOnPc.Items(DrivesOnPc.SelectedIndex)) 计算比例大小
Me.Invalidate()触发窗体绘图
'窗体画图(饼图)
Private Sub form3_paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
'设定RECTANGLE结构变量,确定画图的范围及大小
Dim rect As Rectangle = New Rectangle(280, 20, 200, 200)
Dim rect2 As Rectangle = New Rectangle(270, 10, 400, 320)
Dim freelegend As Rectangle = New Rectangle(280, 300, 20, 20)
Dim usedlegend As Rectangle = New Rectangle(280, 275, 20, 20)
e.Graphics.DrawRectangle(Pens.Black, rect2)
e.Graphics.DrawLine(Pens.Black, 270, 260, 670, 260)
If Me.isSpaceInfoVailable = True Then
'填充椭圆图像(角度)
e.Graphics.FillPie(Brushes.Magenta, rect, 0, Sweep)
e.Graphics.FillPie(Brushes.Blue, rect, Sweep, 360 - Sweep)
'填充方形
e.Graphics.FillRectangle(Brushes.Magenta, freelegend)
e.Graphics.FillRectangle(Brushes.Blue, usedlegend)
e.Graphics.DrawString(
急?。。B.NET按月份数据画统计图用crystal报表,文件——新建文件——crystal报表,然后根据向导建立
【vb.net地图统计图 地图统计图生成】关于vb.net地图统计图和地图统计图生成的介绍到此就结束了 , 不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

    推荐阅读