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 + -
显示快捷键?