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

📄 frm_write.frm

📁 电能表抄表软件,基本符合国家颁布的DL645通讯规约,去除了一些不必要的功能
💻 FRM
📖 第 1 页 / 共 5 页
字号:
         Height          =   225
         Left            =   285
         TabIndex        =   142
         Top             =   270
         Width           =   990
      End
   End
   Begin VB.CheckBox Check2 
      Caption         =   "电表底度设置"
      ForeColor       =   &H000000C0&
      Height          =   255
      Index           =   5
      Left            =   5190
      TabIndex        =   139
      Top             =   2775
      Width           =   1635
   End
   Begin VB.Timer Timer5 
      Enabled         =   0   'False
      Interval        =   100
      Left            =   180
      Top             =   7470
   End
   Begin VB.CommandButton Command2 
      BackColor       =   &H00E0E0E0&
      Caption         =   "调入参数"
      Height          =   630
      Left            =   7935
      Style           =   1  'Graphical
      TabIndex        =   138
      Top             =   360
      Width           =   640
   End
   Begin VB.CommandButton Command1 
      BackColor       =   &H00E0E0E0&
      Caption         =   "保存参数"
      Height          =   630
      Left            =   8650
      Style           =   1  'Graphical
      TabIndex        =   137
      Top             =   360
      Width           =   640
   End
   Begin VB.CommandButton Com_cancel 
      BackColor       =   &H00E0E0E0&
      Caption         =   "停止"
      Height          =   800
      Left            =   10905
      MaskColor       =   &H00E0E0E0&
      Picture         =   "frm_write.frx":0680
      Style           =   1  'Graphical
      TabIndex        =   136
      Top             =   195
      Visible         =   0   'False
      Width           =   750
   End
   Begin MSComCtl2.UpDown UpDown1 
      Height          =   315
      Left            =   1320
      TabIndex        =   43
      Top             =   6315
      Width           =   270
      _ExtentX        =   476
      _ExtentY        =   556
      _Version        =   393216
      Value           =   1
      BuddyControl    =   "Text16"
      BuddyDispid     =   196653
      OrigLeft        =   5052
      OrigTop         =   2964
      OrigRight       =   5328
      OrigBottom      =   3336
      Max             =   30
      Min             =   1
      SyncBuddy       =   -1  'True
      BuddyProperty   =   0
      Enabled         =   0   'False
   End
   Begin VB.Timer Timer4 
      Enabled         =   0   'False
      Interval        =   1200
      Left            =   5640
      Top             =   7365
   End
   Begin VB.Timer Timer3 
      Enabled         =   0   'False
      Interval        =   12
      Left            =   6390
      Top             =   7365
   End
   Begin VB.Timer Timer2 
      Interval        =   1000
      Left            =   7320
      Top             =   7455
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   1
      ItemData        =   "frm_write.frx":0AC2
      Left            =   9900
      List            =   "frm_write.frx":0AD2
      Style           =   2  'Dropdown List
      TabIndex        =   121
      Top             =   2499
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   2
      ItemData        =   "frm_write.frx":0AE6
      Left            =   9900
      List            =   "frm_write.frx":0AF6
      Style           =   2  'Dropdown List
      TabIndex        =   120
      Top             =   2838
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   3
      ItemData        =   "frm_write.frx":0B0A
      Left            =   9900
      List            =   "frm_write.frx":0B1A
      Style           =   2  'Dropdown List
      TabIndex        =   119
      Top             =   3177
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   4
      ItemData        =   "frm_write.frx":0B2E
      Left            =   9900
      List            =   "frm_write.frx":0B3E
      Style           =   2  'Dropdown List
      TabIndex        =   118
      Top             =   3516
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   5
      ItemData        =   "frm_write.frx":0B52
      Left            =   9900
      List            =   "frm_write.frx":0B62
      Style           =   2  'Dropdown List
      TabIndex        =   117
      Top             =   3855
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   6
      ItemData        =   "frm_write.frx":0B76
      Left            =   9900
      List            =   "frm_write.frx":0B86
      Style           =   2  'Dropdown List
      TabIndex        =   116
      Top             =   4194
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   7
      ItemData        =   "frm_write.frx":0B9A
      Left            =   9900
      List            =   "frm_write.frx":0BAA
      Style           =   2  'Dropdown List
      TabIndex        =   115
      Top             =   4533
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   8
      ItemData        =   "frm_write.frx":0BBE
      Left            =   9900
      List            =   "frm_write.frx":0BCE
      Style           =   2  'Dropdown List
      TabIndex        =   114
      Top             =   4872
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   9
      ItemData        =   "frm_write.frx":0BE2
      Left            =   9900
      List            =   "frm_write.frx":0BF2
      Style           =   2  'Dropdown List
      TabIndex        =   113
      Top             =   5211
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   10
      ItemData        =   "frm_write.frx":0C06
      Left            =   9900
      List            =   "frm_write.frx":0C16
      Style           =   2  'Dropdown List
      TabIndex        =   112
      Top             =   5550
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   11
      ItemData        =   "frm_write.frx":0C2A
      Left            =   9900
      List            =   "frm_write.frx":0C3A
      Style           =   2  'Dropdown List
      TabIndex        =   111
      Top             =   5895
      Width           =   564
   End
   Begin VB.ComboBox Combo7 
      Enabled         =   0   'False
      Height          =   300
      Index           =   0
      ItemData        =   "frm_write.frx":0C4E
      Left            =   9900
      List            =   "frm_write.frx":0C5E
      Style           =   2  'Dropdown List
      TabIndex        =   110
      Top             =   2160
      Width           =   564
   End
   Begin VB.Frame Frame10 
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   996
      Left            =   3975
      TabIndex        =   96
      Top             =   5775
      Width           =   3825
      Begin VB.TextBox Text13 
         Alignment       =   1  'Right Justify
         Enabled         =   0   'False
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9.75
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   300
         Left            =   1485
         Locked          =   -1  'True
         MaxLength       =   18
         TabIndex        =   125
         Top             =   576
         Width           =   2175
      End
      Begin VB.TextBox Text12 
         Alignment       =   1  'Right Justify
         Enabled         =   0   'False
         Height          =   300
         Left            =   2268
         Locked          =   -1  'True
         MaxLength       =   8
         TabIndex        =   124
         Top             =   204
         Width           =   1395
      End
      Begin VB.CheckBox Check2 
         Caption         =   "日期设置"
         ForeColor       =   &H000000C0&
         Height          =   204
         Index           =   1
         Left            =   225
         TabIndex        =   98
         Top             =   600
         Width           =   1632
      End
      Begin VB.CheckBox Check2 
         Caption         =   "时间设置"
         ForeColor       =   &H000000C0&
         Height          =   204
         Index           =   0
         Left            =   225
         TabIndex        =   97
         Top             =   228
         Width           =   1272
      End
   End
   Begin VB.Frame Frame8 
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   615
      Left            =   3975
      TabIndex        =   93
      Top             =   4470
      Width           =   3825
      Begin VB.CheckBox Check2 
         Caption         =   "局编号设置"
         ForeColor       =   &H000000C0&
         Height          =   204
         Index           =   2
         Left            =   195
         TabIndex        =   95
         Top             =   255
         Width           =   1332
      End
      Begin VB.TextBox Text10 
         Alignment       =   1  'Right Justify
         Enabled         =   0   'False
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9.75
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   300
         Left            =   1845
         MaxLength       =   12
         TabIndex        =   94
         Text            =   "000000000000"
         Top             =   192
         Width           =   1800
      End
   End
   Begin VB.Frame Frame7 
      Caption         =   " 密码更改"
      ForeColor       =   &H00000000&
      Height          =   1095
      Left            =   5580
      TabIndex        =   88
      Top             =   1560
      Width           =   2190
      Begin VB.CheckBox Check2 
         Caption         =   "编程密码"
         ForeColor       =   &H000000C0&
         Height          =   240
         Index           =   9
         Left            =   132
         TabIndex        =   92
         Top             =   300
         Width           =   1104
      End
      Begin VB.CheckBox Check2 
         Caption         =   "清零密码"
         ForeColor       =   &H000000C0&
         Height          =   240
         Index           =   8
         Left            =   132
         TabIndex        =   91
         Top             =   675
         Width           =   1155
      End
      Begin VB.TextBox Text9 
         Alignment       =   1  'Right Justify
         Enabled         =   0   'False
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   300
         IMEMode         =   3  'DISABLE
         Left            =   1305
         MaxLength       =   6
         PasswordChar    =   "#"
         TabIndex        =   90
         Top             =   630
         Width           =   720
      End
      Begin VB.TextBox Text8 
         Alignment       =   1  'Right Justify
         Enabled         =   0   'False
         BeginProperty Font 

⌨️ 快捷键说明

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