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

📄 frmoptions.frm

📁 星级酒店管理系统VB源代码
💻 FRM
📖 第 1 页 / 共 3 页
字号:
            Left            =   60
            TabIndex        =   79
            Top             =   3075
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "办公电话:"
            Height          =   255
            Index           =   7
            Left            =   2625
            TabIndex        =   78
            Top             =   1695
            Width           =   1815
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "电话:"
            Height          =   255
            Index           =   6
            Left            =   2625
            TabIndex        =   77
            Top             =   1320
            Width           =   1815
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "住址:"
            Height          =   255
            Index           =   5
            Left            =   180
            TabIndex        =   76
            Top             =   1995
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "信用卡号:"
            Height          =   255
            Index           =   4
            Left            =   180
            TabIndex        =   75
            Top             =   1665
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "驾驶照号:"
            Height          =   255
            Index           =   3
            Left            =   180
            TabIndex        =   74
            Top             =   1350
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "身份证号:"
            Height          =   255
            Index           =   2
            Left            =   180
            TabIndex        =   73
            Top             =   990
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "您的单位:"
            Height          =   255
            Index           =   1
            Left            =   180
            TabIndex        =   72
            Top             =   630
            Width           =   975
         End
         Begin VB.Label lblFieldLabel 
            Alignment       =   1  'Right Justify
            AutoSize        =   -1  'True
            Caption         =   "您的名字:"
            Height          =   255
            Index           =   0
            Left            =   180
            TabIndex        =   71
            Top             =   300
            Width           =   975
         End
      End
      Begin VB.Frame Frame3 
         Caption         =   "[自动存档设置]"
         Height          =   1155
         Left            =   -74880
         TabIndex        =   47
         Top             =   3660
         Width           =   8595
         Begin MSComCtl2.DTPicker DTPicker3 
            Bindings        =   "frmOptions.frx":008A
            DataField       =   "最后归档时间"
            BeginProperty DataFormat 
               Type            =   1
               Format          =   "HH:mm"
               HaveTrueFalseNull=   0
               FirstDayOfWeek  =   0
               FirstWeekOfYear =   0
               LCID            =   2052
               SubFormatType   =   4
            EndProperty
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   6780
            TabIndex        =   55
            Top             =   660
            Width           =   1695
            _ExtentX        =   2990
            _ExtentY        =   556
            _Version        =   393216
            Format          =   23920642
            CurrentDate     =   36951
         End
         Begin MSComCtl2.DTPicker DTPicker2 
            Bindings        =   "frmOptions.frx":009F
            DataField       =   "建立结束日期"
            BeginProperty DataFormat 
               Type            =   1
               Format          =   "yyyy/M/d"
               HaveTrueFalseNull=   0
               FirstDayOfWeek  =   0
               FirstWeekOfYear =   0
               LCID            =   2052
               SubFormatType   =   3
            EndProperty
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   5280
            TabIndex        =   54
            Top             =   660
            Width           =   1095
            _ExtentX        =   1931
            _ExtentY        =   556
            _Version        =   393216
            Format          =   23920640
            CurrentDate     =   36951
         End
         Begin MSComCtl2.DTPicker DTPicker1 
            Bindings        =   "frmOptions.frx":00B4
            DataField       =   "建立开始日期"
            BeginProperty DataFormat 
               Type            =   1
               Format          =   "dddddd"
               HaveTrueFalseNull=   0
               FirstDayOfWeek  =   0
               FirstWeekOfYear =   0
               LCID            =   2052
               SubFormatType   =   0
            EndProperty
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   3780
            TabIndex        =   53
            Top             =   660
            Width           =   1215
            _ExtentX        =   2143
            _ExtentY        =   556
            _Version        =   393216
            Format          =   23920640
            CurrentDate     =   36951
         End
         Begin VB.TextBox Text16 
            DataField       =   "原磁盘位置"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   120
            TabIndex        =   52
            Text            =   "Text16"
            Top             =   660
            Width           =   3495
         End
         Begin VB.Label Label22 
            Caption         =   "自动归档时间:"
            Height          =   255
            Left            =   6900
            TabIndex        =   51
            Top             =   300
            Width           =   1515
         End
         Begin VB.Label Label21 
            Caption         =   "建立结束日期"
            Height          =   255
            Left            =   5220
            TabIndex        =   50
            Top             =   300
            Width           =   1395
         End
         Begin VB.Label Label13 
            Caption         =   "建立开始日期:"
            Height          =   315
            Left            =   3780
            TabIndex        =   49
            Top             =   300
            Width           =   1395
         End
         Begin VB.Label Label1 
            Caption         =   "文件位置:"
            Height          =   315
            Left            =   180
            TabIndex        =   48
            Top             =   300
            Width           =   1875
         End
      End
      Begin VB.Frame Frame2 
         BackColor       =   &H00C0C0C0&
         Caption         =   "[文档归档]"
         Height          =   3075
         Left            =   -74880
         TabIndex        =   16
         Top             =   480
         Width           =   8595
         Begin VB.ComboBox Combo2 
            Height          =   300
            ItemData        =   "frmOptions.frx":00C9
            Left            =   7200
            List            =   "frmOptions.frx":00D6
            TabIndex        =   33
            Top             =   960
            Width           =   1215
         End
         Begin VB.ComboBox Combo3 
            Height          =   300
            ItemData        =   "frmOptions.frx":00EC
            Left            =   7140
            List            =   "frmOptions.frx":00FC
            TabIndex        =   32
            Top             =   2040
            Width           =   1275
         End
         Begin VB.ComboBox Combo4 
            Height          =   300
            ItemData        =   "frmOptions.frx":0118
            Left            =   7140
            List            =   "frmOptions.frx":0128
            TabIndex        =   31
            Top             =   2400
            Width           =   1275
         End
         Begin VB.TextBox Text15 
            DataField       =   "标题"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   30
            Text            =   "Text1"
            Top             =   240
            Width           =   2955
         End
         Begin VB.TextBox Text2 
            DataField       =   "主题"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   29
            Text            =   "Text2"
            Top             =   600
            Width           =   2955
         End
         Begin VB.TextBox Text3 
            DataField       =   "作者"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   28
            Text            =   "Text3"
            Top             =   960
            Width           =   2955
         End
         Begin VB.TextBox Text4 
            DataField       =   "单位"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   27
            Text            =   "Text4"
            Top             =   1320
            Width           =   2955
         End
         Begin VB.TextBox Text5 
            DataField       =   "类别"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   26
            Text            =   "Text5"
            Top             =   1680
            Width           =   1395
         End
         Begin VB.TextBox Text6 
            DataField       =   "关键词"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   1200
            TabIndex        =   24
            Text            =   "Text6"
            Top             =   2040
            Width           =   2955
         End
         Begin VB.TextBox Text7 
            DataField       =   "内容简介"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   555
            Left            =   1200
            TabIndex        =   23
            Text            =   "Text7"
            Top             =   2400
            Width           =   2955
         End
         Begin VB.TextBox Text8 
            DataField       =   "版本号"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   5700
            TabIndex        =   22
            Text            =   "Text8"
            Top             =   600
            Width           =   2715
         End
         Begin VB.TextBox Text9 
            DataField       =   "语言"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   5700
            TabIndex        =   21
            Text            =   "Text9"
            Top             =   960
            Width           =   1275
         End
         Begin VB.TextBox Text10 
            DataField       =   "编写目的"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   5700
            TabIndex        =   20
            Text            =   "Text10"
            Top             =   1320
            Width           =   2715
         End
         Begin VB.TextBox Text12 
            DataField       =   "使用频率"
            DataMember      =   "自动归档表"
            DataSource      =   "DEDocuments"
            Height          =   315
            Left            =   5700
            TabIndex        =   19
            Text            =   "Text12"
            Top             =   2040

⌨️ 快捷键说明

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