frmcheckin.designer.vb

来自「This is a sample of login file in asp pa」· VB 代码 · 共 671 行 · 第 1/3 页

        Me.btnClose.Text = "Close"
        Me.btnClose.UseVisualStyleBackColor = True
        '
        'ImageList1
        '
        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
        Me.ImageList1.Images.SetKeyName(0, "Save.ico")
        Me.ImageList1.Images.SetKeyName(1, "cancel.ico")
        Me.ImageList1.Images.SetKeyName(2, "search2.ico")
        Me.ImageList1.Images.SetKeyName(3, "file_tmp.ico")
        Me.ImageList1.Images.SetKeyName(4, "New Folder.ico")
        Me.ImageList1.Images.SetKeyName(5, "Customer.ico")
        Me.ImageList1.Images.SetKeyName(6, "Close 2.ico")
        '
        'btnBooking
        '
        Me.btnBooking.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnBooking.ImageKey = "file_tmp.ico"
        Me.btnBooking.ImageList = Me.ImageList1
        Me.btnBooking.Location = New System.Drawing.Point(87, 23)
        Me.btnBooking.Name = "btnBooking"
        Me.btnBooking.Size = New System.Drawing.Size(75, 23)
        Me.btnBooking.TabIndex = 27
        Me.btnBooking.Text = "     Booking"
        Me.btnBooking.UseVisualStyleBackColor = True
        '
        'txtTotal
        '
        Me.txtTotal.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtTotal.Location = New System.Drawing.Point(127, 145)
        Me.txtTotal.Name = "txtTotal"
        Me.txtTotal.ReadOnly = True
        Me.txtTotal.Size = New System.Drawing.Size(255, 22)
        Me.txtTotal.TabIndex = 20
        '
        'GroupBox3
        '
        Me.GroupBox3.BackColor = System.Drawing.Color.Transparent
        Me.GroupBox3.Controls.Add(Me.txtTotal)
        Me.GroupBox3.Controls.Add(Me.txtPrepaid)
        Me.GroupBox3.Controls.Add(Me.Label13)
        Me.GroupBox3.Controls.Add(Me.txtRemain)
        Me.GroupBox3.Controls.Add(Me.txtAmount)
        Me.GroupBox3.Controls.Add(Me.Label12)
        Me.GroupBox3.Controls.Add(Me.Label14)
        Me.GroupBox3.Controls.Add(Me.txtFloor)
        Me.GroupBox3.Controls.Add(Me.Label11)
        Me.GroupBox3.Controls.Add(Me.Label15)
        Me.GroupBox3.Controls.Add(Me.cboRNum)
        Me.GroupBox3.Controls.Add(Me.Label10)
        Me.GroupBox3.Controls.Add(Me.cboRType)
        Me.GroupBox3.Controls.Add(Me.Label9)
        Me.GroupBox3.Location = New System.Drawing.Point(418, 12)
        Me.GroupBox3.Name = "GroupBox3"
        Me.GroupBox3.Size = New System.Drawing.Size(391, 231)
        Me.GroupBox3.TabIndex = 29
        Me.GroupBox3.TabStop = False
        Me.GroupBox3.Text = "Room's Information"
        '
        'Label14
        '
        Me.Label14.AutoSize = True
        Me.Label14.BackColor = System.Drawing.Color.Transparent
        Me.Label14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label14.Location = New System.Drawing.Point(47, 176)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(70, 16)
        Me.Label14.TabIndex = 23
        Me.Label14.Text = "PREPAID:"
        '
        'txtFloor
        '
        Me.txtFloor.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtFloor.Location = New System.Drawing.Point(127, 89)
        Me.txtFloor.Name = "txtFloor"
        Me.txtFloor.ReadOnly = True
        Me.txtFloor.Size = New System.Drawing.Size(255, 22)
        Me.txtFloor.TabIndex = 17
        '
        'Label11
        '
        Me.Label11.AutoSize = True
        Me.Label11.BackColor = System.Drawing.Color.Transparent
        Me.Label11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label11.Location = New System.Drawing.Point(75, 92)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(42, 16)
        Me.Label11.TabIndex = 17
        Me.Label11.Text = "Floor:"
        '
        'Label15
        '
        Me.Label15.AutoSize = True
        Me.Label15.BackColor = System.Drawing.Color.Transparent
        Me.Label15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label15.Location = New System.Drawing.Point(54, 204)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(63, 16)
        Me.Label15.TabIndex = 25
        Me.Label15.Text = "REMAIN:"
        '
        'cboRNum
        '
        Me.cboRNum.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboRNum.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboRNum.FormattingEnabled = True
        Me.cboRNum.Location = New System.Drawing.Point(127, 59)
        Me.cboRNum.Name = "cboRNum"
        Me.cboRNum.Size = New System.Drawing.Size(255, 24)
        Me.cboRNum.TabIndex = 3
        '
        'Label10
        '
        Me.Label10.AutoSize = True
        Me.Label10.BackColor = System.Drawing.Color.Transparent
        Me.Label10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label10.Location = New System.Drawing.Point(18, 62)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(99, 16)
        Me.Label10.TabIndex = 17
        Me.Label10.Text = "Room Number:"
        '
        'cboRType
        '
        Me.cboRType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboRType.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboRType.FormattingEnabled = True
        Me.cboRType.Location = New System.Drawing.Point(127, 29)
        Me.cboRType.Name = "cboRType"
        Me.cboRType.Size = New System.Drawing.Size(255, 24)
        Me.cboRType.TabIndex = 2
        '
        'Label9
        '
        Me.Label9.AutoSize = True
        Me.Label9.BackColor = System.Drawing.Color.Transparent
        Me.Label9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label9.Location = New System.Drawing.Point(34, 32)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(83, 16)
        Me.Label9.TabIndex = 9
        Me.Label9.Text = "Room Type:"
        '
        'GroupBox4
        '
        Me.GroupBox4.BackColor = System.Drawing.Color.Transparent
        Me.GroupBox4.Controls.Add(Me.btnClose)
        Me.GroupBox4.Controls.Add(Me.btnBooking)
        Me.GroupBox4.Controls.Add(Me.btnCheckIn)
        Me.GroupBox4.Location = New System.Drawing.Point(418, 314)
        Me.GroupBox4.Name = "GroupBox4"
        Me.GroupBox4.Size = New System.Drawing.Size(391, 60)
        Me.GroupBox4.TabIndex = 30
        Me.GroupBox4.TabStop = False
        '
        'btnCheckIn
        '
        Me.btnCheckIn.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnCheckIn.ImageKey = "Customer.ico"
        Me.btnCheckIn.ImageList = Me.ImageList1
        Me.btnCheckIn.Location = New System.Drawing.Point(6, 22)
        Me.btnCheckIn.Name = "btnCheckIn"
        Me.btnCheckIn.Size = New System.Drawing.Size(75, 23)
        Me.btnCheckIn.TabIndex = 26
        Me.btnCheckIn.Text = "    Check In"
        Me.btnCheckIn.UseVisualStyleBackColor = True
        '
        'btnSCustomer
        '
        Me.btnSCustomer.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnSCustomer.ImageKey = "search2.ico"
        Me.btnSCustomer.ImageList = Me.ImageList1
        Me.btnSCustomer.Location = New System.Drawing.Point(207, 201)
        Me.btnSCustomer.Name = "btnSCustomer"
        Me.btnSCustomer.Size = New System.Drawing.Size(75, 23)
        Me.btnSCustomer.TabIndex = 31
        Me.btnSCustomer.Text = "  Search"
        Me.btnSCustomer.UseVisualStyleBackColor = True
        '
        'txtCusID
        '
        Me.txtCusID.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtCusID.Location = New System.Drawing.Point(126, 60)
        Me.txtCusID.Name = "txtCusID"
        Me.txtCusID.ReadOnly = True
        Me.txtCusID.Size = New System.Drawing.Size(255, 22)
        Me.txtCusID.TabIndex = 16
        '
        'btnNew
        '
        Me.btnNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnNew.ImageKey = "file_tmp.ico"
        Me.btnNew.ImageList = Me.ImageList1
        Me.btnNew.Location = New System.Drawing.Point(126, 200)
        Me.btnNew.Name = "btnNew"
        Me.btnNew.Size = New System.Drawing.Size(75, 23)
        Me.btnNew.TabIndex = 30
        Me.btnNew.Text = "     New"
        Me.btnNew.UseVisualStyleBackColor = True
        '
        'Label16
        '
        Me.Label16.AutoSize = True
        Me.Label16.BackColor = System.Drawing.Color.Transparent
        Me.Label16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label16.Location = New System.Drawing.Point(33, 63)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(84, 16)
        Me.Label16.TabIndex = 17
        Me.Label16.Text = "Customer ID:"
        '
        'txtCardNo
        '
        Me.txtCardNo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtCardNo.Location = New System.Drawing.Point(126, 172)
        Me.txtCardNo.Name = "txtCardNo"
        Me.txtCardNo.ReadOnly = True