customers.designer.vb

来自「讲解visual studio的应用」· VB 代码 · 共 138 行

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class Customers
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing AndAlso components IsNot Nothing Then
            components.Dispose()
        End If
        MyBase.Dispose(disposing)
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer
    Private mainMenu1 As System.Windows.Forms.MainMenu

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container
        Dim Customer_IDDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
        Dim Company_NameDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
        Dim Contact_NameDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
        Dim Contact_TitleDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
        Me.mainMenu1 = New System.Windows.Forms.MainMenu
        Me.NewMenuItemMenuItem = New System.Windows.Forms.MenuItem
        Me.CustomersBindingSource = New System.Windows.Forms.BindingSource(Me.components)
        Me.NorthwindDataSet = New MobileNorthwind.NorthwindDataSet
        Me.CustomersDataGrid = New System.Windows.Forms.DataGrid
        Me.CustomersTableStyleDataGridTableStyle = New System.Windows.Forms.DataGridTableStyle
        Me.OrdersTableAdapter = New MobileNorthwind.NorthwindDataSetTableAdapters.OrdersTableAdapter
        Me.CustomersTableAdapter = New MobileNorthwind.NorthwindDataSetTableAdapters.CustomersTableAdapter
        Me.EmployeesTableAdapter = New MobileNorthwind.NorthwindDataSetTableAdapters.EmployeesTableAdapter
        Customer_IDDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
        Company_NameDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
        Contact_NameDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
        Contact_TitleDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
        Me.SuspendLayout()
        '
        'Customer_IDDataGridColumnStyleDataGridTextBoxColumn
        '
        Customer_IDDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Customer ID"
        Customer_IDDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Customer ID"
        '
        'Company_NameDataGridColumnStyleDataGridTextBoxColumn
        '
        Company_NameDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Company Name"
        Company_NameDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Company Name"
        Company_NameDataGridColumnStyleDataGridTextBoxColumn.Width = 150
        '
        'Contact_NameDataGridColumnStyleDataGridTextBoxColumn
        '
        Contact_NameDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Contact Name"
        Contact_NameDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Contact Name"
        '
        'Contact_TitleDataGridColumnStyleDataGridTextBoxColumn
        '
        Contact_TitleDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Contact Title"
        Contact_TitleDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Contact Title"
        '
        'mainMenu1
        '
        Me.mainMenu1.MenuItems.Add(Me.NewMenuItemMenuItem)
        '
        'NewMenuItemMenuItem
        '
        Me.NewMenuItemMenuItem.Text = "New"
        '
        'CustomersBindingSource
        '
        Me.CustomersBindingSource.DataMember = "Customers"
        Me.CustomersBindingSource.DataSource = Me.NorthwindDataSet
        '
        'NorthwindDataSet
        '
        Me.NorthwindDataSet.DataSetName = "NorthwindDataSet"
        Me.NorthwindDataSet.Prefix = ""
        Me.NorthwindDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
        '
        'CustomersDataGrid
        '
        Me.CustomersDataGrid.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
                    Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.CustomersDataGrid.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.CustomersDataGrid.DataSource = Me.CustomersBindingSource
        Me.CustomersDataGrid.Location = New System.Drawing.Point(3, 3)
        Me.CustomersDataGrid.Name = "CustomersDataGrid"
        Me.CustomersDataGrid.Size = New System.Drawing.Size(234, 230)
        Me.CustomersDataGrid.TabIndex = 0
        Me.CustomersDataGrid.TableStyles.Add(Me.CustomersTableStyleDataGridTableStyle)
        '
        'CustomersTableStyleDataGridTableStyle
        '
        Me.CustomersTableStyleDataGridTableStyle.GridColumnStyles.Add(Customer_IDDataGridColumnStyleDataGridTextBoxColumn)
        Me.CustomersTableStyleDataGridTableStyle.GridColumnStyles.Add(Company_NameDataGridColumnStyleDataGridTextBoxColumn)
        Me.CustomersTableStyleDataGridTableStyle.GridColumnStyles.Add(Contact_NameDataGridColumnStyleDataGridTextBoxColumn)
        Me.CustomersTableStyleDataGridTableStyle.GridColumnStyles.Add(Contact_TitleDataGridColumnStyleDataGridTextBoxColumn)
        Me.CustomersTableStyleDataGridTableStyle.MappingName = "Customers"
        '
        'OrdersTableAdapter
        '
        Me.OrdersTableAdapter.ClearBeforeFill = True
        '
        'CustomersTableAdapter
        '
        Me.CustomersTableAdapter.ClearBeforeFill = True
        '
        'EmployeesTableAdapter
        '
        Me.EmployeesTableAdapter.ClearBeforeFill = True
        '
        'Customers
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
        Me.AutoScroll = True
        Me.ClientSize = New System.Drawing.Size(240, 268)
        Me.Controls.Add(Me.CustomersDataGrid)
        Me.Menu = Me.mainMenu1
        Me.Name = "Customers"
        Me.Text = "Customers"
        Me.ResumeLayout(False)

    End Sub
    Friend WithEvents NorthwindDataSet As MobileNorthwind.NorthwindDataSet
    Friend WithEvents CustomersBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents CustomersDataGrid As System.Windows.Forms.DataGrid
    Friend WithEvents CustomersTableStyleDataGridTableStyle As System.Windows.Forms.DataGridTableStyle
    Friend WithEvents NewMenuItemMenuItem As System.Windows.Forms.MenuItem
    Friend WithEvents OrdersTableAdapter As MobileNorthwind.NorthwindDataSetTableAdapters.OrdersTableAdapter
    Friend WithEvents CustomersTableAdapter As MobileNorthwind.NorthwindDataSetTableAdapters.CustomersTableAdapter
    Friend WithEvents EmployeesTableAdapter As MobileNorthwind.NorthwindDataSetTableAdapters.EmployeesTableAdapter
End Class