⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmdocument.frm

📁 GPS实时定位的程序实现,GPS实时定位的程序实现 希望对大家有帮助
💻 FRM
📖 第 1 页 / 共 5 页
字号:
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   240
      Left            =   2295
      TabIndex        =   48
      Top             =   4605
      Width           =   1230
   End
   Begin VB.Shape lblDegree 
      BorderColor     =   &H0000FFFF&
      Height          =   75
      Index           =   2
      Left            =   1935
      Shape           =   3  'Circle
      Top             =   4830
      Width           =   60
   End
   Begin VB.Shape lblDegree 
      BorderColor     =   &H0000FFFF&
      Height          =   75
      Index           =   1
      Left            =   2685
      Shape           =   3  'Circle
      Top             =   4830
      Width           =   60
   End
   Begin VB.Shape lblDegree 
      BorderColor     =   &H0000FFFF&
      Height          =   75
      Index           =   0
      Left            =   3390
      Shape           =   3  'Circle
      Top             =   4830
      Width           =   60
   End
   Begin VB.Label lbl90 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "90"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   195
      Left            =   1695
      TabIndex        =   47
      Top             =   4890
      Width           =   210
   End
   Begin VB.Label lblZero 
      AutoSize        =   -1  'True
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "0"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   195
      Left            =   3255
      TabIndex        =   46
      Top             =   4875
      Width           =   105
   End
   Begin VB.Label lbl45 
      AutoSize        =   -1  'True
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "45"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   195
      Left            =   2460
      TabIndex        =   45
      Top             =   4875
      Width           =   210
   End
   Begin VB.Label Label5 
      Alignment       =   2  'Center
      BackColor       =   &H00000000&
      Caption         =   "GPS Data"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   13.5
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   315
      Left            =   12375
      TabIndex        =   44
      Top             =   750
      Width           =   1710
   End
   Begin VB.Shape Shape6 
      BorderColor     =   &H00FFFFFF&
      BorderWidth     =   2
      Height          =   4215
      Left            =   11940
      Shape           =   4  'Rounded Rectangle
      Top             =   885
      Width           =   2460
   End
   Begin VB.Label lblPDOP 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "PDOP:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H008080FF&
      Height          =   255
      Left            =   12030
      TabIndex        =   43
      Top             =   3480
      Width           =   1380
   End
   Begin VB.Label lblDate 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Date:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFC0FF&
      Height          =   450
      Left            =   12030
      TabIndex        =   42
      Top             =   4635
      Width           =   2445
   End
   Begin VB.Label lblUTC 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Time:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFC0FF&
      Height          =   270
      Left            =   12030
      TabIndex        =   41
      Top             =   4380
      Width           =   2370
   End
   Begin VB.Label lblSpeed 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Speed:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00E1AF73&
      Height          =   270
      Left            =   12090
      TabIndex        =   40
      Top             =   1860
      Width           =   2175
   End
   Begin VB.Label lblMagVar 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Magnetic Deviation:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   480
      Left            =   12090
      TabIndex        =   39
      Top             =   2580
      Width           =   2250
   End
   Begin VB.Label lblSatsInUse 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Sats In Use:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080FF80&
      Height          =   285
      Left            =   12030
      TabIndex        =   38
      Top             =   4110
      Width           =   2040
   End
   Begin VB.Label lblAltitude 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Altitude:"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00E1AF73&
      Height          =   255
      Left            =   12090
      TabIndex        =   37
      Top             =   1590
      Width           =   2175
   End
   Begin ComctlLib.ImageList ImageList1 
      Left            =   6720
      Top             =   7095
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      ImageWidth      =   16
      ImageHeight     =   16
      MaskColor       =   12632256
      UseMaskColor    =   0   'False
      _Version        =   327682
      BeginProperty Images {0713E8C2-850A-101B-AFC0-4210102A8DA7} 
         NumListImages   =   9
         BeginProperty ListImage1 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":9C2C
            Key             =   ""
         EndProperty
         BeginProperty ListImage2 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":A16E
            Key             =   ""
         EndProperty
         BeginProperty ListImage3 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":A4C0
            Key             =   ""
         EndProperty
         BeginProperty ListImage4 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":A812
            Key             =   ""
         EndProperty
         BeginProperty ListImage5 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":AB64
            Key             =   ""
         EndProperty
         BeginProperty ListImage6 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":AC76
            Key             =   ""
         EndProperty
         BeginProperty ListImage7 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":AD88
            Key             =   ""
         EndProperty
         BeginProperty ListImage8 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":AE82
            Key             =   ""
         EndProperty
         BeginProperty ListImage9 {0713E8C3-850A-101B-AFC0-4210102A8DA7} 
            Picture         =   "frmDocument.frx":AF94
            Key             =   ""
         EndProperty
      EndProperty
   End
   Begin VB.Label lblVDOP 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "VDOP: 00.0"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H008080FF&
      Height          =   330
      Left            =   12030
      TabIndex        =   35
      Top             =   3015
      Width           =   1950
   End
   Begin VB.Label lblHDOP 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "HDOP: 00.0"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H008080FF&
      Height          =   255
      Left            =   12030
      TabIndex        =   34
      Top             =   3255
      Width           =   1875
   End
   Begin VB.Label lblFix 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Fix Status: NA"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080FF80&
      Height          =   270
      Left            =   12030
      TabIndex        =   33
      Top             =   3735
      Width           =   2325
   End
   Begin VB.Label lblGeoidal 
      BackColor       =   &H00000000&
      BackStyle       =   0  'Transparent
      Caption         =   "Geoidal Separation: -000.0 M"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   10.5
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -