frmpg2.frm

来自「这是一个实际的工程中所用的源程序」· FRM 代码 · 共 2,076 行 · 第 1/5 页

FRM
2,076 行
字号
12345
      Index           =   28
      Left            =   2010
      TabIndex        =   28
      Top             =   3690
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   27
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   3420
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   27
      Left            =   2010
      TabIndex        =   27
      Top             =   3420
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   26
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   3165
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   26
      Left            =   2010
      TabIndex        =   26
      Top             =   3165
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   25
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   2895
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   25
      Left            =   2010
      TabIndex        =   25
      Top             =   2895
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   24
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   2640
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   24
      Left            =   2010
      TabIndex        =   24
      Top             =   2640
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   23
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   2370
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   23
      Left            =   2010
      TabIndex        =   23
      Top             =   2370
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   22
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   2115
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   22
      Left            =   2010
      TabIndex        =   22
      Top             =   2115
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   21
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   1845
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   21
      Left            =   2010
      TabIndex        =   21
      Top             =   1845
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   20
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   1590
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   20
      Left            =   2010
      TabIndex        =   20
      Top             =   1590
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   19
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   1320
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   19
      Left            =   2010
      TabIndex        =   19
      Top             =   1320
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   18
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   1065
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   18
      Left            =   2010
      TabIndex        =   18
      Top             =   1065
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   17
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   795
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   17
      Left            =   2010
      TabIndex        =   17
      Top             =   795
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   16
      Left            =   1710
      Shape           =   3  'Circle
      Top             =   540
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   16
      Left            =   2010
      TabIndex        =   16
      Top             =   540
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   15
      Left            =   120
      Shape           =   3  'Circle
      Top             =   4470
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   15
      Left            =   420
      TabIndex        =   15
      Top             =   4470
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   14
      Left            =   120
      Shape           =   3  'Circle
      Top             =   4215
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   14
      Left            =   420
      TabIndex        =   14
      Top             =   4215
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   13
      Left            =   120
      Shape           =   3  'Circle
      Top             =   3945
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   13
      Left            =   420
      TabIndex        =   13
      Top             =   3945
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   12
      Left            =   120
      Shape           =   3  'Circle
      Top             =   3690
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   12
      Left            =   420
      TabIndex        =   12
      Top             =   3690
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   11
      Left            =   120
      Shape           =   3  'Circle
      Top             =   3420
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
      Caption         =   "5#斗轮机堆料"
      ForeColor       =   &H80000005&
      Height          =   195
      Index           =   11
      Left            =   420
      TabIndex        =   11
      Top             =   3420
      Width           =   1095
   End
   Begin VB.Shape shpSB 
      BackColor       =   &H0000FFFF&
      BackStyle       =   1  'Opaque
      FillColor       =   &H80000004&
      FillStyle       =   0  'Solid
      Height          =   225
      Index           =   10
      Left            =   120
      Shape           =   3  'Circle
      Top             =   3165
      Width           =   285
   End
   Begin VB.Label lbSB 
      BackColor       =   &H80000001&
12345

frmpg2.frm - 源码说明

本页面展示了「这是一个实际的工程中所用的源程序」中的 frmpg2.frm 源码文件，采用 FRM 编程语言编写，共 2,076 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与串口通信相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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