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

📄 form2.frm

📁 PLC5层电梯的外部监控程序,基于VB开发,工程1工程2运行时需加入winsock部件即可正常运行
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "mswinsck.ocx"
Begin VB.Form Form1 
   BackColor       =   &H00008000&
   Caption         =   "Form1"
   ClientHeight    =   8685
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   7425
   LinkTopic       =   "Form1"
   ScaleHeight     =   8685
   ScaleWidth      =   7425
   StartUpPosition =   3  '窗口缺省
   Begin VB.Frame Frame2 
      BackColor       =   &H80000013&
      Caption         =   "LAMP1"
      Height          =   2895
      Left            =   120
      TabIndex        =   80
      Top             =   5640
      Width           =   7095
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   31
         Left            =   6360
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   30
         Left            =   6480
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   29
         Left            =   6000
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   28
         Left            =   6120
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   27
         Left            =   5640
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   26
         Left            =   5760
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   25
         Left            =   5280
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   24
         Left            =   5400
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   23
         Left            =   4680
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   22
         Left            =   4800
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   21
         Left            =   4320
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   20
         Left            =   4440
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   19
         Left            =   3960
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   18
         Left            =   4080
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   17
         Left            =   3600
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   16
         Left            =   3720
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   15
         Left            =   3000
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   14
         Left            =   3120
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   13
         Left            =   2640
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   12
         Left            =   2760
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   11
         Left            =   2280
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   10
         Left            =   2400
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   9
         Left            =   1920
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   8
         Left            =   2040
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   7
         Left            =   1200
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   6
         Left            =   1440
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   5
         Left            =   840
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   4
         Left            =   1080
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   3
         Left            =   480
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   2
         Left            =   720
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   1
         Left            =   120
         Shape           =   3  'Circle
         Top             =   1920
         Width           =   375
      End
      Begin VB.Shape Shape2 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   255
         Index           =   0
         Left            =   360
         Shape           =   3  'Circle
         Top             =   1560
         Width           =   375
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   375
         Index           =   31
         Left            =   6480
         Shape           =   3  'Circle
         Top             =   600
         Width           =   255
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   375
         Index           =   30
         Left            =   6600
         Shape           =   3  'Circle
         Top             =   240
         Width           =   255
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   375
         Index           =   29
         Left            =   6120
         Shape           =   3  'Circle
         Top             =   600
         Width           =   255
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   375
         Index           =   28
         Left            =   6240
         Shape           =   3  'Circle
         Top             =   240
         Width           =   255
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&
         BorderColor     =   &H00FFFFFF&
         Height          =   375
         Index           =   27
         Left            =   5760
         Shape           =   3  'Circle
         Top             =   600
         Width           =   255
      End
      Begin VB.Shape Shape1 
         BackColor       =   &H0080C0FF&

⌨️ 快捷键说明

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