form1.designer.vb

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

        'CustomersBindingSource
        '
        Me.CustomersBindingSource.DataMember = "Customers"
        Me.CustomersBindingSource.DataSource = Me.NorthwindDataSet
        '
        'NorthwindDataSet
        '
        Me.NorthwindDataSet.DataSetName = "NorthwindDataSet"
        '
        'ContactNameTextBox
        '
        Me.ContactNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "ContactName", True))
        Me.ContactNameTextBox.Location = New System.Drawing.Point(107, 65)
        Me.ContactNameTextBox.Name = "ContactNameTextBox"
        Me.ContactNameTextBox.Size = New System.Drawing.Size(215, 20)
        Me.ContactNameTextBox.TabIndex = 6
        '
        'ContactTitleTextBox
        '
        Me.ContactTitleTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "ContactTitle", True))
        Me.ContactTitleTextBox.Location = New System.Drawing.Point(107, 92)
        Me.ContactTitleTextBox.Name = "ContactTitleTextBox"
        Me.ContactTitleTextBox.Size = New System.Drawing.Size(215, 20)
        Me.ContactTitleTextBox.TabIndex = 8
        '
        'AddressTextBox
        '
        Me.AddressTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "Address", True))
        Me.AddressTextBox.Location = New System.Drawing.Point(107, 119)
        Me.AddressTextBox.Name = "AddressTextBox"
        Me.AddressTextBox.Size = New System.Drawing.Size(215, 20)
        Me.AddressTextBox.TabIndex = 10
        '
        'CityTextBox
        '
        Me.CityTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "City", True))
        Me.CityTextBox.Location = New System.Drawing.Point(107, 146)
        Me.CityTextBox.Name = "CityTextBox"
        Me.CityTextBox.Size = New System.Drawing.Size(100, 20)
        Me.CityTextBox.TabIndex = 12
        '
        'RegionTextBox
        '
        Me.RegionTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "Region", True))
        Me.RegionTextBox.Location = New System.Drawing.Point(393, 38)
        Me.RegionTextBox.Name = "RegionTextBox"
        Me.RegionTextBox.Size = New System.Drawing.Size(100, 20)
        Me.RegionTextBox.TabIndex = 14
        '
        'PostalCodeTextBox
        '
        Me.PostalCodeTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "PostalCode", True))
        Me.PostalCodeTextBox.Location = New System.Drawing.Point(393, 65)
        Me.PostalCodeTextBox.Name = "PostalCodeTextBox"
        Me.PostalCodeTextBox.Size = New System.Drawing.Size(100, 20)
        Me.PostalCodeTextBox.TabIndex = 16
        '
        'CountryTextBox
        '
        Me.CountryTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "Country", True))
        Me.CountryTextBox.Location = New System.Drawing.Point(393, 92)
        Me.CountryTextBox.Name = "CountryTextBox"
        Me.CountryTextBox.Size = New System.Drawing.Size(100, 20)
        Me.CountryTextBox.TabIndex = 18
        '
        'PhoneTextBox
        '
        Me.PhoneTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "Phone", True))
        Me.PhoneTextBox.Location = New System.Drawing.Point(393, 119)
        Me.PhoneTextBox.Name = "PhoneTextBox"
        Me.PhoneTextBox.Size = New System.Drawing.Size(100, 20)
        Me.PhoneTextBox.TabIndex = 20
        '
        'FaxTextBox
        '
        Me.FaxTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.CustomersBindingSource, "Fax", True))
        Me.FaxTextBox.Location = New System.Drawing.Point(393, 146)
        Me.FaxTextBox.Name = "FaxTextBox"
        Me.FaxTextBox.Size = New System.Drawing.Size(100, 20)
        Me.FaxTextBox.TabIndex = 22
        '
        'OrdersBindingSource
        '
        Me.OrdersBindingSource.DataMember = "FK_Orders_Customers"
        Me.OrdersBindingSource.DataSource = Me.CustomersBindingSource
        '
        'OrdersDataGridView
        '
        Me.OrdersDataGridView.AutoGenerateColumns = False
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn1)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn2)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn3)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn4)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn5)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn6)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn7)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn8)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn9)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn10)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn11)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn12)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn13)
        Me.OrdersDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn14)
        Me.OrdersDataGridView.DataSource = Me.OrdersBindingSource
        Me.OrdersDataGridView.Location = New System.Drawing.Point(20, 179)
        Me.OrdersDataGridView.Name = "OrdersDataGridView"
        Me.OrdersDataGridView.Size = New System.Drawing.Size(473, 133)
        Me.OrdersDataGridView.TabIndex = 23
        '
        'Order_DetailsBindingSource
        '
        Me.Order_DetailsBindingSource.DataMember = "FK_Order_Details_Orders"
        Me.Order_DetailsBindingSource.DataSource = Me.OrdersBindingSource
        '
        'Order_DetailsDataGridView
        '
        Me.Order_DetailsDataGridView.AutoGenerateColumns = False
        Me.Order_DetailsDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn15)
        Me.Order_DetailsDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn16)
        Me.Order_DetailsDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn17)
        Me.Order_DetailsDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn18)
        Me.Order_DetailsDataGridView.Columns.Add(Me.DataGridViewTextBoxColumn19)
        Me.Order_DetailsDataGridView.DataSource = Me.Order_DetailsBindingSource
        Me.Order_DetailsDataGridView.Location = New System.Drawing.Point(20, 328)
        Me.Order_DetailsDataGridView.Name = "Order_DetailsDataGridView"
        Me.Order_DetailsDataGridView.Size = New System.Drawing.Size(473, 135)
        Me.Order_DetailsDataGridView.TabIndex = 24
        '
        'DataGridViewTextBoxColumn15
        '
        Me.DataGridViewTextBoxColumn15.DataPropertyName = "OrderID"
        Me.DataGridViewTextBoxColumn15.HeaderText = "OrderID"
        Me.DataGridViewTextBoxColumn15.Name = "OrderID"
        '
        'DataGridViewTextBoxColumn16
        '
        Me.DataGridViewTextBoxColumn16.DataPropertyName = "ProductID"
        Me.DataGridViewTextBoxColumn16.HeaderText = "ProductID"
        Me.DataGridViewTextBoxColumn16.Name = "ProductID"
        '
        'DataGridViewTextBoxColumn17
        '
        Me.DataGridViewTextBoxColumn17.DataPropertyName = "UnitPrice"
        Me.DataGridViewTextBoxColumn17.HeaderText = "UnitPrice"
        Me.DataGridViewTextBoxColumn17.Name = "UnitPrice"
        '
        'DataGridViewTextBoxColumn18
        '
        Me.DataGridViewTextBoxColumn18.DataPropertyName = "Quantity"
        Me.DataGridViewTextBoxColumn18.HeaderText = "Quantity"
        Me.DataGridViewTextBoxColumn18.Name = "Quantity"
        '
        'DataGridViewTextBoxColumn19
        '
        Me.DataGridViewTextBoxColumn19.DataPropertyName = "Discount"
        Me.DataGridViewTextBoxColumn19.HeaderText = "Discount"
        Me.DataGridViewTextBoxColumn19.Name = "Discount"
        '
        'FillByCustomerIDToolStrip
        '
        Me.FillByCustomerIDToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CustomerIDToolStripLabel, Me.cboCustomerID, Me.FillByCustomerIDToolStripButton, Me.ToolStripSeparator1, Me.ToolStripButton3})
        Me.FillByCustomerIDToolStrip.Location = New System.Drawing.Point(0, 0)
        Me.FillByCustomerIDToolStrip.Name = "FillByCustomerIDToolStrip"
        Me.FillByCustomerIDToolStrip.Size = New System.Drawing.Size(513, 25)
        Me.FillByCustomerIDToolStrip.TabIndex = 25
        Me.FillByCustomerIDToolStrip.Text = "ToolStrip1"
        '
        'CustomerIDToolStripLabel
        '
        Me.CustomerIDToolStripLabel.Name = "CustomerIDToolStripLabel"
        Me.CustomerIDToolStripLabel.Text = "CustomerID:"
        '
        'cboCustomerID
        '
        Me.cboCustomerID.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.ImageAndText
        Me.cboCustomerID.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboCustomerID.Items.AddRange(New Object() {"ALFKI", "ANTON", "BERGS", "BOLID", "RATTC"})
        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.Text = "Get Orders"
        Me.FillByCustomerIDToolStripButton.ToolTipText = "Select a Customer ID"
        '
        'ToolStripSeparator1
        '
        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
        '
        'ToolStripButton3
        '
        Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image