masterdetails.designer.vb

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

VB
687 行
字号
123
        '
        Me.OrderDateDataGridViewTextBoxColumn.DataPropertyName = "OrderDate"
        Me.OrderDateDataGridViewTextBoxColumn.HeaderText = "OrderDate"
        Me.OrderDateDataGridViewTextBoxColumn.Name = "OrderDate"
        Me.OrderDateDataGridViewTextBoxColumn.Width = 75
        '
        'RequiredDateDataGridViewTextBoxColumn
        '
        Me.RequiredDateDataGridViewTextBoxColumn.DataPropertyName = "RequiredDate"
        Me.RequiredDateDataGridViewTextBoxColumn.HeaderText = "RequiredDate"
        Me.RequiredDateDataGridViewTextBoxColumn.Name = "RequiredDate"
        Me.RequiredDateDataGridViewTextBoxColumn.Width = 92
        '
        'ShippedDateDataGridViewTextBoxColumn
        '
        Me.ShippedDateDataGridViewTextBoxColumn.DataPropertyName = "ShippedDate"
        Me.ShippedDateDataGridViewTextBoxColumn.HeaderText = "ShippedDate"
        Me.ShippedDateDataGridViewTextBoxColumn.Name = "ShippedDate"
        Me.ShippedDateDataGridViewTextBoxColumn.Width = 88
        '
        'ShipViaDataGridViewTextBoxColumn
        '
        Me.ShipViaDataGridViewTextBoxColumn.DataPropertyName = "ShipVia"
        Me.ShipViaDataGridViewTextBoxColumn.HeaderText = "ShipVia"
        Me.ShipViaDataGridViewTextBoxColumn.Name = "ShipVia"
        Me.ShipViaDataGridViewTextBoxColumn.Width = 62
        '
        'FreightDataGridViewTextBoxColumn
        '
        Me.FreightDataGridViewTextBoxColumn.DataPropertyName = "Freight"
        Me.FreightDataGridViewTextBoxColumn.HeaderText = "Freight"
        Me.FreightDataGridViewTextBoxColumn.Name = "Freight"
        Me.FreightDataGridViewTextBoxColumn.Width = 58
        '
        'ShipNameDataGridViewTextBoxColumn
        '
        Me.ShipNameDataGridViewTextBoxColumn.DataPropertyName = "ShipName"
        Me.ShipNameDataGridViewTextBoxColumn.HeaderText = "ShipName"
        Me.ShipNameDataGridViewTextBoxColumn.Name = "ShipName"
        Me.ShipNameDataGridViewTextBoxColumn.Width = 75
        '
        'ShipAddressDataGridViewTextBoxColumn
        '
        Me.ShipAddressDataGridViewTextBoxColumn.DataPropertyName = "ShipAddress"
        Me.ShipAddressDataGridViewTextBoxColumn.HeaderText = "ShipAddress"
        Me.ShipAddressDataGridViewTextBoxColumn.Name = "ShipAddress"
        Me.ShipAddressDataGridViewTextBoxColumn.Width = 85
        '
        'ShipCityDataGridViewTextBoxColumn
        '
        Me.ShipCityDataGridViewTextBoxColumn.DataPropertyName = "ShipCity"
        Me.ShipCityDataGridViewTextBoxColumn.HeaderText = "ShipCity"
        Me.ShipCityDataGridViewTextBoxColumn.Name = "ShipCity"
        Me.ShipCityDataGridViewTextBoxColumn.Width = 64
        '
        'ShipRegionDataGridViewTextBoxColumn
        '
        Me.ShipRegionDataGridViewTextBoxColumn.DataPropertyName = "ShipRegion"
        Me.ShipRegionDataGridViewTextBoxColumn.HeaderText = "ShipRegion"
        Me.ShipRegionDataGridViewTextBoxColumn.Name = "ShipRegion"
        Me.ShipRegionDataGridViewTextBoxColumn.Width = 81
        '
        'ShipPostalCodeDataGridViewTextBoxColumn
        '
        Me.ShipPostalCodeDataGridViewTextBoxColumn.DataPropertyName = "ShipPostalCode"
        Me.ShipPostalCodeDataGridViewTextBoxColumn.HeaderText = "ShipPostalCode"
        Me.ShipPostalCodeDataGridViewTextBoxColumn.Name = "ShipPostalCode"
        Me.ShipPostalCodeDataGridViewTextBoxColumn.Width = 101
        '
        'ShipCountryDataGridViewTextBoxColumn
        '
        Me.ShipCountryDataGridViewTextBoxColumn.DataPropertyName = "ShipCountry"
        Me.ShipCountryDataGridViewTextBoxColumn.HeaderText = "ShipCountry"
        Me.ShipCountryDataGridViewTextBoxColumn.Name = "ShipCountry"
        Me.ShipCountryDataGridViewTextBoxColumn.Width = 83
        '
        'Order_DetailsBindingSource
        '
        Me.Order_DetailsBindingSource.DataMember = "FK_Order_Details_Orders"
        Me.Order_DetailsBindingSource.DataSource = Me.OrdersBindingSource
        '
        'Order_DetailsTableAdapter
        '
        Me.Order_DetailsTableAdapter.ClearBeforeFill = True
        '
        'Order_DetailsDataGridView
        '
        Me.Order_DetailsDataGridView.AutoGenerateColumns = False
        Me.Order_DetailsDataGridView.Columns.Add(Me.OrderIDDataGridViewTextBoxColumn1)
        Me.Order_DetailsDataGridView.Columns.Add(Me.ProductIDDataGridViewTextBoxColumn)
        Me.Order_DetailsDataGridView.Columns.Add(Me.UnitPriceDataGridViewTextBoxColumn)
        Me.Order_DetailsDataGridView.Columns.Add(Me.QuantityDataGridViewTextBoxColumn)
        Me.Order_DetailsDataGridView.Columns.Add(Me.DiscountDataGridViewTextBoxColumn)
        Me.Order_DetailsDataGridView.DataSource = Me.Order_DetailsBindingSource
        Me.Order_DetailsDataGridView.Location = New System.Drawing.Point(16, 317)
        Me.Order_DetailsDataGridView.Name = "Order_DetailsDataGridView"
        Me.Order_DetailsDataGridView.Size = New System.Drawing.Size(317, 113)
        Me.Order_DetailsDataGridView.TabIndex = 43
        '
        'OrderIDDataGridViewTextBoxColumn1
        '
        Me.OrderIDDataGridViewTextBoxColumn1.DataPropertyName = "OrderID"
        Me.OrderIDDataGridViewTextBoxColumn1.HeaderText = "OrderID"
        Me.OrderIDDataGridViewTextBoxColumn1.Name = "OrderID"
        '
        'ProductIDDataGridViewTextBoxColumn
        '
        Me.ProductIDDataGridViewTextBoxColumn.DataPropertyName = "ProductID"
        Me.ProductIDDataGridViewTextBoxColumn.HeaderText = "ProductID"
        Me.ProductIDDataGridViewTextBoxColumn.Name = "ProductID"
        '
        'UnitPriceDataGridViewTextBoxColumn
        '
        Me.UnitPriceDataGridViewTextBoxColumn.DataPropertyName = "UnitPrice"
        Me.UnitPriceDataGridViewTextBoxColumn.HeaderText = "UnitPrice"
        Me.UnitPriceDataGridViewTextBoxColumn.Name = "UnitPrice"
        '
        'QuantityDataGridViewTextBoxColumn
        '
        Me.QuantityDataGridViewTextBoxColumn.DataPropertyName = "Quantity"
        Me.QuantityDataGridViewTextBoxColumn.HeaderText = "Quantity"
        Me.QuantityDataGridViewTextBoxColumn.Name = "Quantity"
        '
        'DiscountDataGridViewTextBoxColumn
        '
        Me.DiscountDataGridViewTextBoxColumn.DataPropertyName = "Discount"
        Me.DiscountDataGridViewTextBoxColumn.HeaderText = "Discount"
        Me.DiscountDataGridViewTextBoxColumn.Name = "Discount"
        '
        'frmMasterDetails
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(623, 444)
        Me.Controls.Add(Me.Order_DetailsDataGridView)
        Me.Controls.Add(Me.OrdersDataGridView)
        Me.Controls.Add(Me.PostalCodeTextBox)
        Me.Controls.Add(Me.CompanyNameTextBox)
        Me.Controls.Add(CustomerIDLabel)
        Me.Controls.Add(Me.CustomerIDTextBox)
        Me.Controls.Add(CompanyNameLabel)
        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(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.CustomersBindingNavigator)
        Me.Name = "frmMasterDetails"
        Me.Text = "Customers - Orders - Order Details Master-Details Form"
        CType(Me.NorthwindDataSet, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CustomersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CustomersBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
        Me.CustomersBindingNavigator.ResumeLayout(False)
        Me.CustomersBindingNavigator.PerformLayout()
        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.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents NorthwindDataSet As MasterDetailsForm.NorthwindDataSet
    Friend WithEvents CustomersBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents CustomersTableAdapter As MasterDetailsForm.NorthwindDataSetTableAdapters.CustomersTableAdapter
    Friend WithEvents bindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents bindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
    Friend WithEvents bindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
    Friend WithEvents bindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents bindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents bindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents bindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents CustomersBindingNavigator As System.Windows.Forms.BindingNavigator
    Friend WithEvents PostalCodeTextBox As System.Windows.Forms.TextBox
    Friend WithEvents CompanyNameTextBox As System.Windows.Forms.TextBox
    Friend WithEvents CustomerIDTextBox 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 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 OrdersTableAdapter As MasterDetailsForm.NorthwindDataSetTableAdapters.OrdersTableAdapter
    Friend WithEvents OrdersDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents OrderIDDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents CustomerIDDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents EmployeeIDDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents OrderDateDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents RequiredDateDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShippedDateDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipViaDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents FreightDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipNameDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipAddressDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipCityDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipRegionDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipPostalCodeDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ShipCountryDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Order_DetailsBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents Order_DetailsTableAdapter As MasterDetailsForm.NorthwindDataSetTableAdapters.Order_DetailsTableAdapter
    Friend WithEvents Order_DetailsDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents OrderIDDataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents ProductIDDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents UnitPriceDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents QuantityDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents DiscountDataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn

End Class
123

masterdetails.designer.vb - 源码说明

本页面展示了「wrox出版社的另一套经典的VB2005数据库编程学习书籍,收集了书中源码,郑重推荐,电子书,电子书下载」中的 masterdetails.designer.vb 源码文件，采用 VB 编程语言编写，共 687 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与VB2005相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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