1、首先打开VB6.0,选择“标准EXE”。
2、然后按下键盘上的“Ctrl+T”来选择部件。
3、在其中找到“Microsoft Multimedia Control 6.0”选项。
4、点击左侧的小框框来选中。
5、点击对话框下部的确定按钮来完成添加。
6、此时,工具箱内就会出现小部件。
7、点击小部件,然后在窗体中画出小部件。
8、画完后,展现效果图。
9、关于MMcontrol的设置可以在右侧进行。
10、就这样,MMcontrol添加成功,可以为它书写代码了。
新建一个文件,写入下面的代码:
<!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" />
<title>Baidu Map V1.2</title>
<script type="text/javascript" src="http://api.map.baidu.com/api?v=1.2&services=true">
<!-- 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")这样就可以了
ps:经纬度可以到百度地图官网去获取
或者到:http://api.map.baidu.com/lbsapi/creatmap/ 去生成代码
这个需要用到地理信息系统的地图控件,mo,ao,ae,mapgis等地理信息系统二次开发环境都有这样的控件,安装了这些环境 和必要的授权后度可以使用,或者你调用谷歌的api也可以实现类似的功能,但是需要网络环境支持。欢迎分享,转载请注明来源:内存溢出
评论列表(0条)