frm_zyinfo.frm

我大学时候用vb做的物业管理系统

VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomct2.ocx"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "Comdlg32.ocx"
Begin VB.Form frm_zyinfo 
   Caption         =   "员工信息"
   ClientHeight    =   5715
   ClientLeft      =   1965
   ClientTop       =   2355
   ClientWidth     =   8100
   Icon            =   "frm_zyinfo.frx":0000
   LinkTopic       =   "Form1"
   ScaleHeight     =   5715
   ScaleWidth      =   8100
   StartUpPosition =   2  '屏幕中心
   Begin VB.Frame Frame2 
      Caption         =   "员工信息"
      Height          =   4905
      Left            =   210
      TabIndex        =   38
      Top             =   210
      Width           =   7650
      Begin VB.CommandButton Command2 
         Caption         =   "..."
         Height          =   285
         Left            =   6960
         TabIndex        =   41
         Top             =   3660
         Width           =   405
      End
      Begin MSComCtl2.DTPicker DTPicker2 
         DataField       =   "入职日期"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   5
         Top             =   1005
         Width           =   1305
         _ExtentX        =   2302
         _ExtentY        =   529
         _Version        =   393216
         Format          =   76283905
         CurrentDate     =   38861
      End
      Begin MSComCtl2.DTPicker DTPicker1 
         DataField       =   "出生日期"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   3
         Top             =   630
         Width           =   1305
         _ExtentX        =   2302
         _ExtentY        =   529
         _Version        =   393216
         Format          =   76283905
         CurrentDate     =   38861
      End
      Begin VB.ComboBox Combo2 
         DataField       =   "婚否"
         DataSource      =   "Adodc1"
         Height          =   300
         ItemData        =   "frm_zyinfo.frx":0442
         Left            =   1050
         List            =   "frm_zyinfo.frx":044C
         TabIndex        =   4
         Top             =   1004
         Width           =   915
      End
      Begin VB.TextBox Text4 
         DataField       =   "籍贯"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   7
         Top             =   1380
         Width           =   1305
      End
      Begin VB.TextBox Text3 
         DataField       =   "民族"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   6
         Top             =   1380
         Width           =   885
      End
      Begin VB.TextBox Text6 
         DataField       =   "学历"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   9
         Top             =   1770
         Width           =   1305
      End
      Begin VB.TextBox Text5 
         DataField       =   "职工编码"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   8
         Top             =   1770
         Width           =   885
      End
      Begin VB.PictureBox Picture1 
         Height          =   3210
         Left            =   4620
         ScaleHeight     =   3150
         ScaleWidth      =   2715
         TabIndex        =   31
         Top             =   210
         Width           =   2775
      End
      Begin VB.TextBox Text13 
         DataField       =   "备注"
         DataSource      =   "Adodc1"
         Height          =   660
         Left            =   1050
         TabIndex        =   16
         Top             =   4095
         Width           =   6435
      End
      Begin VB.ComboBox Combo1 
         DataField       =   "性别"
         DataSource      =   "Adodc1"
         Height          =   300
         ItemData        =   "frm_zyinfo.frx":045C
         Left            =   1050
         List            =   "frm_zyinfo.frx":0466
         TabIndex        =   2
         Top             =   622
         Width           =   915
      End
      Begin VB.TextBox Text1 
         DataField       =   "姓名"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   0
         Top             =   240
         Width           =   900
      End
      Begin VB.TextBox Text9 
         DataField       =   "身份证号"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   12
         Top             =   2532
         Width           =   3345
      End
      Begin VB.TextBox Text8 
         DataField       =   "部门"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   11
         Top             =   2150
         Width           =   1305
      End
      Begin VB.TextBox Text12 
         DataField       =   "家庭住址"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   15
         Top             =   3678
         Width           =   3345
      End
      Begin VB.TextBox Text10 
         DataField       =   "手机"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   13
         Top             =   2914
         Width           =   3345
      End
      Begin VB.TextBox Text11 
         DataField       =   "电话"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   14
         Top             =   3296
         Width           =   3345
      End
      Begin VB.TextBox Text2 
         DataField       =   "年龄"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   1
         Top             =   240
         Width           =   1305
      End
      Begin VB.TextBox Text7 
         DataField       =   "部门编码"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   1050
         TabIndex        =   10
         Top             =   2150
         Width           =   900
      End
      Begin VB.TextBox Text15 
         DataField       =   "出生日期"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   40
         Top             =   1005
         Visible         =   0   'False
         Width           =   1305
      End
      Begin VB.TextBox Text14 
         DataField       =   "入职日期"
         DataSource      =   "Adodc1"
         Height          =   300
         Left            =   3120
         TabIndex        =   39
         Top             =   630
         Visible         =   0   'False
         Width           =   1305
      End
      Begin VB.Label Label18 
         AutoSize        =   -1  'True
         Height          =   180
         Left            =   4650
         TabIndex        =   42
         Top             =   3630
         Width           =   90
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "婚    否："
         Height          =   180
         Left            =   210
         TabIndex        =   37
         Top             =   1065
         Width           =   900
      End
      Begin VB.Label Label16 
         AutoSize        =   -1  'True
         Caption         =   "入职时间："
         Height          =   180
         Left            =   2100
         TabIndex        =   36
         Top             =   1065
         Width           =   900
      End
      Begin VB.Label Label17 
         AutoSize        =   -1  'True
         Caption         =   "籍    贯："
         Height          =   180
         Left            =   2100
         TabIndex        =   35
         Top             =   1440
         Width           =   900
      End