ds2770k.frm

来自「利用VB开发的针对Maxim-Dallas DS2770电量检测芯片」· FRM 代码 · 共 1,631 行 · 第 1/5 页

FRM
1,631
字号
            Index           =   5
            Left            =   2640
            TabIndex        =   29
            TabStop         =   0   'False
            Top             =   1560
            Width           =   735
            _ExtentX        =   1296
            _ExtentY        =   450
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            FontName        =   "MS Sans Serif"
            FontSize        =   8.25
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
         End
         Begin HexBox.HexEditBox hxByte 
            Height          =   255
            Index           =   6
            Left            =   2640
            TabIndex        =   30
            TabStop         =   0   'False
            Top             =   1800
            Width           =   735
            _ExtentX        =   1296
            _ExtentY        =   450
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            FontName        =   "MS Sans Serif"
            FontSize        =   8.25
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
         End
         Begin HexBox.HexEditBox hxByte 
            Height          =   255
            Index           =   7
            Left            =   2640
            TabIndex        =   31
            TabStop         =   0   'False
            Top             =   2040
            Width           =   735
            _ExtentX        =   1296
            _ExtentY        =   450
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            FontName        =   "MS Sans Serif"
            FontSize        =   8.25
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
         End
         Begin VB.Label lblStatus1 
            BackStyle       =   0  'Transparent
            Caption         =   "Status Register"
            Height          =   255
            Left            =   120
            TabIndex        =   225
            ToolTipText     =   "Click to Edit"
            Top             =   600
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblCurrentOffset1 
            BackStyle       =   0  'Transparent
            Caption         =   "Current Offset Register"
            Height          =   255
            Left            =   120
            TabIndex        =   224
            ToolTipText     =   "Click to Edit"
            Top             =   840
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblChargeTimeInitial 
            BackStyle       =   0  'Transparent
            Caption         =   "Charge Time Register"
            Height          =   255
            Left            =   120
            TabIndex        =   209
            ToolTipText     =   "Click to Edit"
            Top             =   1320
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblCurrentOffset 
            BackStyle       =   0  'Transparent
            Caption         =   "Current Offset Register"
            Height          =   255
            Left            =   120
            TabIndex        =   208
            ToolTipText     =   "Click to Edit"
            Top             =   1080
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblElapsedTimeLSB 
            BackStyle       =   0  'Transparent
            Caption         =   "Elapsed Time LSB"
            Height          =   255
            Left            =   120
            TabIndex        =   207
            ToolTipText     =   "Click to Edit"
            Top             =   840
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblElapsedTimeMSB 
            BackStyle       =   0  'Transparent
            Caption         =   "Elapsed Time MSB"
            Height          =   255
            Left            =   120
            TabIndex        =   206
            ToolTipText     =   "Click to Edit"
            Top             =   600
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblEEPROM 
            BackStyle       =   0  'Transparent
            Caption         =   "EEPROM Register"
            Height          =   255
            Left            =   120
            TabIndex        =   205
            ToolTipText     =   "Click to Edit"
            Top             =   1560
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblStatus 
            BackStyle       =   0  'Transparent
            Caption         =   "Status Register"
            Height          =   255
            Left            =   120
            TabIndex        =   204
            ToolTipText     =   "Click to Edit"
            Top             =   360
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblChargeTimeRegister 
            BackStyle       =   0  'Transparent
            Caption         =   "Charge Time Register"
            Height          =   255
            Left            =   120
            TabIndex        =   203
            ToolTipText     =   "Click to Edit"
            Top             =   1320
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "Address"
            BeginProperty Font 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   -1  'True
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   255
            Index           =   16
            Left            =   1560
            TabIndex        =   87
            Top             =   120
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "7"
            Height          =   255
            Index           =   7
            Left            =   1560
            TabIndex        =   86
            Top             =   2040
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "6"
            Height          =   255
            Index           =   6
            Left            =   1560
            TabIndex        =   85
            Top             =   1800
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "5"
            Height          =   255
            Index           =   5
            Left            =   1560
            TabIndex        =   84
            Top             =   1560
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "4"
            Height          =   255
            Index           =   4
            Left            =   1560
            TabIndex        =   83
            Top             =   1320
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "3"
            Height          =   255
            Index           =   3
            Left            =   1560
            TabIndex        =   82
            Top             =   1080
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "2"
            Height          =   255
            Index           =   2
            Left            =   1560
            TabIndex        =   81
            Top             =   840
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "1"
            Height          =   255
            Index           =   1
            Left            =   1560
            TabIndex        =   80
            Top             =   600
            Width           =   1335
         End
         Begin VB.Label lblAddress 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "0"
            Height          =   255
            Index           =   0
            Left            =   1560
            TabIndex        =   79
            Top             =   360
            Width           =   1335
         End
         Begin VB.Label lblRegister 
            BackStyle       =   0  'Transparent
            Caption         =   "Temperature MSB"
            Height          =   255
            Index           =   6
            Left            =   3720
            TabIndex        =   68
            ToolTipText     =   "Double Click to Edit"
            Top             =   1800
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblRegister 
            BackStyle       =   0  'Transparent
            Caption         =   "Temperature LSB"
            Height          =   255
            Index           =   7
            Left            =   3720
            TabIndex        =   67
            ToolTipText     =   "Double Click to Edit"
            Top             =   2040
            Visible         =   0   'False
            Width           =   1995
         End
         Begin VB.Label lblRegister 
            BackStyle       =   0  'Transparent
            Caption         =   "Acc. Current LSB"
            Height          =   255
            Index           =   5

⌨️ 快捷键说明

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