frminouttest.frm

健身俱乐部管理系统

VERSION 5.00
Object = "{57EA6131-FAB3-49C3-BF10-85A4777A5A7C}#1.0#0"; "XPButton.ocx"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomct2.ocx"
Begin VB.Form FrmInOutTest 
   Caption         =   "出入检测"
   ClientHeight    =   7215
   ClientLeft      =   60
   ClientTop       =   450
   ClientWidth     =   9780
   Icon            =   "FrmInOutTest.frx":0000
   LinkTopic       =   "Form1"
   ScaleHeight     =   7215
   ScaleWidth      =   9780
   StartUpPosition =   1  '所有者中心
   Begin VB.Frame FraReg 
      Height          =   6540
      Left            =   90
      TabIndex        =   0
      Top             =   90
      Width           =   9555
      Begin VB.Frame FraChest 
         Height          =   780
         Left            =   135
         TabIndex        =   29
         Top             =   5580
         Width           =   9285
         Begin VB.TextBox TxtChest 
            Enabled         =   0   'False
            Height          =   285
            Left            =   945
            TabIndex        =   30
            Top             =   300
            Width           =   1815
         End
         Begin MSComCtl2.DTPicker dtpBoxStarting 
            Height          =   285
            Left            =   4275
            TabIndex        =   31
            Top             =   300
            Width           =   1455
            _ExtentX        =   2566
            _ExtentY        =   503
            _Version        =   393216
            Enabled         =   0   'False
            CustomFormat    =   "yyyy-mm-dd"
            Format          =   20185089
            CurrentDate     =   2
            MinDate         =   2
         End
         Begin MSComCtl2.DTPicker dtpBoxDeadLine 
            Height          =   285
            Left            =   7695
            TabIndex        =   32
            Top             =   300
            Width           =   1455
            _ExtentX        =   2566
            _ExtentY        =   503
            _Version        =   393216
            Enabled         =   0   'False
            CustomFormat    =   "yyyy-mm-dd"
            Format          =   20185089
            CurrentDate     =   2
            MinDate         =   2
         End
         Begin VB.Label LblChest 
            AutoSize        =   -1  'True
            Caption         =   "储物箱"
            Height          =   180
            Left            =   225
            TabIndex        =   35
            Top             =   300
            Width           =   540
         End
         Begin VB.Label LblBoxStart 
            AutoSize        =   -1  'True
            Caption         =   "起始日期"
            Height          =   180
            Left            =   3285
            TabIndex        =   34
            Top             =   300
            Width           =   720
         End
         Begin VB.Label LblBoxDeadline 
            AutoSize        =   -1  'True
            Caption         =   "截止日期"
            Height          =   180
            Left            =   6525
            TabIndex        =   33
            Top             =   300
            Width           =   720
         End
      End
      Begin VB.Frame FraMember 
         Height          =   4065
         Left            =   135
         TabIndex        =   11
         Top             =   1530
         Width           =   9285
         Begin VB.TextBox TxtName 
            Enabled         =   0   'False
            Height          =   315
            Left            =   1000
            TabIndex        =   19
            Top             =   405
            Width           =   1590
         End
         Begin VB.OptionButton optSex 
            Caption         =   "男"
            Enabled         =   0   'False
            Height          =   240
            Index           =   0
            Left            =   4365
            TabIndex        =   18
            Top             =   450
            Value           =   -1  'True
            Width           =   510
         End
         Begin VB.OptionButton optSex 
            Caption         =   "女"
            Enabled         =   0   'False
            Height          =   240
            Index           =   1
            Left            =   5175
            TabIndex        =   17
            Top             =   450
            Width           =   510
         End
         Begin VB.TextBox TxtIDCard 
            Enabled         =   0   'False
            Height          =   285
            Left            =   4455
            TabIndex        =   16
            Top             =   990
            Width           =   2220
         End
         Begin VB.TextBox TxtAddress 
            Enabled         =   0   'False
            Height          =   465
            Left            =   1000
            MultiLine       =   -1  'True
            TabIndex        =   15
            Top             =   2700
            Width           =   8160
         End
         Begin VB.TextBox TxtCompany 
            Enabled         =   0   'False
            Height          =   465
            Left            =   1000
            MultiLine       =   -1  'True
            TabIndex        =   14
            Top             =   3375
            Width           =   8160
         End
         Begin VB.TextBox TxtHandSet 
            Enabled         =   0   'False
            Height          =   315
            Left            =   1000
            TabIndex        =   13
            Top             =   1710
            Width           =   1635
         End
         Begin VB.TextBox TxtHomeTel 
            Enabled         =   0   'False
            Height          =   315
            Left            =   4455
            TabIndex        =   12
            Top             =   1710
            Width           =   2220
         End
         Begin MSComCtl2.DTPicker dtpBirthday 
            Height          =   285
            Left            =   1000
            TabIndex        =   20
            Top             =   1035
            Width           =   1455
            _ExtentX        =   2566
            _ExtentY        =   503
            _Version        =   393216
            Enabled         =   0   'False
            CustomFormat    =   "yyyy-mm-dd"
            Format          =   20185089
            CurrentDate     =   29221
            MinDate         =   2
         End
         Begin VB.Image ImgPhoto 
            BorderStyle     =   1  'Fixed Single
            Height          =   2355
            Left            =   7290
            Stretch         =   -1  'True
            Top             =   225
            Width           =   1770
         End
         Begin VB.Label LblName 
            AutoSize        =   -1  'True
            Caption         =   "姓名"
            Height          =   180
            Left            =   405
            TabIndex        =   28
            Top             =   495
            Width           =   360
         End
         Begin VB.Label LblSex 
            AutoSize        =   -1  'True
            Caption         =   "姓别"
            Height          =   180
            Left            =   3690
            TabIndex        =   27
            Top             =   450
            Width           =   360
         End
         Begin VB.Label LblBirthday 
            AutoSize        =   -1  'True
            Caption         =   "生日"
            Height          =   180
            Left            =   405
            TabIndex        =   26
            Top             =   1125
            Width           =   360
         End
         Begin VB.Label LblIDCard 
            AutoSize        =   -1  'True
            Caption         =   "身份证号"
            Height          =   180
            Left            =   3465
            TabIndex        =   25
            Top             =   1035
            Width           =   720
         End
         Begin VB.Label LblAddress 
            AutoSize        =   -1  'True
            Caption         =   "住址"
            Height          =   180
            Left            =   360
            TabIndex        =   24
            Top             =   2880
            Width           =   360
         End
         Begin VB.Label LblCompany 
            AutoSize        =   -1  'True
            Caption         =   "单位"
            Height          =   180
            Left            =   360
            TabIndex        =   23
            Top             =   3555
            Width           =   360
         End
         Begin VB.Label LblHandSet 
            AutoSize        =   -1  'True
            Caption         =   "移动电话"
            Height          =   180
            Left            =   90
            TabIndex        =   22
            Top             =   1800
            Width           =   720
         End
         Begin VB.Label LblHomeTel 
            AutoSize        =   -1  'True
            Caption         =   "固定电话"
            Height          =   180
            Left            =   3420
            TabIndex        =   21
            Top             =   1800
            Width           =   720
         End
      End
      Begin VB.Frame FraCard 
         Height          =   1230
         Left            =   135
         TabIndex        =   1
         Top             =   225
         Width           =   9285
         Begin VB.TextBox TxtCard 
            Height          =   285