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

📄 frmgridtest.frm

📁 一款Grid表格控件源代码,非常棒.不下你一定会后悔
💻 FRM
📖 第 1 页 / 共 5 页
字号:
               EndProperty
               Height          =   330
               Left            =   4275
               TabIndex        =   11
               Top             =   315
               Width           =   1095
            End
            Begin VB.Label lblStyles 
               AutoSize        =   -1  'True
               BackStyle       =   0  'Transparent
               Caption         =   "Row Decoration"
               Height          =   210
               Index           =   1
               Left            =   90
               TabIndex        =   16
               Top             =   135
               Width           =   1290
            End
            Begin VB.Label lblStyles 
               AutoSize        =   -1  'True
               BackStyle       =   0  'Transparent
               Caption         =   "Depth:"
               BeginProperty Font 
                  Name            =   "Small Fonts"
                  Size            =   6.75
                  Charset         =   0
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   165
               Index           =   2
               Left            =   3330
               TabIndex        =   15
               Top             =   405
               Width           =   405
            End
         End
         Begin VB.CheckBox chkSkin 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Colorize"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   90
            TabIndex        =   9
            Top             =   585
            Width           =   915
         End
         Begin VB.Label Label2 
            AutoSize        =   -1  'True
            BackStyle       =   0  'Transparent
            Caption         =   "Base Color (Click)"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   1620
            TabIndex        =   25
            Top             =   585
            Width           =   1290
         End
         Begin VB.Label lblStyles 
            AutoSize        =   -1  'True
            BackStyle       =   0  'Transparent
            Caption         =   "Skin Styles"
            Height          =   210
            Index           =   0
            Left            =   90
            TabIndex        =   22
            Top             =   -45
            Width           =   915
         End
      End
   End
   Begin VB.Frame Frame2 
      BackColor       =   &H00FFFFFF&
      Caption         =   "Base Functions"
      Height          =   1860
      Left            =   8775
      TabIndex        =   2
      Top             =   7515
      Width           =   6900
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Clear List"
         Height          =   285
         Index           =   7
         Left            =   1980
         TabIndex        =   32
         Top             =   1395
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Find"
         Height          =   285
         Index           =   6
         Left            =   1980
         TabIndex        =   31
         Top             =   1035
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "UnCheck All"
         Height          =   285
         Index           =   5
         Left            =   1980
         TabIndex        =   30
         Top             =   675
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Check All"
         Height          =   285
         Index           =   4
         Left            =   1980
         TabIndex        =   29
         Top             =   315
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Rem Column"
         Height          =   285
         Index           =   3
         Left            =   225
         TabIndex        =   28
         Top             =   1395
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Add Column"
         Height          =   285
         Index           =   2
         Left            =   225
         TabIndex        =   27
         Top             =   1035
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Rem Row"
         Height          =   285
         Index           =   1
         Left            =   225
         TabIndex        =   26
         Top             =   675
         Width           =   1545
      End
      Begin VB.CommandButton cmdMethods 
         Caption         =   "Add Row"
         Height          =   285
         Index           =   0
         Left            =   225
         TabIndex        =   6
         Top             =   315
         Width           =   1545
      End
      Begin VB.TextBox txtCount 
         Height          =   285
         Left            =   4635
         TabIndex        =   4
         Text            =   "100"
         Top             =   900
         Width           =   555
      End
      Begin VB.CommandButton cmdPopulate 
         Caption         =   "Populate"
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   -1  'True
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   420
         Left            =   4590
         TabIndex        =   3
         Top             =   1260
         Width           =   2040
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "# Rows"
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   210
         Left            =   5220
         TabIndex        =   5
         Top             =   945
         Width           =   570
      End
   End
   Begin VB.Frame Frame1 
      BackColor       =   &H00F6F6F6&
      Caption         =   "Properties"
      Height          =   7305
      Left            =   10350
      TabIndex        =   1
      Top             =   135
      Width           =   5325
      Begin VB.Frame frmStyles 
         BackColor       =   &H00FFFFFF&
         Caption         =   "Extended Styles"
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   3075
         Index           =   2
         Left            =   180
         TabIndex        =   67
         Top             =   3960
         Width           =   2400
         Begin VB.CheckBox chkExtended 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Column Vertical Text"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Index           =   9
            Left            =   135
            TabIndex        =   81
            Top             =   2745
            Value           =   1  'Checked
            Width           =   1950
         End
         Begin VB.CheckBox chkExtended 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Column Drag Line"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Index           =   8
            Left            =   135
            TabIndex        =   80
            Top             =   2475
            Value           =   1  'Checked
            Width           =   1635
         End
         Begin VB.CheckBox chkExtended 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Column Focus"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Index           =   7
            Left            =   135
            TabIndex        =   79
            Top             =   2205
            Width           =   1320
         End
         Begin VB.TextBox txtColumn 
            Appearance      =   0  'Flat
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   255
            Left            =   1845
            TabIndex        =   78
            Text            =   "1"
            Top             =   1395
            Width           =   195
         End
         Begin VB.CheckBox chkExtended 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Column Hints"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Index           =   6
            Left            =   135
            TabIndex        =   77
            Top             =   1935
            Value           =   1  'Checked
            Width           =   1320
         End
         Begin VB.CheckBox chkExtended 
            BackColor       =   &H00FFFFFF&
            Caption         =   "Column Filters"
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False

⌨️ 快捷键说明

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