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

📄 frm客房标准管理.frm

📁 可以完成宾馆的日常管理功能,例如订房,登记,入住,结帐,和打印报表等
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frm客房标准管理 
   BackColor       =   &H80000013&
   Caption         =   "客房标准管理"
   ClientHeight    =   7485
   ClientLeft      =   60
   ClientTop       =   450
   ClientWidth     =   10230
   Icon            =   "frm客房标准管理.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   ScaleHeight     =   7485
   ScaleWidth      =   10230
   StartUpPosition =   2  '屏幕中心
   Begin TabDlg.SSTab SSTab1 
      Height          =   3975
      Left            =   120
      TabIndex        =   1
      Top             =   3360
      Width           =   9975
      _ExtentX        =   17595
      _ExtentY        =   7011
      _Version        =   393216
      TabHeight       =   520
      BackColor       =   -2147483629
      ForeColor       =   -2147483640
      TabCaption(0)   =   "添加客房标准"
      TabPicture(0)   =   "frm客房标准管理.frx":058A
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).Control(0)=   "Picture2"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).Control(1)=   "Picture3(0)"
      Tab(0).Control(1).Enabled=   0   'False
      Tab(0).ControlCount=   2
      TabCaption(1)   =   "修改客房标准"
      TabPicture(1)   =   "frm客房标准管理.frx":05A6
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Picture3(1)"
      Tab(1).Control(1)=   "Picture4"
      Tab(1).ControlCount=   2
      TabCaption(2)   =   "删除客房标准"
      TabPicture(2)   =   "frm客房标准管理.frx":05C2
      Tab(2).ControlEnabled=   0   'False
      Tab(2).Control(0)=   "Picture5"
      Tab(2).Control(1)=   "Picture3(2)"
      Tab(2).ControlCount=   2
      Begin VB.PictureBox Picture5 
         BackColor       =   &H80000013&
         Height          =   3495
         Left            =   -74880
         ScaleHeight     =   3435
         ScaleWidth      =   8235
         TabIndex        =   49
         Top             =   360
         Width           =   8295
         Begin VB.TextBox Text9 
            Height          =   375
            Left            =   1560
            TabIndex        =   57
            Top             =   2760
            Width           =   1335
         End
         Begin VB.TextBox Text8 
            Height          =   375
            Left            =   1560
            TabIndex        =   56
            Top             =   960
            Width           =   1335
         End
         Begin VB.ComboBox Combo15 
            Height          =   300
            ItemData        =   "frm客房标准管理.frx":05DE
            Left            =   5880
            List            =   "frm客房标准管理.frx":05E8
            TabIndex        =   55
            Top             =   2760
            Width           =   1335
         End
         Begin VB.TextBox Text7 
            Height          =   375
            Left            =   1560
            TabIndex        =   54
            Top             =   120
            Width           =   1335
         End
         Begin VB.ComboBox Combo14 
            Height          =   300
            ItemData        =   "frm客房标准管理.frx":05F4
            Left            =   5880
            List            =   "frm客房标准管理.frx":05FE
            TabIndex        =   53
            Top             =   1920
            Width           =   1335
         End
         Begin VB.ComboBox Combo13 
            Height          =   300
            ItemData        =   "frm客房标准管理.frx":060A
            Left            =   5880
            List            =   "frm客房标准管理.frx":0614
            TabIndex        =   52
            Top             =   1080
            Width           =   1335
         End
         Begin VB.ComboBox Combo12 
            Height          =   300
            ItemData        =   "frm客房标准管理.frx":0620
            Left            =   5880
            List            =   "frm客房标准管理.frx":062A
            TabIndex        =   51
            Top             =   240
            Width           =   1335
         End
         Begin VB.ComboBox Combo11 
            Height          =   300
            ItemData        =   "frm客房标准管理.frx":0636
            Left            =   1560
            List            =   "frm客房标准管理.frx":0638
            TabIndex        =   50
            Top             =   1920
            Width           =   1335
         End
         Begin VB.Label Label27 
            BackColor       =   &H80000013&
            Caption         =   "标准编号:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   480
            TabIndex        =   66
            Top             =   240
            Width           =   1575
         End
         Begin VB.Label Label26 
            BackColor       =   &H80000013&
            Caption         =   "标准名称:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   495
            Left            =   480
            TabIndex        =   65
            Top             =   1080
            Width           =   2175
         End
         Begin VB.Label Label25 
            BackColor       =   &H80000013&
            Caption         =   "床位数量:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   495
            Left            =   480
            TabIndex        =   64
            Top             =   2040
            Width           =   1695
         End
         Begin VB.Label Label24 
            BackColor       =   &H80000013&
            Caption         =   "房间单价:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   480
            TabIndex        =   63
            Top             =   2880
            Width           =   1815
         End
         Begin VB.Label Label23 
            BackColor       =   &H80000013&
            Caption         =   "是否有空调:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   4200
            TabIndex        =   62
            Top             =   360
            Width           =   1815
         End
         Begin VB.Label Label22 
            BackColor       =   &H80000013&
            Caption         =   "是否有电话:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   4200
            TabIndex        =   61
            Top             =   1200
            Width           =   2055
         End
         Begin VB.Label Label21 
            BackColor       =   &H80000013&
            Caption         =   "是否有电视:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   4200
            TabIndex        =   60
            Top             =   2040
            Width           =   2055
         End
         Begin VB.Label Label20 
            BackColor       =   &H80000013&
            Caption         =   "是否有卫生间:"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   4200
            TabIndex        =   59
            Top             =   2880
            Width           =   1935
         End
         Begin VB.Label Label19 
            BackColor       =   &H80000013&
            Caption         =   "/天"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   3000
            TabIndex        =   58
            Top             =   2880
            Width           =   855
         End
      End
      Begin VB.PictureBox Picture3 
         BackColor       =   &H80000013&
         Height          =   3495
         Index           =   2
         Left            =   -66600
         ScaleHeight     =   3435
         ScaleWidth      =   1395
         TabIndex        =   46
         Top             =   360
         Width           =   1455
         Begin VB.CommandButton Command7 
            BackColor       =   &H0000FFFF&
            Caption         =   "删除"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   855
            Left            =   360
            Picture         =   "frm客房标准管理.frx":063A
            Style           =   1  'Graphical
            TabIndex        =   48
            Top             =   360
            Width           =   735
         End
         Begin VB.CommandButton Command6 
            BackColor       =   &H0000FF00&
            Caption         =   "返回"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   855
            Left            =   360
            Picture         =   "frm客房标准管理.frx":0A7C
            Style           =   1  'Graphical
            TabIndex        =   47
            Top             =   2160
            Width           =   735
         End
      End
      Begin VB.PictureBox Picture4 
         BackColor       =   &H80000013&
         FillColor       =   &H80000013&
         Height          =   3495
         Left            =   -74880
         ScaleHeight     =   3435
         ScaleWidth      =   8235
         TabIndex        =   25
         Top             =   360
         Width           =   8295
         Begin VB.TextBox Text6 
            Height          =   375
            Left            =   1560
            TabIndex        =   33

⌨️ 快捷键说明

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