VB通过串口接收到并显示GPS模块的NMEA协议信息

vb通过串口接收并显示gps模块信息NAEA协议，源码，原创啊， Label3(4).Caption = "卫星时间：" + Left(Gga(1), 2) + ":" + Mid(Gga(1), 3, 2) + ":" + Mid(Gga(1), 5) Label2(2).Caption = "纬 度：" + Gga(3) + " " + Left(Gga(2), 2) + "." + Mid(Gga(2), 3) Label2(3).Caption = "经 度：" + Gga(5) + " " + Left(Gga(4), 3) + "." + Mid(Gga(4), 4) Label2(4).Caption = "GPS 状态：" + GGA_zt Label2(5).Caption = "正在使用的卫星数量：" + Gga(7) Label4(3).Caption = "水平精度因子：" + Gga(8) Label2(7).Caption = "海拔高度：" + Gga(9) Label2(8).Caption = "椭球-大地高：" + Gga(11) Label2(9).Caption = "差分时间：" + Gga(13) Label2(10).Caption = "差分站ID：" + Left(Gga(14), 4) Label2(11).Caption = "校 检 值：" + Mid(Gga(14), 6)