frmstuffmanage.frm

工资管理系统

VERSION 5.00
Begin VB.Form StuffManage 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "员工信息管理"
   ClientHeight    =   2310
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   7020
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   ScaleHeight     =   2310
   ScaleWidth      =   7020
   Begin VB.TextBox txtBirth 
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "yyyy""年""M""月""d""日"""
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   3
      EndProperty
      Height          =   270
      Left            =   1403
      TabIndex        =   25
      Top             =   1088
      Width           =   1620
   End
   Begin VB.CheckBox chkExpert 
      Caption         =   "专家"
      Height          =   225
      Left            =   4748
      TabIndex        =   24
      Top             =   1476
      Width           =   750
   End
   Begin VB.ComboBox cmbTitle 
      Height          =   300
      ItemData        =   "frmStuffManage.frx":0000
      Left            =   3945
      List            =   "frmStuffManage.frx":0013
      Style           =   2  'Dropdown List
      TabIndex        =   5
      Top             =   1073
      Width           =   1620
   End
   Begin VB.ComboBox cmbDuty 
      Height          =   300
      ItemData        =   "frmStuffManage.frx":0035
      Left            =   3923
      List            =   "frmStuffManage.frx":0048
      Style           =   2  'Dropdown List
      TabIndex        =   4
      Top             =   708
      Width           =   1620
   End
   Begin VB.CheckBox chkHouse 
      Caption         =   "有住房"
      Height          =   210
      Left            =   3548
      TabIndex        =   6
      Top             =   1483
      Width           =   900
   End
   Begin VB.TextBox txtTime 
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "yyyy""年""M""月""d""日"""
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   3
      EndProperty
      Height          =   270
      Left            =   1403
      TabIndex        =   3
      Top             =   1440
      Width           =   1620
   End
   Begin VB.TextBox txtDept 
      Height          =   270
      Left            =   1403
      MaxLength       =   50
      TabIndex        =   2
      Top             =   705
      Width           =   1620
   End
   Begin VB.CommandButton cmdRefresh 
      Caption         =   "刷新"
      Height          =   300
      Left            =   5678
      TabIndex        =   18
      Top             =   979
      Width           =   735
   End
   Begin VB.PictureBox picNavigation 
      AutoSize        =   -1  'True
      BorderStyle     =   0  'None
      Height          =   350
      Left            =   923
      ScaleHeight     =   345
      ScaleWidth      =   4605
      TabIndex        =   16
      Top             =   1738
      Width           =   4605
      Begin VB.TextBox txtNews 
         Height          =   270
         Left            =   570
         Locked          =   -1  'True
         TabIndex        =   17
         TabStop         =   0   'False
         Top             =   0
         Width           =   3450
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   ">"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   270
         Index           =   2
         Left            =   3990
         TabIndex        =   9
         Top             =   0
         Width           =   300
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   ">|"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   270
         Index           =   3
         Left            =   4260
         TabIndex        =   10
         Top             =   0
         Width           =   360
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   "|<"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   270
         Index           =   0
         Left            =   0
         TabIndex        =   7
         Top             =   0
         Width           =   330
      End
      Begin VB.CommandButton cmdMove 
         Caption         =   "<"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   270
         Index           =   1
         Left            =   315
         TabIndex        =   8
         Top             =   0
         Width           =   300
      End
   End
   Begin VB.TextBox txtNum 
      Height          =   270
      Left            =   3923
      MaxLength       =   9
      TabIndex        =   1
      Top             =   358
      Width           =   1620
   End
   Begin VB.CommandButton cmdAdd 
      Caption         =   "添加"
      Height          =   300
      Left            =   5678
      TabIndex        =   11
      Top             =   223
      Width           =   735
   End
   Begin VB.CommandButton cmdDelete 
      Caption         =   "删除"
      Height          =   300
      Left            =   5678
      TabIndex        =   12
      Top             =   601
      Width           =   735
   End
   Begin VB.CommandButton cmdExit 
      Cancel          =   -1  'True
      Caption         =   "关闭"
      Height          =   300
      Left            =   5678
      TabIndex        =   14
      Top             =   1738
      Width           =   735
   End
   Begin VB.CommandButton cmdSave 
      Caption         =   "保存"
      Height          =   300
      Left            =   5678
      TabIndex        =   13
      Top             =   1357
      Width           =   735
   End
   Begin VB.TextBox txtUser 
      Height          =   270
      Left            =   1403
      MaxLength       =   5
      TabIndex        =   0
      Top             =   358
      Width           =   1620
   End
   Begin VB.Label Label7 
      AutoSize        =   -1  'True
      Caption         =   "出生日期"
      Height          =   180
      Left            =   608
      TabIndex        =   26
      Top             =   1133
      Width           =   720
   End
   Begin VB.Label Label6 
      AutoSize        =   -1  'True
      Caption         =   "职称"
      Height          =   180
      Left            =   3518
      TabIndex        =   23
      Top             =   1133
      Width           =   360
   End
   Begin VB.Label Label5 
      AutoSize        =   -1  'True
      Caption         =   "职务"
      Height          =   180
      Left            =   3518
      TabIndex        =   22
      Top             =   768
      Width           =   360
   End
   Begin VB.Label Label4 
      AutoSize        =   -1  'True
      Caption         =   "工作时间"
      Height          =   180
      Left            =   608
      TabIndex        =   21
      Top             =   1498
      Width           =   720
   End
   Begin VB.Label Label3