customizecolumnsform.vb

一个管理系统

Public Class CustomizeColumnsForm
    Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

    Public Sub New(ByVal dgTableStyle As DataGridTableStyle)
        MyBase.New()

        'This call is required by the Windows Form Designer.
        InitializeComponent()

        'Add any initialization after the InitializeComponent() call
        m_dgTableStyle = dgTableStyle

    End Sub

    'Form overrides dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

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

    '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.
    Friend WithEvents lblColumnWidth As System.Windows.Forms.Label
    Friend WithEvents txtColumnWidth As System.Windows.Forms.TextBox
    Friend WithEvents lblDisplayedFields As System.Windows.Forms.Label
    Friend WithEvents btnMoveDown As System.Windows.Forms.Button
    Friend WithEvents btnMoveUp As System.Windows.Forms.Button
    Friend WithEvents lbDisplayed As System.Windows.Forms.ListBox
    Friend WithEvents btnReset As System.Windows.Forms.Button
    Friend WithEvents btnRemove As System.Windows.Forms.Button
    Friend WithEvents btnAdd As System.Windows.Forms.Button
    Friend WithEvents lblAvailableFields As System.Windows.Forms.Label
    Friend WithEvents lbAvailable As System.Windows.Forms.ListBox
    Friend WithEvents btnCancel As System.Windows.Forms.Button
    Friend WithEvents btnOK As System.Windows.Forms.Button
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(CustomizeColumnsForm))
        Me.lblColumnWidth = New System.Windows.Forms.Label()
        Me.txtColumnWidth = New System.Windows.Forms.TextBox()
        Me.lblDisplayedFields = New System.Windows.Forms.Label()
        Me.btnMoveDown = New System.Windows.Forms.Button()
        Me.btnMoveUp = New System.Windows.Forms.Button()
        Me.lbDisplayed = New System.Windows.Forms.ListBox()
        Me.btnReset = New System.Windows.Forms.Button()
        Me.btnRemove = New System.Windows.Forms.Button()
        Me.btnAdd = New System.Windows.Forms.Button()
        Me.lblAvailableFields = New System.Windows.Forms.Label()
        Me.lbAvailable = New System.Windows.Forms.ListBox()
        Me.btnCancel = New System.Windows.Forms.Button()
        Me.btnOK = New System.Windows.Forms.Button()
        Me.SuspendLayout()
        '
        'lblColumnWidth
        '
        Me.lblColumnWidth.AccessibleDescription = resources.GetString("lblColumnWidth.AccessibleDescription")
        Me.lblColumnWidth.AccessibleName = resources.GetString("lblColumnWidth.AccessibleName")
        Me.lblColumnWidth.Anchor = CType(resources.GetObject("lblColumnWidth.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblColumnWidth.AutoSize = CType(resources.GetObject("lblColumnWidth.AutoSize"), Boolean)
        Me.lblColumnWidth.Dock = CType(resources.GetObject("lblColumnWidth.Dock"), System.Windows.Forms.DockStyle)
        Me.lblColumnWidth.Enabled = CType(resources.GetObject("lblColumnWidth.Enabled"), Boolean)
        Me.lblColumnWidth.Font = CType(resources.GetObject("lblColumnWidth.Font"), System.Drawing.Font)
        Me.lblColumnWidth.Image = CType(resources.GetObject("lblColumnWidth.Image"), System.Drawing.Image)
        Me.lblColumnWidth.ImageAlign = CType(resources.GetObject("lblColumnWidth.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblColumnWidth.ImageIndex = CType(resources.GetObject("lblColumnWidth.ImageIndex"), Integer)
        Me.lblColumnWidth.ImeMode = CType(resources.GetObject("lblColumnWidth.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblColumnWidth.Location = CType(resources.GetObject("lblColumnWidth.Location"), System.Drawing.Point)
        Me.lblColumnWidth.Name = "lblColumnWidth"
        Me.lblColumnWidth.RightToLeft = CType(resources.GetObject("lblColumnWidth.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblColumnWidth.Size = CType(resources.GetObject("lblColumnWidth.Size"), System.Drawing.Size)
        Me.lblColumnWidth.TabIndex = CType(resources.GetObject("lblColumnWidth.TabIndex"), Integer)
        Me.lblColumnWidth.Text = resources.GetString("lblColumnWidth.Text")
        Me.lblColumnWidth.TextAlign = CType(resources.GetObject("lblColumnWidth.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblColumnWidth.Visible = CType(resources.GetObject("lblColumnWidth.Visible"), Boolean)
        '
        'txtColumnWidth
        '
        Me.txtColumnWidth.AccessibleDescription = resources.GetString("txtColumnWidth.AccessibleDescription")
        Me.txtColumnWidth.AccessibleName = resources.GetString("txtColumnWidth.AccessibleName")
        Me.txtColumnWidth.Anchor = CType(resources.GetObject("txtColumnWidth.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtColumnWidth.AutoSize = CType(resources.GetObject("txtColumnWidth.AutoSize"), Boolean)
        Me.txtColumnWidth.BackgroundImage = CType(resources.GetObject("txtColumnWidth.BackgroundImage"), System.Drawing.Image)
        Me.txtColumnWidth.Dock = CType(resources.GetObject("txtColumnWidth.Dock"), System.Windows.Forms.DockStyle)
        Me.txtColumnWidth.Enabled = CType(resources.GetObject("txtColumnWidth.Enabled"), Boolean)
        Me.txtColumnWidth.Font = CType(resources.GetObject("txtColumnWidth.Font"), System.Drawing.Font)
        Me.txtColumnWidth.ImeMode = CType(resources.GetObject("txtColumnWidth.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtColumnWidth.Location = CType(resources.GetObject("txtColumnWidth.Location"), System.Drawing.Point)
        Me.txtColumnWidth.MaxLength = CType(resources.GetObject("txtColumnWidth.MaxLength"), Integer)
        Me.txtColumnWidth.Multiline = CType(resources.GetObject("txtColumnWidth.Multiline"), Boolean)
        Me.txtColumnWidth.Name = "txtColumnWidth"
        Me.txtColumnWidth.PasswordChar = CType(resources.GetObject("txtColumnWidth.PasswordChar"), Char)
        Me.txtColumnWidth.RightToLeft = CType(resources.GetObject("txtColumnWidth.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtColumnWidth.ScrollBars = CType(resources.GetObject("txtColumnWidth.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtColumnWidth.Size = CType(resources.GetObject("txtColumnWidth.Size"), System.Drawing.Size)
        Me.txtColumnWidth.TabIndex = CType(resources.GetObject("txtColumnWidth.TabIndex"), Integer)
        Me.txtColumnWidth.Text = resources.GetString("txtColumnWidth.Text")
        Me.txtColumnWidth.TextAlign = CType(resources.GetObject("txtColumnWidth.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtColumnWidth.Visible = CType(resources.GetObject("txtColumnWidth.Visible"), Boolean)
        Me.txtColumnWidth.WordWrap = CType(resources.GetObject("txtColumnWidth.WordWrap"), Boolean)
        '
        'lblDisplayedFields
        '
        Me.lblDisplayedFields.AccessibleDescription = resources.GetString("lblDisplayedFields.AccessibleDescription")
        Me.lblDisplayedFields.AccessibleName = resources.GetString("lblDisplayedFields.AccessibleName")
        Me.lblDisplayedFields.Anchor = CType(resources.GetObject("lblDisplayedFields.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblDisplayedFields.AutoSize = CType(resources.GetObject("lblDisplayedFields.AutoSize"), Boolean)
        Me.lblDisplayedFields.Dock = CType(resources.GetObject("lblDisplayedFields.Dock"), System.Windows.Forms.DockStyle)
        Me.lblDisplayedFields.Enabled = CType(resources.GetObject("lblDisplayedFields.Enabled"), Boolean)
        Me.lblDisplayedFields.Font = CType(resources.GetObject("lblDisplayedFields.Font"), System.Drawing.Font)
        Me.lblDisplayedFields.Image = CType(resources.GetObject("lblDisplayedFields.Image"), System.Drawing.Image)
        Me.lblDisplayedFields.ImageAlign = CType(resources.GetObject("lblDisplayedFields.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblDisplayedFields.ImageIndex = CType(resources.GetObject("lblDisplayedFields.ImageIndex"), Integer)
        Me.lblDisplayedFields.ImeMode = CType(resources.GetObject("lblDisplayedFields.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblDisplayedFields.Location = CType(resources.GetObject("lblDisplayedFields.Location"), System.Drawing.Point)
        Me.lblDisplayedFields.Name = "lblDisplayedFields"
        Me.lblDisplayedFields.RightToLeft = CType(resources.GetObject("lblDisplayedFields.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblDisplayedFields.Size = CType(resources.GetObject("lblDisplayedFields.Size"), System.Drawing.Size)
        Me.lblDisplayedFields.TabIndex = CType(resources.GetObject("lblDisplayedFields.TabIndex"), Integer)
        Me.lblDisplayedFields.Text = resources.GetString("lblDisplayedFields.Text")
        Me.lblDisplayedFields.TextAlign = CType(resources.GetObject("lblDisplayedFields.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblDisplayedFields.Visible = CType(resources.GetObject("lblDisplayedFields.Visible"), Boolean)
        '
        'btnMoveDown
        '
        Me.btnMoveDown.AccessibleDescription = resources.GetString("btnMoveDown.AccessibleDescription")
        Me.btnMoveDown.AccessibleName = resources.GetString("btnMoveDown.AccessibleName")
        Me.btnMoveDown.Anchor = CType(resources.GetObject("btnMoveDown.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.btnMoveDown.BackgroundImage = CType(resources.GetObject("btnMoveDown.BackgroundImage"), System.Drawing.Image)
        Me.btnMoveDown.Dock = CType(resources.GetObject("btnMoveDown.Dock"), System.Windows.Forms.DockStyle)
        Me.btnMoveDown.Enabled = CType(resources.GetObject("btnMoveDown.Enabled"), Boolean)
        Me.btnMoveDown.FlatStyle = CType(resources.GetObject("btnMoveDown.FlatStyle"), System.Windows.Forms.FlatStyle)
        Me.btnMoveDown.Font = CType(resources.GetObject("btnMoveDown.Font"), System.Drawing.Font)
        Me.btnMoveDown.Image = CType(resources.GetObject("btnMoveDown.Image"), System.Drawing.Image)
        Me.btnMoveDown.ImageAlign = CType(resources.GetObject("btnMoveDown.ImageAlign"), System.Drawing.ContentAlignment)
        Me.btnMoveDown.ImageIndex = CType(resources.GetObject("btnMoveDown.ImageIndex"), Integer)
        Me.btnMoveDown.ImeMode = CType(resources.GetObject("btnMoveDown.ImeMode"), System.Windows.Forms.ImeMode)
        Me.btnMoveDown.Location = CType(resources.GetObject("btnMoveDown.Location"), System.Drawing.Point)
        Me.btnMoveDown.Name = "btnMoveDown"
        Me.btnMoveDown.RightToLeft = CType(resources.GetObject("btnMoveDown.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.btnMoveDown.Size = CType(resources.GetObject("btnMoveDown.Size"), System.Drawing.Size)
        Me.btnMoveDown.TabIndex = CType(resources.GetObject("btnMoveDown.TabIndex"), Integer)
        Me.btnMoveDown.Text = resources.GetString("btnMoveDown.Text")
        Me.btnMoveDown.TextAlign = CType(resources.GetObject("btnMoveDown.TextAlign"), System.Drawing.ContentAlignment)
        Me.btnMoveDown.Visible = CType(resources.GetObject("btnMoveDown.Visible"), Boolean)
        '
        'btnMoveUp
        '
        Me.btnMoveUp.AccessibleDescription = resources.GetString("btnMoveUp.AccessibleDescription")
        Me.btnMoveUp.AccessibleName = resources.GetString("btnMoveUp.AccessibleName")
        Me.btnMoveUp.Anchor = CType(resources.GetObject("btnMoveUp.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.btnMoveUp.BackgroundImage = CType(resources.GetObject("btnMoveUp.BackgroundImage"), System.Drawing.Image)
        Me.btnMoveUp.Dock = CType(resources.GetObject("btnMoveUp.Dock"), System.Windows.Forms.DockStyle)
        Me.btnMoveUp.Enabled = CType(resources.GetObject("btnMoveUp.Enabled"), Boolean)
        Me.btnMoveUp.FlatStyle = CType(resources.GetObject("btnMoveUp.FlatStyle"), System.Windows.Forms.FlatStyle)
        Me.btnMoveUp.Font = CType(resources.GetObject("btnMoveUp.Font"), System.Drawing.Font)
        Me.btnMoveUp.Image = CType(resources.GetObject("btnMoveUp.Image"), System.Drawing.Image)
        Me.btnMoveUp.ImageAlign = CType(resources.GetObject("btnMoveUp.ImageAlign"), System.Drawing.ContentAlignment)
        Me.btnMoveUp.ImageIndex = CType(resources.GetObject("btnMoveUp.ImageIndex"), Integer)
        Me.btnMoveUp.ImeMode = CType(resources.GetObject("btnMoveUp.ImeMode"), System.Windows.Forms.ImeMode)
        Me.btnMoveUp.Location = CType(resources.GetObject("btnMoveUp.Location"), System.Drawing.Point)
        Me.btnMoveUp.Name = "btnMoveUp"
        Me.btnMoveUp.RightToLeft = CType(resources.GetObject("btnMoveUp.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.btnMoveUp.Size = CType(resources.GetObject("btnMoveUp.Size"), System.Drawing.Size)
        Me.btnMoveUp.TabIndex = CType(resources.GetObject("btnMoveUp.TabIndex"), Integer)
        Me.btnMoveUp.Text = resources.GetString("btnMoveUp.Text")
        Me.btnMoveUp.TextAlign = CType(resources.GetObject("btnMoveUp.TextAlign"), System.Drawing.ContentAlignment)
        Me.btnMoveUp.Visible = CType(resources.GetObject("btnMoveUp.Visible"), Boolean)
        '
        'lbDisplayed
        '
        Me.lbDisplayed.AccessibleDescription = resources.GetString("lbDisplayed.AccessibleDescription")
        Me.lbDisplayed.AccessibleName = resources.GetString("lbDisplayed.AccessibleName")
        Me.lbDisplayed.Anchor = CType(resources.GetObject("lbDisplayed.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lbDisplayed.BackgroundImage = CType(resources.GetObject("lbDisplayed.BackgroundImage"), System.Drawing.Image)
        Me.lbDisplayed.ColumnWidth = CType(resources.GetObject("lbDisplayed.ColumnWidth"), Integer)
        Me.lbDisplayed.Dock = CType(resources.GetObject("lbDisplayed.Dock"), System.Windows.Forms.DockStyle)
        Me.lbDisplayed.Enabled = CType(resources.GetObject("lbDisplayed.Enabled"), Boolean)
        Me.lbDisplayed.Font = CType(resources.GetObject("lbDisplayed.Font"), System.Drawing.Font)
        Me.lbDisplayed.HorizontalExtent = CType(resources.GetObject("lbDisplayed.HorizontalExtent"), Integer)
        Me.lbDisplayed.HorizontalScrollbar = CType(resources.GetObject("lbDisplayed.HorizontalScrollbar"), Boolean)
        Me.lbDisplayed.ImeMode = CType(resources.GetObject("lbDisplayed.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lbDisplayed.IntegralHeight = CType(resources.GetObject("lbDisplayed.IntegralHeight"), Boolean)
        Me.lbDisplayed.ItemHeight = CType(resources.GetObject("lbDisplayed.ItemHeight"), Integer)
        Me.lbDisplayed.Location = CType(resources.GetObject("lbDisplayed.Location"), System.Drawing.Point)
        Me.lbDisplayed.Name = "lbDisplayed"
        Me.lbDisplayed.RightToLeft = CType(resources.GetObject("lbDisplayed.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lbDisplayed.ScrollAlwaysVisible = CType(resources.GetObject("lbDisplayed.ScrollAlwaysVisible"), Boolean)
        Me.lbDisplayed.Size = CType(resources.GetObject("lbDisplayed.Size"), System.Drawing.Size)
        Me.lbDisplayed.TabIndex = CType(resources.GetObject("lbDisplayed.TabIndex"), Integer)
        Me.lbDisplayed.Visible = CType(resources.GetObject("lbDisplayed.Visible"), Boolean)
        '
        'btnReset
        '
        Me.btnReset.AccessibleDescription = resources.GetString("btnReset.AccessibleDescription")
        Me.btnReset.AccessibleName = resources.GetString("btnReset.AccessibleName")
        Me.btnReset.Anchor = CType(resources.GetObject("btnReset.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.btnReset.BackgroundImage = CType(resources.GetObject("btnReset.BackgroundImage"), System.Drawing.Image)
        Me.btnReset.CausesValidation = False
        Me.btnReset.Dock = CType(resources.GetObject("btnReset.Dock"), System.Windows.Forms.DockStyle)
        Me.btnReset.Enabled = CType(resources.GetObject("btnReset.Enabled"), Boolean)
        Me.btnReset.FlatStyle = CType(resources.GetObject("btnReset.FlatStyle"), System.Windows.Forms.FlatStyle)
        Me.btnReset.Font = CType(resources.GetObject("btnReset.Font"), System.Drawing.Font)
        Me.btnReset.Image = CType(resources.GetObject("btnReset.Image"), System.Drawing.Image)