frmunsellpfquery.frm

来自「通用书店管理系统」· FRM 代码 · 共 745 行 · 第 1/3 页

FRM
745
字号
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{DEF7CADD-83C0-11D0-A0F1-00A024703500}#7.0#0"; "TODG7.OCX"
Begin VB.Form frmUnsellPFQuery 
   Caption         =   "退书查询——批发"
   ClientHeight    =   6840
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   11880
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   ScaleHeight     =   6840
   ScaleWidth      =   11880
   WindowState     =   2  'Maximized
   Begin VB.Frame Frame1 
      Appearance      =   0  'Flat
      BackColor       =   &H00C0C0C0&
      Caption         =   "查询条件"
      ForeColor       =   &H80000008&
      Height          =   3255
      Index           =   0
      Left            =   3780
      TabIndex        =   18
      Top             =   1020
      Visible         =   0   'False
      Width           =   4800
      Begin VB.CheckBox chkFields 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "销售日期"
         ForeColor       =   &H80000008&
         Height          =   315
         Index           =   4
         Left            =   180
         TabIndex        =   12
         Top             =   2220
         Width           =   1050
      End
      Begin VB.CheckBox chkFields 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "供货商"
         ForeColor       =   &H80000008&
         Height          =   315
         Index           =   0
         Left            =   180
         TabIndex        =   8
         Top             =   1740
         Value           =   1  'Checked
         Visible         =   0   'False
         Width           =   870
      End
      Begin VB.CheckBox chkFields 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "图书类型"
         ForeColor       =   &H80000008&
         Height          =   315
         Index           =   1
         Left            =   180
         TabIndex        =   9
         Top             =   1260
         Value           =   1  'Checked
         Width           =   1050
      End
      Begin VB.CheckBox chkFields 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "书号"
         ForeColor       =   &H80000008&
         Height          =   315
         Index           =   2
         Left            =   180
         TabIndex        =   10
         Top             =   300
         Value           =   1  'Checked
         Width           =   960
      End
      Begin VB.TextBox txtFields 
         Appearance      =   0  'Flat
         Height          =   345
         Index           =   0
         Left            =   1260
         TabIndex        =   3
         Top             =   1620
         Visible         =   0   'False
         Width           =   2760
      End
      Begin VB.TextBox txtFields 
         Appearance      =   0  'Flat
         Height          =   345
         Index           =   1
         Left            =   1260
         TabIndex        =   2
         Top             =   1140
         Width           =   2760
      End
      Begin VB.TextBox txtFields 
         Appearance      =   0  'Flat
         Height          =   345
         Index           =   2
         Left            =   1260
         TabIndex        =   0
         Top             =   180
         Width           =   2760
      End
      Begin VB.TextBox txtFields 
         Appearance      =   0  'Flat
         Height          =   345
         Index           =   3
         Left            =   1260
         TabIndex        =   1
         Top             =   660
         Width           =   2760
      End
      Begin VB.CheckBox chkFields 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "书名"
         ForeColor       =   &H80000008&
         Height          =   315
         Index           =   3
         Left            =   180
         TabIndex        =   11
         Top             =   780
         Value           =   1  'Checked
         Width           =   765
      End
      Begin VB.CommandButton cmdOk 
         Appearance      =   0  'Flat
         Height          =   405
         Index           =   0
         Left            =   1260
         Picture         =   "frmUnsellPFQuery.frx":0000
         Style           =   1  'Graphical
         TabIndex        =   4
         Top             =   2700
         Width           =   960
      End
      Begin VB.CommandButton cmdExit 
         Appearance      =   0  'Flat
         Height          =   405
         Index           =   0
         Left            =   2580
         Picture         =   "frmUnsellPFQuery.frx":14E4
         Style           =   1  'Graphical
         TabIndex        =   17
         Top             =   2700
         Width           =   960
      End
      Begin VB.CommandButton cmdSearch 
         Appearance      =   0  'Flat
         Height          =   315
         Index           =   4
         Left            =   4260
         Picture         =   "frmUnsellPFQuery.frx":29C8
         Style           =   1  'Graphical
         TabIndex        =   13
         Top             =   1680
         Visible         =   0   'False
         Width           =   345
      End
      Begin VB.CommandButton cmdSearch 
         Appearance      =   0  'Flat
         Height          =   315
         Index           =   5
         Left            =   4260
         Picture         =   "frmUnsellPFQuery.frx":2D0C
         Style           =   1  'Graphical
         TabIndex        =   14
         Top             =   1200
         Width           =   345
      End
      Begin VB.CommandButton cmdSearch 
         Appearance      =   0  'Flat
         Height          =   315
         Index           =   6
         Left            =   4260
         Picture         =   "frmUnsellPFQuery.frx":3050
         Style           =   1  'Graphical
         TabIndex        =   15
         Top             =   240
         Width           =   345
      End
      Begin VB.CommandButton cmdSearch 
         Appearance      =   0  'Flat
         Height          =   315
         Index           =   7
         Left            =   4260
         Picture         =   "frmUnsellPFQuery.frx":3394
         Style           =   1  'Graphical
         TabIndex        =   16
         Top             =   720
         Width           =   345
      End
      Begin MSComCtl2.DTPicker dtpDate 
         Height          =   375
         Index           =   0
         Left            =   1260
         TabIndex        =   5
         Top             =   2100
         Width           =   1485
         _ExtentX        =   2619
         _ExtentY        =   661
         _Version        =   393216
         Format          =   24707073
         CurrentDate     =   37329
      End
      Begin MSComCtl2.DTPicker dtpDate 
         Height          =   375
         Index           =   1
         Left            =   3120
         TabIndex        =   6
         Top             =   2100
         Width           =   1485
         _ExtentX        =   2619
         _ExtentY        =   661
         _Version        =   393216
         Format          =   24707073
         CurrentDate     =   37329
      End
      Begin VB.Label Label1 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0C0C0&
         Caption         =   "至"
         ForeColor       =   &H80000008&
         Height          =   300
         Index           =   0
         Left            =   2820
         TabIndex        =   19
         Top             =   2160
         Width           =   330
      End
   End
   Begin VB.CommandButton cmdSearch 
      Caption         =   "查询条件(&F)"
      Height          =   405
      Index           =   0
      Left            =   10395
      TabIndex        =   7
      Top             =   6240
      Width           =   1335
   End
   Begin TrueOleDBGrid70.TDBGrid tdbQuery 
      Height          =   6045
      Index           =   0
      Left            =   120
      TabIndex        =   20
      Top             =   75

⌨️ 快捷键说明

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