ordersform.designer.vb

来自「wrox出版社的另一套经典的VB2005数据库编程学习书籍,收集了书中源码,郑重」· VB 代码 · 共 805 行 · 第 1/3 页

VB
805
字号
        Me.cboCustomerID.Name = "cboCustomerID"
        Me.cboCustomerID.Size = New System.Drawing.Size(75, 25)
        Me.cboCustomerID.ToolTipText = "Sel"
        '
        'FillByCustomerIDToolStripButton
        '
        Me.FillByCustomerIDToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.FillByCustomerIDToolStripButton.Name = "FillByCustomerIDToolStripButton"
        Me.FillByCustomerIDToolStripButton.Size = New System.Drawing.Size(64, 22)
        Me.FillByCustomerIDToolStripButton.Text = "Get &Orders"
        Me.FillByCustomerIDToolStripButton.ToolTipText = "Select a Customer ID"
        '
        'ToolStripSeparator1
        '
        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
        '
        'SaveDataToolStripButton
        '
        Me.SaveDataToolStripButton.Image = CType(resources.GetObject("SaveDataToolStripButton.Image"), System.Drawing.Image)
        Me.SaveDataToolStripButton.Name = "SaveDataToolStripButton"
        Me.SaveDataToolStripButton.Size = New System.Drawing.Size(77, 22)
        Me.SaveDataToolStripButton.Text = "&Save Data"
        '
        'EditCustomerDataToolStripButton
        '
        Me.EditCustomerDataToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.EditCustomerDataToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.EditCustomerDataToolStripButton.Name = "EditCustomerDataToolStripButton"
        Me.EditCustomerDataToolStripButton.Size = New System.Drawing.Size(104, 22)
        Me.EditCustomerDataToolStripButton.Text = "&Edit Customer Data"
        '
        'NewCustomerToolStripButton
        '
        Me.NewCustomerToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.NewCustomerToolStripButton.Image = CType(resources.GetObject("NewCustomerToolStripButton.Image"), System.Drawing.Image)
        Me.NewCustomerToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.NewCustomerToolStripButton.Name = "NewCustomerToolStripButton"
        Me.NewCustomerToolStripButton.Size = New System.Drawing.Size(103, 22)
        Me.NewCustomerToolStripButton.Text = "&Add New Customer"
        '
        'CancelEditToolStripButton
        '
        Me.CancelEditToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.CancelEditToolStripButton.Image = CType(resources.GetObject("CancelEditToolStripButton.Image"), System.Drawing.Image)
        Me.CancelEditToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.CancelEditToolStripButton.Name = "CancelEditToolStripButton"
        Me.CancelEditToolStripButton.Size = New System.Drawing.Size(64, 17)
        Me.CancelEditToolStripButton.Text = "&Cancel Edit"
        '
        'CustomersTableAdapter
        '
        Me.CustomersTableAdapter.ClearBeforeFill = True
        '
        'OrdersTableAdapter
        '
        Me.OrdersTableAdapter.ClearBeforeFill = True
        '
        'Order_DetailsTableAdapter
        '
        Me.Order_DetailsTableAdapter.ClearBeforeFill = True
        '
        'OrdersToolStrip
        '
        Me.OrdersToolStrip.Dock = System.Windows.Forms.DockStyle.Bottom
        Me.OrdersToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EditOrdersToolStripButton, Me.SaveOrdersToolStripButton, Me.ToolStripButton3})
        Me.OrdersToolStrip.Location = New System.Drawing.Point(0, 475)
        Me.OrdersToolStrip.Name = "OrdersToolStrip"
        Me.OrdersToolStrip.Size = New System.Drawing.Size(513, 25)
        Me.OrdersToolStrip.TabIndex = 26
        Me.OrdersToolStrip.Text = "ToolStrip1"
        '
        'EditOrdersToolStripButton
        '
        Me.EditOrdersToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.EditOrdersToolStripButton.Image = CType(resources.GetObject("EditOrdersToolStripButton.Image"), System.Drawing.Image)
        Me.EditOrdersToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.EditOrdersToolStripButton.Name = "EditOrdersToolStripButton"
        Me.EditOrdersToolStripButton.Size = New System.Drawing.Size(65, 22)
        Me.EditOrdersToolStripButton.Text = "Edit O&rders"
        '
        'SaveOrdersToolStripButton
        '
        Me.SaveOrdersToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.SaveOrdersToolStripButton.Image = CType(resources.GetObject("SaveOrdersToolStripButton.Image"), System.Drawing.Image)
        Me.SaveOrdersToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.SaveOrdersToolStripButton.Name = "SaveOrdersToolStripButton"
        Me.SaveOrdersToolStripButton.Size = New System.Drawing.Size(71, 22)
        Me.SaveOrdersToolStripButton.Text = "Sa&ve Orders"
        '
        'ToolStripButton3
        '
        Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
        Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton3.Name = "ToolStripButton3"
        Me.ToolStripButton3.Size = New System.Drawing.Size(100, 22)
        Me.ToolStripButton3.Text = "Cancel Orders Edi&t"
        '
        'CustomerIDTextBox
        '
        Me.CustomerIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "CustomerID", True))
        Me.CustomerIDTextBox.Location = New System.Drawing.Point(270, 146)
        Me.CustomerIDTextBox.Name = "CustomerIDTextBox"
        Me.CustomerIDTextBox.Size = New System.Drawing.Size(52, 20)
        Me.CustomerIDTextBox.TabIndex = 29
        Me.CustomerIDTextBox.Visible = False
        '
        'CustomerIDLabel
        '
        Me.CustomerIDLabel.AutoSize = True
        Me.CustomerIDLabel.Location = New System.Drawing.Point(205, 149)
        Me.CustomerIDLabel.Name = "CustomerIDLabel"
        Me.CustomerIDLabel.Size = New System.Drawing.Size(68, 13)
        Me.CustomerIDLabel.TabIndex = 30
        Me.CustomerIDLabel.Text = "Customer ID:"
        Me.CustomerIDLabel.Visible = False
        '
        'btnSelectOrdersDGV
        '
        Me.btnSelectOrdersDGV.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
        Me.btnSelectOrdersDGV.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnSelectOrdersDGV.Location = New System.Drawing.Point(6, 166)
        Me.btnSelectOrdersDGV.Name = "btnSelectOrdersDGV"
        Me.btnSelectOrdersDGV.Size = New System.Drawing.Size(81, 22)
        Me.btnSelectOrdersDGV.TabIndex = 31
        Me.btnSelectOrdersDGV.Text = "Orders &Grid"
        '
        'btnSelectOrderDetails
        '
        Me.btnSelectOrderDetails.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
        Me.btnSelectOrderDetails.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnSelectOrderDetails.Location = New System.Drawing.Point(6, 313)
        Me.btnSelectOrderDetails.Name = "btnSelectOrderDetails"
        Me.btnSelectOrderDetails.Size = New System.Drawing.Size(111, 22)
        Me.btnSelectOrderDetails.TabIndex = 32
        Me.btnSelectOrderDetails.Text = "Order &Details Grid"
        '
        'OrdersForm
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.AutoScroll = True
        Me.ClientSize = New System.Drawing.Size(513, 500)
        Me.Controls.Add(Me.CustomerIDTextBox)
        Me.Controls.Add(Me.Order_DetailsDataGridView)
        Me.Controls.Add(Me.OrdersDataGridView)
        Me.Controls.Add(CompanyNameLabel)
        Me.Controls.Add(Me.CompanyNameTextBox)
        Me.Controls.Add(ContactNameLabel)
        Me.Controls.Add(Me.ContactNameTextBox)
        Me.Controls.Add(ContactTitleLabel)
        Me.Controls.Add(Me.ContactTitleTextBox)
        Me.Controls.Add(AddressLabel)
        Me.Controls.Add(Me.AddressTextBox)
        Me.Controls.Add(CityLabel)
        Me.Controls.Add(Me.CityTextBox)
        Me.Controls.Add(RegionLabel)
        Me.Controls.Add(Me.RegionTextBox)
        Me.Controls.Add(PostalCodeLabel)
        Me.Controls.Add(Me.PostalCodeTextBox)
        Me.Controls.Add(CountryLabel)
        Me.Controls.Add(Me.CountryTextBox)
        Me.Controls.Add(PhoneLabel)
        Me.Controls.Add(Me.PhoneTextBox)
        Me.Controls.Add(FaxLabel)
        Me.Controls.Add(Me.FaxTextBox)
        Me.Controls.Add(Me.FillByCustomerIDToolStrip)
        Me.Controls.Add(Me.OrdersToolStrip)
        Me.Controls.Add(Me.CustomerIDLabel)
        Me.Controls.Add(Me.btnSelectOrdersDGV)
        Me.Controls.Add(Me.btnSelectOrderDetails)
        Me.Name = "OrdersForm"
        Me.Text = "Northwind Orders by Customer - Enhanced Version 2"
        CType(Me.CustomersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.NorthwindDataSet, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.OrdersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.OrdersDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Order_DetailsBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Order_DetailsDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        Me.FillByCustomerIDToolStrip.ResumeLayout(False)
        Me.FillByCustomerIDToolStrip.PerformLayout()
        Me.OrdersToolStrip.ResumeLayout(False)
        Me.OrdersToolStrip.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents CompanyNameTextBox As System.Windows.Forms.TextBox
    Friend WithEvents ContactNameTextBox As System.Windows.Forms.TextBox
    Friend WithEvents ContactTitleTextBox As System.Windows.Forms.TextBox
    Friend WithEvents AddressTextBox As System.Windows.Forms.TextBox
    Friend WithEvents CityTextBox As System.Windows.Forms.TextBox
    Friend WithEvents RegionTextBox As System.Windows.Forms.TextBox
    Friend WithEvents PostalCodeTextBox As System.Windows.Forms.TextBox
    Friend WithEvents CountryTextBox As System.Windows.Forms.TextBox
    Friend WithEvents PhoneTextBox As System.Windows.Forms.TextBox
    Friend WithEvents FaxTextBox As System.Windows.Forms.TextBox
    Friend WithEvents OrdersBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents OrdersDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents Order_DetailsBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents Order_DetailsDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents FillByCustomerIDToolStrip As System.Windows.Forms.ToolStrip
    Friend WithEvents CustomerIDToolStripLabel As System.Windows.Forms.ToolStripLabel
    Friend WithEvents FillByCustomerIDToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents cboCustomerID As System.Windows.Forms.ToolStripComboBox
    Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents SaveDataToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents CustomersBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents NorthwindDataSet As OrdersByCustomersV1.NorthwindDataSet
    Friend WithEvents CustomersTableAdapter As OrdersByCustomersV1.NorthwindDataSetTableAdapters.CustomersTableAdapter
    Friend WithEvents OrdersTableAdapter As OrdersByCustomersV1.NorthwindDataSetTableAdapters.OrdersTableAdapter
    Friend WithEvents Order_DetailsTableAdapter As OrdersByCustomersV1.NorthwindDataSetTableAdapters.Order_DetailsTableAdapter
    Friend WithEvents DataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn7 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn8 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn9 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn10 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn11 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn12 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn13 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn14 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn15 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn18 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn16 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn17 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn19 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DataGridViewTextBoxColumn20 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents EditCustomerDataToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents NewCustomerToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents CancelEditToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents OrdersToolStrip As System.Windows.Forms.ToolStrip
    Friend WithEvents EditOrdersToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents SaveOrdersToolStripButton As System.Windows.Forms.ToolStripButton
    Friend WithEvents ToolStripButton3 As System.Windows.Forms.ToolStripButton
    Friend WithEvents CustomerIDTextBox As System.Windows.Forms.TextBox
    Friend WithEvents CustomerIDLabel As System.Windows.Forms.Label
    Friend WithEvents btnSelectOrdersDGV As System.Windows.Forms.Button
    Friend WithEvents btnSelectOrderDetails As System.Windows.Forms.Button
    Friend WithEvents tbcOrderID As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents CustomerID As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents EmployeeID As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents OrderDate As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents RequiredDate As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShippedDate As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipVia As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Freight As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipName As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipAddress As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipCity As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipRegion As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipPostalCode As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipCountry As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents OrderID As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Quantity As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ProductID As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents UnitPrice As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Discount As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Extended As System.Windows.Forms.DataGridViewTextBoxColumn

End Class

⌨️ 快捷键说明

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