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

📄 frmcenter.frm

📁 用vb6.0实现的一个可以通用的企业档案管理系统。
💻 FRM
📖 第 1 页 / 共 4 页
字号:
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   6960
            TabIndex        =   17
            Top             =   690
            Width           =   1215
         End
         Begin MSComctlLib.ListView lvwCase 
            Height          =   1725
            Left            =   1500
            TabIndex        =   34
            Top             =   630
            Width           =   5325
            _ExtentX        =   9393
            _ExtentY        =   3043
            LabelEdit       =   1
            LabelWrap       =   -1  'True
            HideSelection   =   -1  'True
            _Version        =   393217
            Icons           =   "ImlBig"
            SmallIcons      =   "ImlSmall"
            ForeColor       =   -2147483640
            BackColor       =   -2147483643
            BorderStyle     =   1
            Appearance      =   1
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            NumItems        =   3
            BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               Text            =   "预设名称"
               Object.Width           =   2540
            EndProperty
            BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               SubItemIndex    =   1
               Text            =   "联系的文书数量"
               Object.Width           =   2540
            EndProperty
            BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               SubItemIndex    =   2
               Object.Width           =   2540
            EndProperty
         End
      End
      Begin VB.Frame frmSelectCorp 
         Caption         =   "预设企业集合"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   2535
         Left            =   -74850
         TabIndex        =   12
         Top             =   450
         Width           =   8385
         Begin MSComctlLib.ImageCombo imbQY 
            Height          =   390
            Left            =   1500
            TabIndex        =   36
            Top             =   210
            Width           =   5325
            _ExtentX        =   9393
            _ExtentY        =   688
            _Version        =   393216
            ForeColor       =   -2147483640
            BackColor       =   -2147483643
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Text            =   "imbQY"
            ImageList       =   "ImlSmall"
         End
         Begin VB.CommandButton cmdAddCorp 
            Caption         =   " 添加(&A)"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   6960
            TabIndex        =   15
            Top             =   690
            Width           =   1215
         End
         Begin VB.CommandButton cmdModifyCorp 
            Caption         =   " 修改(&M)"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   6960
            TabIndex        =   14
            Top             =   1140
            Width           =   1215
         End
         Begin VB.CommandButton cmdDeleteCorp 
            Caption         =   " 删除(&D)"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   6960
            TabIndex        =   13
            Top             =   1590
            Width           =   1215
         End
         Begin MSComctlLib.ListView lvwQY 
            Height          =   1725
            Left            =   1500
            TabIndex        =   35
            Top             =   630
            Width           =   5325
            _ExtentX        =   9393
            _ExtentY        =   3043
            LabelEdit       =   1
            LabelWrap       =   -1  'True
            HideSelection   =   -1  'True
            _Version        =   393217
            Icons           =   "ImlBig"
            SmallIcons      =   "ImlSmall"
            ForeColor       =   -2147483640
            BackColor       =   -2147483643
            BorderStyle     =   1
            Appearance      =   1
            BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
               Name            =   "宋体"
               Size            =   9
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            NumItems        =   3
            BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               Text            =   "预设名称"
               Object.Width           =   2500
            EndProperty
            BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               SubItemIndex    =   1
               Text            =   "联系企业数量"
               Object.Width           =   2500
            EndProperty
            BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
               SubItemIndex    =   2
               Object.Width           =   2500
            EndProperty
         End
      End
      Begin VB.CommandButton cmdSaveSeleComp 
         Caption         =   "保存该选择"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   300
         Left            =   -67650
         TabIndex        =   6
         Top             =   750
         Width           =   1200
      End
      Begin VB.Frame frmSplitterQY 
         Height          =   4650
         Left            =   -70710
         MouseIcon       =   "frmCenter.frx":1FAE
         MousePointer    =   99  'Custom
         TabIndex        =   5
         Top             =   990
         Width           =   100
      End
      Begin VB.ListBox lstSeleCompany 
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   4380
         Left            =   -70620
         MultiSelect     =   2  'Extended
         TabIndex        =   4
         Top             =   1080
         Width           =   4170
      End
      Begin MSComctlLib.TreeView tvCompany 
         Height          =   4560
         Left            =   -74820
         TabIndex        =   22
         Top             =   1080
         Width           =   4110
         _ExtentX        =   7250
         _ExtentY        =   8043
         _Version        =   393217
         Indentation     =   644
         LabelEdit       =   1
         Style           =   7
         FullRowSelect   =   -1  'True
         Appearance      =   1
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin MSComctlLib.TreeView tvCase 
         Height          =   4560
         Left            =   180
         TabIndex        =   25
         Top             =   1080
         Width           =   4095
         _ExtentX        =   7223
         _ExtentY        =   8043
         _Version        =   393217
         Indentation     =   644
         Style           =   7
         Appearance      =   1
      End
      Begin VB.CommandButton cmdAllRight2 
         Caption         =   ">>"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Left            =   6600
         TabIndex        =   27
         Top             =   360
         Visible         =   0   'False
         Width           =   735
      End
      Begin VB.CommandButton cmdAllDelete2 
         Caption         =   "<<"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Left            =   7350
         TabIndex        =   28
         Top             =   360
         Visible         =   0   'False
         Width           =   690
      End
      Begin VB.CommandButton cmdAllRight 
         Caption         =   ">>"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Left            =   -68370
         TabIndex        =   31
         Top             =   360
         Visible         =   0   'False
         Width           =   700
      End
      Begin VB.CommandButton cmdAllDelete 
         Caption         =   "<<"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   375
         Left            =   -67650
         TabIndex        =   30
         Top             =   360
         Visible         =   0   'False
         Width           =   700
      End
      Begin VB.Label Label2 
         AutoSize        =   -1  'True
         Caption         =   "以下文书类型被选中"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   180
         Left            =   4380
         TabIndex        =   11
         Top             =   450
         Width           =   1620
      End
      Begin VB.Label lblCaption2 
         AutoSize        =   -1  'True
         Caption         =   "选择需要的文书"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   180
         Left            =   210
         TabIndex        =   10
         Top             =   450
         Width           =   1260

⌨️ 快捷键说明

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