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

📄 frmfamilydouble.frm

📁 一个国外的宾馆管理程序
💻 FRM
📖 第 1 页 / 共 3 页
字号:
            Caption         =   "Days Incurred"
            Height          =   195
            Left            =   480
            TabIndex        =   19
            Top             =   3360
            Width           =   990
         End
         Begin VB.Label lblDaysIncurred1 
            BackColor       =   &H00FFFFFF&
            BorderStyle     =   1  'Fixed Single
            Height          =   285
            Left            =   2280
            TabIndex        =   18
            Top             =   3360
            Width           =   3375
         End
         Begin VB.Label Label11 
            AutoSize        =   -1  'True
            Caption         =   "Date Out"
            Height          =   195
            Left            =   480
            TabIndex        =   17
            Top             =   3000
            Width           =   645
         End
         Begin VB.Label lblDateOut1 
            BackColor       =   &H00FFFFFF&
            BorderStyle     =   1  'Fixed Single
            Height          =   285
            Left            =   2280
            TabIndex        =   16
            Top             =   3000
            Width           =   3375
         End
         Begin VB.Label Label9 
            AutoSize        =   -1  'True
            Caption         =   "Date In"
            Height          =   195
            Left            =   480
            TabIndex        =   15
            Top             =   2640
            Width           =   525
         End
         Begin VB.Label lblDateIn1 
            BackColor       =   &H00FFFFFF&
            BorderStyle     =   1  'Fixed Single
            Height          =   285
            Left            =   2280
            TabIndex        =   14
            Top             =   2640
            Width           =   3375
         End
         Begin VB.Label Label7 
            AutoSize        =   -1  'True
            Caption         =   "Date Reserved"
            Height          =   195
            Left            =   480
            TabIndex        =   13
            Top             =   2280
            Width           =   1080
         End
         Begin VB.Label lblDateReserved1 
            BackColor       =   &H00FFFFFF&
            BorderStyle     =   1  'Fixed Single
            Height          =   285
            Left            =   2280
            TabIndex        =   12
            Top             =   2280
            Width           =   3375
         End
         Begin VB.Label Label5 
            AutoSize        =   -1  'True
            Caption         =   "Nationality"
            Height          =   195
            Left            =   480
            TabIndex        =   11
            Top             =   1920
            Width           =   735
         End
         Begin VB.Label Label4 
            AutoSize        =   -1  'True
            Caption         =   "Gender"
            Height          =   195
            Left            =   480
            TabIndex        =   10
            Top             =   1560
            Width           =   525
         End
         Begin VB.Label Label3 
            AutoSize        =   -1  'True
            Caption         =   "Age"
            Height          =   195
            Left            =   480
            TabIndex        =   9
            Top             =   1200
            Width           =   285
         End
         Begin VB.Label Label2 
            AutoSize        =   -1  'True
            Caption         =   "Address"
            Height          =   195
            Left            =   480
            TabIndex        =   8
            Top             =   840
            Width           =   570
         End
         Begin VB.Label Label1 
            AutoSize        =   -1  'True
            Caption         =   "Full Name"
            Height          =   195
            Left            =   480
            TabIndex        =   7
            Top             =   480
            Width           =   705
         End
      End
      Begin MSComctlLib.Toolbar Toolbar1 
         Height          =   810
         Left            =   120
         TabIndex        =   64
         Top             =   360
         Width           =   6330
         _ExtentX        =   11165
         _ExtentY        =   1429
         ButtonWidth     =   1535
         ButtonHeight    =   1376
         Appearance      =   1
         Style           =   1
         ImageList       =   "ImageList2"
         HotImageList    =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   6
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Reserved"
               Object.ToolTipText     =   "Reserve This Room"
               ImageIndex      =   1
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check In"
               Object.ToolTipText     =   "Check In"
               ImageIndex      =   2
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check Out"
               Object.ToolTipText     =   "Check Out"
               ImageIndex      =   3
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "New"
               Object.ToolTipText     =   "New Transaction"
               ImageIndex      =   4
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Cancel"
               Object.ToolTipText     =   "Cancel Transaction"
               ImageIndex      =   5
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Close"
               Object.ToolTipText     =   "Close This Window"
               ImageIndex      =   6
            EndProperty
         EndProperty
         BorderStyle     =   1
      End
      Begin MSComctlLib.Toolbar Toolbar2 
         Height          =   795
         Left            =   -74880
         TabIndex        =   65
         Top             =   360
         Width           =   6330
         _ExtentX        =   11165
         _ExtentY        =   1402
         ButtonWidth     =   1852
         ButtonHeight    =   1349
         Appearance      =   1
         Style           =   1
         ImageList       =   "ImageList2"
         HotImageList    =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   6
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Reserved"
               Object.ToolTipText     =   "Reserve This Room"
               ImageIndex      =   1
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check In"
               Object.ToolTipText     =   "Check In"
               ImageIndex      =   2
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check Out"
               Object.ToolTipText     =   "Check Out"
               ImageIndex      =   3
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "New"
               Object.ToolTipText     =   "New Transaction"
               ImageIndex      =   4
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Cancel"
               Object.ToolTipText     =   "Cancel Transaction"
               ImageIndex      =   5
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Close"
               Object.ToolTipText     =   "Close This Window"
               ImageIndex      =   6
            EndProperty
         EndProperty
         BorderStyle     =   1
      End
      Begin MSComctlLib.Toolbar Toolbar3 
         Height          =   795
         Left            =   -74880
         TabIndex        =   66
         Top             =   360
         Width           =   6330
         _ExtentX        =   11165
         _ExtentY        =   1402
         ButtonWidth     =   1852
         ButtonHeight    =   1349
         Appearance      =   1
         Style           =   1
         ImageList       =   "ImageList2"
         HotImageList    =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   6
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Reserved"
               Object.ToolTipText     =   "Reserve This Room"
               ImageIndex      =   1
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check In"
               Object.ToolTipText     =   "Check In"
               ImageIndex      =   2
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Check Out"
               Object.ToolTipText     =   "Check Out"
               ImageIndex      =   3
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "New"
               Object.ToolTipText     =   "New Transaction"
               ImageIndex      =   4
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Cancel"
               Object.ToolTipText     =   "Cancel Transaction"
               ImageIndex      =   5
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "Close"
               Object.ToolTipText     =   "Close This Window"
               ImageIndex      =   6
            EndProperty
         EndProperty
         BorderStyle     =   1
      End
   End
   Begin MSComctlLib.ImageList ImageList2 
      Left            =   120
      Top             =   5760
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      ImageWidth      =   32
      ImageHeight     =   32
      MaskColor       =   12632256
      _Version        =   393216
      BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
         NumListImages   =   6
         BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":0972
            Key             =   ""
         EndProperty
         BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":124E
            Key             =   ""
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":1B2A
            Key             =   ""
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":2406
            Key             =   ""
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":2CE2
            Key             =   ""
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "frmFamilyDouble.frx":35BE
            Key             =   ""
         EndProperty
      EndProperty
   End
End
Attribute VB_Name = "frmFamilyDouble"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
Top = 0
Left = 5000
End Sub

⌨️ 快捷键说明

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