frmordersmanager.vb

单机版餐饮服务系统,结合了SqlServer数据库

            Me.txtOrderAddress.Size = New System.Drawing.Size(176, 48)
            Me.txtOrderAddress.TabIndex = 22
            Me.txtOrderAddress.Text = ""
            '
            'lbOrderAddress
            '
            Me.lbOrderAddress.Location = New System.Drawing.Point(8, 248)
            Me.lbOrderAddress.Name = "lbOrderAddress"
            Me.lbOrderAddress.Size = New System.Drawing.Size(64, 21)
            Me.lbOrderAddress.TabIndex = 21
            Me.lbOrderAddress.Text = "外送地址"
            Me.lbOrderAddress.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'txtOrderTelphone
            '
            Me.txtOrderTelphone.BackColor = System.Drawing.Color.Cornsilk
            Me.txtOrderTelphone.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.txtOrderTelphone.Location = New System.Drawing.Point(80, 184)
            Me.txtOrderTelphone.Name = "txtOrderTelphone"
            Me.txtOrderTelphone.Size = New System.Drawing.Size(176, 21)
            Me.txtOrderTelphone.TabIndex = 20
            Me.txtOrderTelphone.Text = ""
            '
            'lbOrderTelphone
            '
            Me.lbOrderTelphone.Location = New System.Drawing.Point(8, 184)
            Me.lbOrderTelphone.Name = "lbOrderTelphone"
            Me.lbOrderTelphone.Size = New System.Drawing.Size(64, 21)
            Me.lbOrderTelphone.TabIndex = 19
            Me.lbOrderTelphone.Text = "联系电话"
            Me.lbOrderTelphone.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'txtOrderName
            '
            Me.txtOrderName.BackColor = System.Drawing.Color.Cornsilk
            Me.txtOrderName.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.txtOrderName.Location = New System.Drawing.Point(80, 152)
            Me.txtOrderName.Name = "txtOrderName"
            Me.txtOrderName.Size = New System.Drawing.Size(176, 21)
            Me.txtOrderName.TabIndex = 18
            Me.txtOrderName.Text = ""
            '
            'lbOrderPerson
            '
            Me.lbOrderPerson.Location = New System.Drawing.Point(8, 152)
            Me.lbOrderPerson.Name = "lbOrderPerson"
            Me.lbOrderPerson.Size = New System.Drawing.Size(72, 21)
            Me.lbOrderPerson.TabIndex = 17
            Me.lbOrderPerson.Text = "订单联系人"
            Me.lbOrderPerson.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'ProviderTables
            '
            Me.ProviderTables.BackColor = System.Drawing.Color.Cornsilk
            Me.ProviderTables.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.ProviderTables.CheckOnClick = True
            Me.ProviderTables.Location = New System.Drawing.Point(264, 88)
            Me.ProviderTables.Name = "ProviderTables"
            Me.ProviderTables.Size = New System.Drawing.Size(176, 210)
            Me.ProviderTables.TabIndex = 16
            '
            'OrderDateTime
            '
            Me.OrderDateTime.Location = New System.Drawing.Point(80, 88)
            Me.OrderDateTime.Name = "OrderDateTime"
            Me.OrderDateTime.Size = New System.Drawing.Size(176, 21)
            Me.OrderDateTime.TabIndex = 15
            '
            'lbOrderDate
            '
            Me.lbOrderDate.Location = New System.Drawing.Point(8, 88)
            Me.lbOrderDate.Name = "lbOrderDate"
            Me.lbOrderDate.Size = New System.Drawing.Size(64, 21)
            Me.lbOrderDate.TabIndex = 14
            Me.lbOrderDate.Text = "预订时间"
            Me.lbOrderDate.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'rdtOuterOrder
            '
            Me.rdtOuterOrder.FlatStyle = System.Windows.Forms.FlatStyle.Flat
            Me.rdtOuterOrder.Location = New System.Drawing.Point(136, 56)
            Me.rdtOuterOrder.Name = "rdtOuterOrder"
            Me.rdtOuterOrder.Size = New System.Drawing.Size(112, 24)
            Me.rdtOuterOrder.TabIndex = 13
            Me.rdtOuterOrder.Text = " 外 卖 预 订"
            '
            'rdtInnerOrder
            '
            Me.rdtInnerOrder.Checked = True
            Me.rdtInnerOrder.FlatStyle = System.Windows.Forms.FlatStyle.Flat
            Me.rdtInnerOrder.Location = New System.Drawing.Point(8, 56)
            Me.rdtInnerOrder.Name = "rdtInnerOrder"
            Me.rdtInnerOrder.TabIndex = 12
            Me.rdtInnerOrder.TabStop = True
            Me.rdtInnerOrder.Text = " 酒 宴 预 订"
            '
            'ExcuteDate
            '
            Me.ExcuteDate.Location = New System.Drawing.Point(80, 120)
            Me.ExcuteDate.Name = "ExcuteDate"
            Me.ExcuteDate.Size = New System.Drawing.Size(176, 21)
            Me.ExcuteDate.TabIndex = 11
            '
            'lbTablesList
            '
            Me.lbTablesList.Location = New System.Drawing.Point(264, 56)
            Me.lbTablesList.Name = "lbTablesList"
            Me.lbTablesList.Size = New System.Drawing.Size(72, 21)
            Me.lbTablesList.TabIndex = 9
            Me.lbTablesList.Text = "桌号列表"
            Me.lbTablesList.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'lbExcuteDate
            '
            Me.lbExcuteDate.Location = New System.Drawing.Point(8, 120)
            Me.lbExcuteDate.Name = "lbExcuteDate"
            Me.lbExcuteDate.Size = New System.Drawing.Size(64, 21)
            Me.lbExcuteDate.TabIndex = 6
            Me.lbExcuteDate.Text = "执行时间"
            Me.lbExcuteDate.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'txtOrderID
            '
            Me.txtOrderID.BackColor = System.Drawing.Color.Cornsilk
            Me.txtOrderID.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.txtOrderID.Location = New System.Drawing.Point(80, 16)
            Me.txtOrderID.Name = "txtOrderID"
            Me.txtOrderID.Size = New System.Drawing.Size(360, 21)
            Me.txtOrderID.TabIndex = 1
            Me.txtOrderID.Text = ""
            '
            'lbOrderID
            '
            Me.lbOrderID.Location = New System.Drawing.Point(8, 16)
            Me.lbOrderID.Name = "lbOrderID"
            Me.lbOrderID.Size = New System.Drawing.Size(64, 21)
            Me.lbOrderID.TabIndex = 0
            Me.lbOrderID.Text = "订单编码"
            Me.lbOrderID.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
            '
            'btnAdd
            '
            Me.btnAdd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
            Me.btnAdd.ForeColor = System.Drawing.Color.Navy
            Me.btnAdd.Location = New System.Drawing.Point(192, 304)
            Me.btnAdd.Name = "btnAdd"
            Me.btnAdd.Size = New System.Drawing.Size(64, 24)
            Me.btnAdd.TabIndex = 1
            Me.btnAdd.Text = "添加订单"
            '
            'btnOk
            '
            Me.btnOk.FlatStyle = System.Windows.Forms.FlatStyle.Flat
            Me.btnOk.ForeColor = System.Drawing.Color.Navy
            Me.btnOk.Location = New System.Drawing.Point(392, 376)
            Me.btnOk.Name = "btnOk"
            Me.btnOk.Size = New System.Drawing.Size(72, 24)
            Me.btnOk.TabIndex = 4
            Me.btnOk.Text = "确 定"
            '
            'btnQuery
            '
            Me.btnQuery.FlatStyle = System.Windows.Forms.FlatStyle.Flat
            Me.btnQuery.ForeColor = System.Drawing.Color.Navy
            Me.btnQuery.Location = New System.Drawing.Point(200, 304)
            Me.btnQuery.Name = "btnQuery"
            Me.btnQuery.Size = New System.Drawing.Size(72, 24)
            Me.btnQuery.TabIndex = 5
            Me.btnQuery.Text = "查询订单"
            '
            'QueryPages
            '
            Me.QueryPages.Controls.Add(Me.BillsPage)
            Me.QueryPages.Controls.Add(Me.BillsQueryPage)
            Me.QueryPages.Controls.Add(Me.OrdersPage)
            Me.QueryPages.Controls.Add(Me.OrdersQueryPage)
            Me.QueryPages.Location = New System.Drawing.Point(8, 8)
            Me.QueryPages.Multiline = True
            Me.QueryPages.Name = "QueryPages"
            Me.QueryPages.SelectedIndex = 0
            Me.QueryPages.ShowToolTips = True
            Me.QueryPages.Size = New System.Drawing.Size(456, 360)
            Me.QueryPages.TabIndex = 6
            '
            'BillsPage
            '
            Me.BillsPage.Controls.Add(Me.gpBillInfo)
            Me.BillsPage.ForeColor = System.Drawing.Color.Navy
            Me.BillsPage.Location = New System.Drawing.Point(4, 21)
            Me.BillsPage.Name = "BillsPage"
            Me.BillsPage.Size = New System.Drawing.Size(448, 335)
            Me.BillsPage.TabIndex = 2
            Me.BillsPage.Text = "帐单登记"
            Me.BillsPage.ToolTipText = "帐单登记"
            '
            'gpBillInfo
            '
            Me.gpBillInfo.Controls.Add(Me.cmbTables)
            Me.gpBillInfo.Controls.Add(Me.cmbRooms)
            Me.gpBillInfo.Controls.Add(Me.MenuList)
            Me.gpBillInfo.Controls.Add(Me.GroupBox3)
            Me.gpBillInfo.Controls.Add(Me.lbTableNum)
            Me.gpBillInfo.Controls.Add(Me.lbBillCode)
            Me.gpBillInfo.Controls.Add(Me.btnAddBill)
            Me.gpBillInfo.Dock = System.Windows.Forms.DockStyle.Fill
            Me.gpBillInfo.Location = New System.Drawing.Point(0, 0)
            Me.gpBillInfo.Name = "gpBillInfo"
            Me.gpBillInfo.Size = New System.Drawing.Size(448, 335)
            Me.gpBillInfo.TabIndex = 5
            Me.gpBillInfo.TabStop = False
            '
            'cmbTables
            '
            Me.cmbTables.BackColor = System.Drawing.Color.Cornsilk
            Me.cmbTables.ForeColor = System.Drawing.Color.Navy
            Me.cmbTables.Location = New System.Drawing.Point(88, 56)
            Me.cmbTables.Name = "cmbTables"
            Me.cmbTables.Size = New System.Drawing.Size(144, 20)
            Me.cmbTables.TabIndex = 7
            '
            'cmbRooms
            '
            Me.cmbRooms.BackColor = System.Drawing.Color.Cornsilk
            Me.cmbRooms.ForeColor = System.Drawing.Color.Navy
            Me.cmbRooms.Location = New System.Drawing.Point(88, 24)
            Me.cmbRooms.Name = "cmbRooms"
            Me.cmbRooms.Size = New System.Drawing.Size(144, 20)
            Me.cmbRooms.TabIndex = 6
            '
            'MenuList
            '
            Me.MenuList.BackColor = System.Drawing.Color.Cornsilk
            Me.MenuList.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            Me.MenuList.ForeColor = System.Drawing.Color.Navy
            Me.MenuList.ItemHeight = 12
            Me.MenuList.Location = New System.Drawing.Point(240, 24)
            Me.MenuList.Name = "MenuList"
            Me.MenuList.Size = New System.Drawing.Size(200, 86)
            Me.MenuList.TabIndex = 5
            '
            'GroupBox3
            '
            Me.GroupBox3.Controls.Add(Me.MenuGrid)
            Me.GroupBox3.Location = New System.Drawing.Point(8, 112)
            Me.GroupBox3.Name = "GroupBox3"
            Me.GroupBox3.Size = New System.Drawing.Size(432, 216)
            Me.GroupBox3.TabIndex = 4
            Me.GroupBox3.TabStop = False
            '
            'MenuGrid
            '
            Me.MenuGrid.AlternatingBackColor = System.Drawing.Color.Gainsboro
            Me.MenuGrid.BackColor = System.Drawing.Color.Silver
            Me.MenuGrid.CaptionBackColor = System.Drawing.Color.DarkSlateBlue
            Me.MenuGrid.CaptionFont = New System.Drawing.Font("Tahoma", 8.0!)