vb中怎么添加控件?

vb中怎么添加控件?,第1张

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也可以实现类似的功能,但是需要网络环境支持。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11526615.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-16
下一篇 2023-05-16

发表评论

登录后才能评论

评论列表(0条)

保存