⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 f_laodonghetong.frm

📁 这是一个药品人事管理系统
💻 FRM
📖 第 1 页 / 共 3 页
字号:
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{0BA686C6-F7D3-101A-993E-0000C0EF6F5E}#1.0#0"; "THREED32.OCX"
Begin VB.Form F_LaoDongHeTong 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "劳动合同"
   ClientHeight    =   7740
   ClientLeft      =   1095
   ClientTop       =   330
   ClientWidth     =   11250
   ControlBox      =   0   'False
   KeyPreview      =   -1  'True
   LinkTopic       =   "Form1"
   LockControls    =   -1  'True
   MaxButton       =   0   'False
   MinButton       =   0   'False
   Moveable        =   0   'False
   ScaleHeight     =   7740
   ScaleWidth      =   11250
   StartUpPosition =   2  '屏幕中心
   Begin VB.Frame Frame1 
      Height          =   7455
      Left            =   120
      TabIndex        =   26
      Top             =   120
      Width           =   10935
      Begin TabDlg.SSTab SSTab1 
         Height          =   6855
         Left            =   240
         TabIndex        =   27
         Top             =   360
         Width           =   10455
         _ExtentX        =   18441
         _ExtentY        =   12091
         _Version        =   393216
         Tabs            =   2
         TabHeight       =   520
         TabCaption(0)   =   "编        辑"
         TabPicture(0)   =   "F_LaoDongHeTong.frx":0000
         Tab(0).ControlEnabled=   -1  'True
         Tab(0).Control(0)=   "Frame2"
         Tab(0).Control(0).Enabled=   0   'False
         Tab(0).Control(1)=   "Picture1"
         Tab(0).Control(1).Enabled=   0   'False
         Tab(0).ControlCount=   2
         TabCaption(1)   =   "列        表"
         TabPicture(1)   =   "F_LaoDongHeTong.frx":001C
         Tab(1).ControlEnabled=   0   'False
         Tab(1).Control(0)=   "Frame3"
         Tab(1).Control(0).Enabled=   0   'False
         Tab(1).ControlCount=   1
         Begin VB.PictureBox Picture1 
            Appearance      =   0  'Flat
            BorderStyle     =   0  'None
            BeginProperty Font 
               Name            =   "MS Sans Serif"
               Size            =   8.25
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H80000008&
            Height          =   420
            Left            =   2880
            ScaleHeight     =   420
            ScaleWidth      =   6720
            TabIndex        =   52
            Top             =   6240
            Width           =   6720
            Begin Threed.SSCommand cmdClose 
               Height          =   330
               Left            =   5520
               TabIndex        =   53
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&Q.关 闭"
               Font3D          =   1
            End
            Begin Threed.SSCommand CmdAdd 
               Height          =   330
               Left            =   720
               TabIndex        =   21
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&A.增 加"
               Font3D          =   1
            End
            Begin Threed.SSCommand cmdEdit 
               Height          =   330
               Left            =   1920
               TabIndex        =   22
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&E.编 辑"
               Font3D          =   1
            End
            Begin Threed.SSCommand CmdDelete 
               Height          =   330
               Left            =   3120
               TabIndex        =   23
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&D.删 除"
               Font3D          =   1
            End
            Begin Threed.SSCommand cmdUpdate 
               Height          =   330
               Left            =   4320
               TabIndex        =   54
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&Y.保 存"
               Font3D          =   1
            End
            Begin Threed.SSCommand cmdRefresh 
               Height          =   330
               Left            =   4320
               TabIndex        =   24
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&R.刷新"
               Font3D          =   1
            End
            Begin Threed.SSCommand cmdCancel 
               Height          =   330
               Left            =   5520
               TabIndex        =   25
               Top             =   0
               Width           =   1095
               _Version        =   65536
               _ExtentX        =   1931
               _ExtentY        =   573
               _StockProps     =   78
               Caption         =   "&C.取消"
               Font3D          =   1
            End
         End
         Begin VB.Frame Frame3 
            Height          =   6135
            Left            =   -74760
            TabIndex        =   48
            Top             =   480
            Width           =   9975
            Begin MSDataGridLib.DataGrid DataGrid1 
               Height          =   5535
               Left            =   240
               TabIndex        =   49
               Top             =   480
               Width           =   9495
               _ExtentX        =   16748
               _ExtentY        =   9763
               _Version        =   393216
               HeadLines       =   1
               RowHeight       =   14
               BeginProperty HeadFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
                  Name            =   "MS Sans Serif"
                  Size            =   8.25
                  Charset         =   0
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
                  Name            =   "宋体"
                  Size            =   9
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ColumnCount     =   2
               BeginProperty Column00 
                  DataField       =   ""
                  Caption         =   ""
                  BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                     Type            =   0
                     Format          =   ""
                     HaveTrueFalseNull=   0
                     FirstDayOfWeek  =   0
                     FirstWeekOfYear =   0
                     LCID            =   2052
                     SubFormatType   =   0
                  EndProperty
               EndProperty
               BeginProperty Column01 
                  DataField       =   ""
                  Caption         =   ""
                  BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
                     Type            =   0
                     Format          =   ""
                     HaveTrueFalseNull=   0
                     FirstDayOfWeek  =   0
                     FirstWeekOfYear =   0
                     LCID            =   2052
                     SubFormatType   =   0
                  EndProperty
               EndProperty
               SplitCount      =   1
               BeginProperty Split0 
                  BeginProperty Column00 
                  EndProperty
                  BeginProperty Column01 
                  EndProperty
               EndProperty
            End
         End
         Begin VB.Frame Frame2 
            Height          =   5655
            Left            =   360
            TabIndex        =   28
            Top             =   480
            Width           =   9855
            Begin VB.ComboBox Combo2 
               Appearance      =   0  'Flat
               DataField       =   "是否已停止"
               Height          =   300
               Left            =   1680
               TabIndex        =   18
               Top             =   4800
               Width           =   1695
            End
            Begin VB.TextBox txtFields 
               Appearance      =   0  'Flat
               DataField       =   "签定期限"
               Height          =   285
               Index           =   2
               Left            =   1680
               TabIndex        =   12
               Top             =   2768
               Width           =   1695
            End
            Begin VB.ComboBox Combo1 
               Appearance      =   0  'Flat
               DataField       =   "停止方式"
               Height          =   300
               Left            =   4800
               TabIndex        =   19
               Top             =   4800
               Width           =   1695
            End
            Begin MSComCtl2.DTPicker DTPicker1 
               DataField       =   "出生日期"
               BeginProperty DataFormat 
                  Type            =   1
                  Format          =   "yyyy""年""M""月""d""日"""
                  HaveTrueFalseNull=   0
                  FirstDayOfWeek  =   0
                  FirstWeekOfYear =   0
                  LCID            =   2052
                  SubFormatType   =   3
               EndProperty
               Height          =   300
               Left            =   4920
               TabIndex        =   4
               Top             =   832
               Width           =   1575
               _ExtentX        =   2778
               _ExtentY        =   529
               _Version        =   393216
               CheckBox        =   -1  'True
               DateIsNull      =   -1  'True
               Format          =   69271553
               CurrentDate     =   36189
            End
            Begin MSComCtl2.DTPicker DTPicker2 
               DataField       =   "签定时间"
               Height          =   300
               Left            =   7920
               TabIndex        =   11
               Top             =   2280
               Width           =   1695
               _ExtentX        =   2990
               _ExtentY        =   529
               _Version        =   393216
               CheckBox        =   -1  'True
               DateIsNull      =   -1  'True
               Format          =   69271553
               CurrentDate     =   36186
            End
            Begin VB.TextBox txtFields 
               Appearance      =   0  'Flat
               DataField       =   "劳动合同编号"
               Height          =   285
               Index           =   0
               Left            =   1680
               TabIndex        =   0
               Top             =   360
               Width           =   1695
            End
            Begin VB.TextBox txtFields 
               Appearance      =   0  'Flat
               DataField       =   "姓名"
               Height          =   285
               Index           =   1
               Left            =   4920
               TabIndex        =   1
               Top             =   360
               Width           =   1575

⌨️ 快捷键说明

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