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

📄 frmdesign.frm

📁 VB做的报表设计源程序,非常不错,可以自定义模版
💻 FRM
📖 第 1 页 / 共 5 页
字号:
            AutoSize        =   1
            Object.Width           =   12700
            MinWidth        =   12700
            Key             =   "DataConn"
         EndProperty
      EndProperty
      Enabled         =   0   'False
      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 Project1.CheckBoxControl Chkbox 
      Height          =   240
      Index           =   0
      Left            =   11940
      TabIndex        =   32
      Top             =   1845
      Visible         =   0   'False
      Width           =   195
      _extentx        =   344
      _extenty        =   423
   End
   Begin Project1.PropertySelector PropertySelector1 
      Height          =   2595
      Left            =   8640
      TabIndex        =   30
      Top             =   6000
      Width           =   3030
      _extentx        =   5345
      _extenty        =   4577
   End
   Begin MSComctlLib.ImageList MenuImages 
      Left            =   10605
      Top             =   3240
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      ImageWidth      =   16
      ImageHeight     =   16
      MaskColor       =   12632256
      _Version        =   393216
      BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
         NumListImages   =   25
         BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":07BB
            Key             =   ""
         EndProperty
         BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":0D55
            Key             =   ""
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":12EF
            Key             =   ""
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":1889
            Key             =   ""
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":1E23
            Key             =   ""
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":23BD
            Key             =   ""
         EndProperty
         BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":2957
            Key             =   ""
         EndProperty
         BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":2EF1
            Key             =   ""
         EndProperty
         BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":348B
            Key             =   ""
         EndProperty
         BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":3A25
            Key             =   ""
         EndProperty
         BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":3FBF
            Key             =   ""
         EndProperty
         BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":4559
            Key             =   ""
         EndProperty
         BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":4AF3
            Key             =   ""
         EndProperty
         BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":508D
            Key             =   ""
         EndProperty
         BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":5627
            Key             =   ""
         EndProperty
         BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":5BC1
            Key             =   ""
         EndProperty
         BeginProperty ListImage17 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":615B
            Key             =   ""
         EndProperty
         BeginProperty ListImage18 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":66F5
            Key             =   ""
         EndProperty
         BeginProperty ListImage19 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":6C8F
            Key             =   ""
         EndProperty
         BeginProperty ListImage20 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":7229
            Key             =   ""
         EndProperty
         BeginProperty ListImage21 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":77C3
            Key             =   ""
         EndProperty
         BeginProperty ListImage22 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":7D5D
            Key             =   ""
         EndProperty
         BeginProperty ListImage23 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":82F7
            Key             =   ""
         EndProperty
         BeginProperty ListImage24 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":8891
            Key             =   ""
         EndProperty
         BeginProperty ListImage25 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmDesign.frx":8E2B
            Key             =   ""
         EndProperty
      EndProperty
   End
   Begin VB.TextBox txtInput 
      Appearance      =   0  'Flat
      Height          =   270
      Left            =   10650
      TabIndex        =   26
      Top             =   2475
      Visible         =   0   'False
      Width           =   375
   End
   Begin VB.CommandButton cmdPgSetup 
      Height          =   490
      Left            =   720
      Picture         =   "frmDesign.frx":93C5
      Style           =   1  'Graphical
      TabIndex        =   25
      Top             =   825
      Width           =   274
   End
   Begin VB.PictureBox picVertScale 
      AutoRedraw      =   -1  'True
      BackColor       =   &H8000000C&
      ForeColor       =   &H00FFFFFF&
      Height          =   7275
      Left            =   720
      MousePointer    =   7  'Size N S
      ScaleHeight     =   5.01
      ScaleMode       =   5  'Inch
      ScaleWidth      =   0.156
      TabIndex        =   17
      Top             =   1350
      Width           =   285
      Begin VB.Line lnPos 
         BorderColor     =   &H00000000&
         BorderWidth     =   2
         Visible         =   0   'False
         X1              =   -0.042
         X2              =   0.167
         Y1              =   0.167
         Y2              =   0.167
      End
   End
   Begin VB.PictureBox PicHorizScale 
      AutoRedraw      =   -1  'True
      BackColor       =   &H8000000C&
      ForeColor       =   &H00FFFFFF&
      Height          =   285
      Left            =   1020
      MousePointer    =   9  'Size W E
      ScaleHeight     =   0.156
      ScaleMode       =   5  'Inch
      ScaleWidth      =   6.427
      TabIndex        =   16
      Top             =   825
      Width           =   9315
      Begin VB.PictureBox picWidMark 
         Appearance      =   0  'Flat
         BackColor       =   &H8000000C&
         BorderStyle     =   0  'None
         ForeColor       =   &H80000008&
         Height          =   195
         Left            =   1920
         Picture         =   "frmDesign.frx":994F
         ScaleHeight     =   0.135
         ScaleMode       =   5  'Inch
         ScaleWidth      =   0.156
         TabIndex        =   23
         Top             =   0
         Width           =   230
      End
   End
   Begin MSComDlg.CommonDialog CommonDialog1 
      Left            =   10635
      Top             =   3915
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
      CancelError     =   -1  'True
      Filter          =   "Report Files (*.drp)|*.drp"
      FontName        =   "Arial"
   End
   Begin VB.Frame Frame1 
      Appearance      =   0  'Flat
      BorderStyle     =   0  'None
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H80000008&
      Height          =   6600
      Left            =   105
      TabIndex        =   9
      Top             =   795
      Width           =   525
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":9ED9
         Height          =   520
         Index           =   9
         Left            =   0
         Picture         =   "frmDesign.frx":A463
         Style           =   1  'Graphical
         TabIndex        =   29
         ToolTipText     =   "Place Calculated Field"
         Top             =   2820
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":A9ED
         Height          =   520
         Index           =   10
         Left            =   0
         Picture         =   "frmDesign.frx":AF77
         Style           =   1  'Graphical
         TabIndex        =   28
         ToolTipText     =   "Place Summary Field"
         Top             =   3345
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":B501
         Height          =   520
         Index           =   8
         Left            =   0
         Picture         =   "frmDesign.frx":BA8B
         Style           =   1  'Graphical
         TabIndex        =   27
         ToolTipText     =   "Place Date/Page No. Field"
         Top             =   2295
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":C015
         Height          =   520
         Index           =   3
         Left            =   0
         Picture         =   "frmDesign.frx":C59F
         Style           =   1  'Graphical
         TabIndex        =   24
         ToolTipText     =   "Place Check Box"
         Top             =   1245
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":CB29
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   520
         Index           =   7
         Left            =   0
         Picture         =   "frmDesign.frx":D0B3
         Style           =   1  'Graphical
         TabIndex        =   18
         ToolTipText     =   "Place Data Bound Image"
         Top             =   1770
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":D63D
         Height          =   520
         Index           =   0
         Left            =   0
         Picture         =   "frmDesign.frx":DBC7
         Style           =   1  'Graphical
         TabIndex        =   15
         ToolTipText     =   "Select object"
         Top             =   30
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":E151
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   520
         Index           =   6
         Left            =   0
         Picture         =   "frmDesign.frx":E6DB
         Style           =   1  'Graphical
         TabIndex        =   14
         ToolTipText     =   "Place Image"
         Top             =   4620
         Width           =   520
      End
      Begin VB.OptionButton optAction 
         DownPicture     =   "frmDesign.frx":EC65
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25

⌨️ 快捷键说明

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