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

📄 frmmain.frm

📁 大量优秀的vb编程
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form frmMain 
   Caption         =   "查找文件"
   ClientHeight    =   4590
   ClientLeft      =   3030
   ClientTop       =   2310
   ClientWidth     =   7080
   Icon            =   "frmMain.frx":0000
   LinkTopic       =   "Form1"
   ScaleHeight     =   4590
   ScaleWidth      =   7080
   Begin VB.CommandButton cmdClear 
      Caption         =   "清除结果(&C)"
      Height          =   350
      Left            =   5760
      TabIndex        =   13
      Top             =   460
      Width           =   1200
   End
   Begin MSComctlLib.ImageList imgDir 
      Left            =   2100
      Top             =   3060
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      ImageWidth      =   16
      ImageHeight     =   16
      MaskColor       =   12632256
      _Version        =   393216
      BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
         NumListImages   =   13
         BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":08CA
            Key             =   "dirvenet"
         EndProperty
         BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":0E66
            Key             =   "525floppy"
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":13EE
            Key             =   "cddrive"
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":198A
            Key             =   "drive1"
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":1F26
            Key             =   "dirve2"
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":24C2
            Key             =   "drivedsc"
         EndProperty
         BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":2A5E
            Key             =   "35floppy"
         EndProperty
         BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":2FFA
            Key             =   "default"
         EndProperty
         BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":3596
            Key             =   "ico"
         EndProperty
         BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":36F2
            Key             =   "exe"
         EndProperty
         BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":3C8E
            Key             =   "cur"
         EndProperty
         BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":3DEA
            Key             =   "ani"
         EndProperty
         BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmMain.frx":4386
            Key             =   "lnk"
         EndProperty
      EndProperty
   End
   Begin MSComCtl2.Animation aniFindFile 
      Height          =   600
      Left            =   5760
      TabIndex        =   9
      Top             =   1320
      Width           =   1200
      _ExtentX        =   2117
      _ExtentY        =   1058
      _Version        =   393216
      FullWidth       =   80
      FullHeight      =   40
   End
   Begin MSComctlLib.ImageList imgList 
      Left            =   1470
      Top             =   3060
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      MaskColor       =   12632256
      _Version        =   393216
   End
   Begin MSComctlLib.StatusBar sbarMain 
      Align           =   2  'Align Bottom
      Height          =   270
      Left            =   0
      TabIndex        =   11
      Top             =   4320
      Width           =   7080
      _ExtentX        =   12488
      _ExtentY        =   476
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   1
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            AutoSize        =   1
            Object.Width           =   11968
            MinWidth        =   3528
         EndProperty
      EndProperty
      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.ListView lvwList 
      Height          =   1890
      Left            =   0
      TabIndex        =   6
      Top             =   2430
      Width           =   7065
      _ExtentX        =   12462
      _ExtentY        =   3334
      View            =   3
      LabelEdit       =   1
      LabelWrap       =   -1  'True
      HideSelection   =   -1  'True
      AllowReorder    =   -1  'True
      _Version        =   393217
      SmallIcons      =   "imgList"
      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        =   5
      BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
         Text            =   "名称"
         Object.Width           =   2646
      EndProperty
      BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
         SubItemIndex    =   1
         Text            =   "所在文件夹"
         Object.Width           =   7056
      EndProperty
      BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
         SubItemIndex    =   2
         Text            =   "大小"
         Object.Width           =   2117
      EndProperty
      BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
         SubItemIndex    =   3
         Text            =   "类型"
         Object.Width           =   1411
      EndProperty
      BeginProperty ColumnHeader(5) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
         SubItemIndex    =   4
         Text            =   "修改时间"
         Object.Width           =   3175
      EndProperty
   End
   Begin VB.Frame fam 
      Caption         =   "名称和位置"
      Height          =   2145
      Left            =   90
      TabIndex        =   10
      Top             =   180
      Width           =   5535
      Begin VB.CheckBox chkLoadIcon 
         Caption         =   "获取文件图标(&G)"
         Height          =   225
         Left            =   990
         TabIndex        =   12
         Top             =   1530
         Width           =   1665
      End
      Begin VB.CommandButton cmdBrowse 
         Caption         =   "浏览(&B)..."
         Height          =   350
         Left            =   4225
         TabIndex        =   5
         Top             =   1230
         Width           =   1100
      End
      Begin VB.CheckBox chkSubs 
         Caption         =   "包含子文件夹(&S)"
         Height          =   285
         Left            =   990
         TabIndex        =   4
         Top             =   1230
         Value           =   1  'Checked
         Width           =   1665
      End
      Begin VB.ComboBox cboSearch 
         Height          =   300
         Left            =   990
         TabIndex        =   1
         Top             =   360
         Width           =   4335
      End
      Begin MSComctlLib.ImageCombo icboDirs 
         Height          =   330
         Left            =   990
         TabIndex        =   3
         Top             =   780
         Width           =   4335
         _ExtentX        =   7646
         _ExtentY        =   582
         _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
         ImageList       =   "imgDir"
      End
      Begin VB.Label lbl 
         AutoSize        =   -1  'True
         Caption         =   "搜索(&L):"
         Height          =   180
         Index           =   1
         Left            =   210
         TabIndex        =   2
         Top             =   840
         Width           =   720
      End
      Begin VB.Label lbl 
         AutoSize        =   -1  'True
         Caption         =   "名称(&N):"
         Height          =   180
         Index           =   0
         Left            =   210
         TabIndex        =   0
         Top             =   420
         Width           =   720
      End
   End
   Begin VB.CommandButton cmdExit 
      Cancel          =   -1  'True
      Caption         =   "退出(&X)"
      Height          =   350
      Left            =   5760
      TabIndex        =   8
      Top             =   840
      Width           =   1200
   End
   Begin VB.CommandButton cmdFind 
      Caption         =   "开始查找(&I)"
      Default         =   -1  'True
      Height          =   350
      Left            =   5760
      TabIndex        =   7

⌨️ 快捷键说明

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