frmsfbmcx.frm

vb程序设计仁宇人份管理

VERSION 5.00
Object = "{DD44C0E7-B2CF-11D1-8DD3-444553540000}#1.0#0"; "CELL32.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form frmSfbmcx 
   Caption         =   "省份编码---按各字段查询"
   ClientHeight    =   8250
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   11475
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   ScaleHeight     =   8250
   ScaleWidth      =   11475
   WindowState     =   2  'Maximized
   Begin CELLLib.Cell Cell1 
      Height          =   5295
      Left            =   360
      TabIndex        =   30
      Top             =   2640
      Width           =   10935
      _Version        =   65536
      _ExtentX        =   19288
      _ExtentY        =   9340
      _StockProps     =   0
   End
   Begin VB.CommandButton Command2 
      Caption         =   "打印"
      Height          =   375
      Left            =   7200
      TabIndex        =   29
      Top             =   2160
      Width           =   1095
   End
   Begin VB.CommandButton cmdtj 
      Caption         =   "统计"
      Height          =   375
      Index           =   0
      Left            =   3840
      TabIndex        =   28
      Top             =   2160
      Width           =   1095
   End
   Begin VB.CommandButton cmdexit 
      Caption         =   "退出"
      Height          =   375
      Index           =   1
      Left            =   9840
      TabIndex        =   27
      Top             =   2160
      Width           =   1095
   End
   Begin VB.CommandButton cmdCx 
      Caption         =   "查询"
      Height          =   375
      Index           =   2
      Left            =   720
      TabIndex        =   26
      Top             =   2160
      Width           =   975
   End
   Begin VB.Frame Frame1 
      Caption         =   "省份编码查询"
      Height          =   1905
      Left            =   330
      MouseIcon       =   "frmsfbmcx.frx":0000
      TabIndex        =   0
      Top             =   90
      Width           =   10935
      Begin VB.CommandButton Command1 
         Caption         =   "删除条件"
         Height          =   585
         Index           =   1
         Left            =   4500
         Picture         =   "frmsfbmcx.frx":0442
         Style           =   1  'Graphical
         TabIndex        =   25
         Top             =   1110
         Width           =   1065
      End
      Begin VB.CommandButton Command1 
         Caption         =   "增加条件"
         Height          =   585
         Index           =   0
         Left            =   4500
         Picture         =   "frmsfbmcx.frx":0884
         Style           =   1  'Graphical
         TabIndex        =   24
         Top             =   375
         Width           =   1065
      End
      Begin VB.ListBox listTj 
         Height          =   1500
         Left            =   5700
         TabIndex        =   1
         Top             =   240
         Width           =   5025
      End
      Begin VB.Frame Frame3 
         Height          =   1590
         Left            =   180
         TabIndex        =   2
         Top             =   165
         Width           =   4185
         Begin VB.PictureBox Picture2 
            BorderStyle     =   0  'None
            Height          =   270
            Left            =   1260
            ScaleHeight     =   270
            ScaleWidth      =   2355
            TabIndex        =   21
            Top             =   1245
            Width           =   2355
            Begin VB.OptionButton Option1 
               Caption         =   "或者"
               Height          =   195
               Index           =   1
               Left            =   1080
               TabIndex        =   23
               Top             =   30
               Width           =   735
            End
            Begin VB.OptionButton Option1 
               Caption         =   "并且"
               Height          =   195
               Index           =   0
               Left            =   90
               TabIndex        =   22
               Top             =   15
               Value           =   -1  'True
               Width           =   735
            End
         End
         Begin VB.PictureBox pctValue2 
            BorderStyle     =   0  'None
            Height          =   300
            Left            =   1230
            ScaleHeight     =   300
            ScaleWidth      =   2715
            TabIndex        =   16
            Top             =   870
            Width           =   2715
            Begin VB.TextBox Text2 
               Height          =   270
               Left            =   1560
               TabIndex        =   18
               Top             =   0
               Width           =   1170
            End
            Begin VB.TextBox Text1 
               Height          =   270
               Left            =   0
               TabIndex        =   17
               Top             =   0
               Width           =   1170
            End
            Begin VB.Label Label1 
               Caption         =   "和"
               Height          =   165
               Left            =   1260
               TabIndex        =   19
               Top             =   60
               Width           =   195
            End
         End
         Begin VB.PictureBox pctDate2 
            BorderStyle     =   0  'None
            Height          =   300
            Left            =   1230
            ScaleHeight     =   300
            ScaleWidth      =   2835
            TabIndex        =   13
            Top             =   870
            Width           =   2835
            Begin MSComCtl2.DTPicker DTPicker3 
               Height          =   300
               Left            =   1545
               TabIndex        =   15
               Top             =   0
               Width           =   1185
               _ExtentX        =   2090
               _ExtentY        =   529
               _Version        =   393216
               Format          =   24772609
               CurrentDate     =   36634
            End
            Begin MSComCtl2.DTPicker DTPicker2 
               Height          =   300
               Left            =   0
               TabIndex        =   14
               Top             =   0
               Width           =   1185
               _ExtentX        =   2090
               _ExtentY        =   529
               _Version        =   393216
               Format          =   24772609
               CurrentDate     =   36634
            End
            Begin VB.Label Label2 
               Caption         =   "和"
               Height          =   165
               Left            =   1260
               TabIndex        =   20
               Top             =   60
               Width           =   195
            End
         End
         Begin VB.PictureBox pctDate1 
            BorderStyle     =   0  'None
            Height          =   300
            Left            =   1230
            ScaleHeight     =   300
            ScaleWidth      =   2385
            TabIndex        =   9
            Top             =   870
            Width           =   2385
            Begin MSComCtl2.DTPicker DTPicker1 
               Height          =   300
               Left            =   0
               TabIndex        =   10
               Top             =   0
               Width           =   1290
               _ExtentX        =   2275
               _ExtentY        =   529
               _Version        =   393216
               Format          =   24772609
               CurrentDate     =   36634
            End
         End
         Begin VB.ComboBox CmbZd 
            Height          =   300
            Left            =   1200
            TabIndex        =   4
            Text            =   "选择查询字段"
            Top             =   240
            Width           =   1980
         End
         Begin VB.ComboBox CmbYsf 
            Height          =   300
            Left            =   1230
            Style           =   2  'Dropdown List
            TabIndex        =   3
            Top             =   525
            Width           =   1230
         End
         Begin VB.PictureBox pctValue1 
            BorderStyle     =   0  'None
            Height          =   300
            Left            =   1230
            ScaleHeight     =   300
            ScaleWidth      =   1920
            TabIndex        =   11
            Top             =   870
            Width           =   1920
            Begin VB.TextBox txtV1 
               Height          =   285
               Left            =   0
               TabIndex        =   12
               Top             =   0
               Width           =   1140
            End
         End
         Begin VB.Label labHead 
            AutoSize        =   -1  'True
            Caption         =   "查询字段："
            Height          =   180
            Index           =   0
            Left            =   90
            TabIndex        =   8
            Top             =   255
            Width           =   900
         End
         Begin VB.Label labHead 
            AutoSize        =   -1  'True
            Caption         =   "查询运算符："
            Height          =   180
            Index           =   1
            Left            =   90
            TabIndex        =   7
            Top             =   615
            Width           =   1080
         End
         Begin VB.Label labHead 
            AutoSize        =   -1  'True