关于vb.netgps的信息

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=";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:经纬度可以到百度地图官网去获取

或者到:  去生成代码

相关问答

Q1: VB中如何实时读取GPS信息

书上估计是用的定时器接收，窗体上拖MSComm1，Timer1，Text1控件各一个，并在属性设置好MSComm1的波特率，串口号，起始位，停止位等信息

Dim str_dispaly As String '定义回显字符

Private Sub Form_Load()

Me.MSComm1.PortOpen = True

Me.Timer1.Interval = 100 '定时器时间间隔

Me.Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()

If MSComm1.InBufferCount 0 Then

str_dispaly = str_dispaly MSComm1.Input

Me.Text1.Text = str_display

End If

End Sub

Q2: vb.net 中怎样用代码设置控件location

控件.location=New Point(X,Y)

X,Y为整数，即控件坐标，原点在窗体左上角

Q3: vb.net wince6.0应用编程 如何查询指定程序名称是否运行（如showgps

先一个个的回答你的问题吧！

第一个问题：

VB.NET不是单单开发web应用程序那么简单，还可以开发windows应用程序，PDA程序，WEB服务等。VB.NET的功能很强大，FOXMAIL是用DELHPI写的，但是用VB.NET也能写。

第二个问题

这个问题和第一个问题有点重复，可以。VB已经过时了，我们没有理由不从VB上过渡到VB.NET上。

第三个问题

呵呵，又重复了。可以编译城.exe文件。.NET程序对运行环境是没有特别的要求的，只要安装了.net framework，它就能在上面运行（不管是windows系统，还是Liunx系统，甚至是PDA）。

微软的.NET和Sun公司的JAVA基本上类似，都是需要平台的，Java需要虚拟机，.NET程序需要.net framework。

支持拖拽布局。

补充点，楼主是不是初学者啊？给你介绍一本书吧，《VB.NET 2005 入门经典》。这本书很好的，建议一章一章的看，在前面的没有你没有完全理解的时候千万别去翻看后面的东西。如果你用功的话，相信不出半年你就学的差不多了！

求采纳为满意回答。

Q4: vb.net json 数据处理问题

你只获取接口的每个 obj_name 和speed 值的话，你完全没必要当json来处里，你可以直接截取字符串就可以了。用substring函数

Q5: vb.net中提取一部分我要的字符串?

假设gps信息在字符串变量s中

        Dim a() As String = s.Substring(s.IndexOf("$GPRMC")).Split(",")

        MsgBox(a(1)  " "  a(3)  " "  a(5))