rewardsform.designer.vb

来自「这是一个人事工资管理系统」· VB 代码 · 共 587 行 · 第 1/3 页

VB
587
字号
        Me.基本档案DataGridView.AllowUserToAddRows = False
        Me.基本档案DataGridView.AllowUserToDeleteRows = False
        Me.基本档案DataGridView.AllowUserToResizeRows = False
        Me.基本档案DataGridView.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.基本档案DataGridView.BackgroundColor = System.Drawing.SystemColors.ActiveCaption
        Me.基本档案DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.基本档案DataGridView.Location = New System.Drawing.Point(3, 28)
        Me.基本档案DataGridView.MultiSelect = False
        Me.基本档案DataGridView.Name = "基本档案DataGridView"
        Me.基本档案DataGridView.ReadOnly = True
        Me.基本档案DataGridView.RowHeadersVisible = False
        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Green
        DataGridViewCellStyle1.ForeColor = System.Drawing.Color.Yellow
        Me.基本档案DataGridView.RowsDefaultCellStyle = DataGridViewCellStyle1
        Me.基本档案DataGridView.RowTemplate.Height = 23
        Me.基本档案DataGridView.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.基本档案DataGridView.Size = New System.Drawing.Size(536, 93)
        Me.基本档案DataGridView.TabIndex = 43
        '
        '奖惩记录DataGridView
        '
        Me.奖惩记录DataGridView.AllowUserToAddRows = False
        Me.奖惩记录DataGridView.AllowUserToDeleteRows = False
        Me.奖惩记录DataGridView.AllowUserToResizeRows = False
        Me.奖惩记录DataGridView.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.奖惩记录DataGridView.AutoGenerateColumns = False
        Me.奖惩记录DataGridView.BackgroundColor = System.Drawing.SystemColors.ActiveCaption
        Me.奖惩记录DataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dataGridViewTextBoxColumn1, Me.dataGridViewTextBoxColumn2, Me.dataGridViewTextBoxColumn3, Me.dataGridViewTextBoxColumn4, Me.dataGridViewTextBoxColumn5, Me.dataGridViewTextBoxColumn6, Me.dataGridViewTextBoxColumn7, Me.dataGridViewTextBoxColumn8, Me.dataGridViewTextBoxColumn9})
        Me.奖惩记录DataGridView.DataSource = Me.奖惩记录BindingSource
        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
        DataGridViewCellStyle2.BackColor = System.Drawing.Color.Green
        DataGridViewCellStyle2.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        DataGridViewCellStyle2.ForeColor = System.Drawing.Color.Yellow
        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
        Me.奖惩记录DataGridView.DefaultCellStyle = DataGridViewCellStyle2
        Me.奖惩记录DataGridView.Location = New System.Drawing.Point(3, 210)
        Me.奖惩记录DataGridView.MultiSelect = False
        Me.奖惩记录DataGridView.Name = "奖惩记录DataGridView"
        Me.奖惩记录DataGridView.ReadOnly = True
        Me.奖惩记录DataGridView.RowHeadersVisible = False
        Me.奖惩记录DataGridView.RowTemplate.Height = 23
        Me.奖惩记录DataGridView.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.奖惩记录DataGridView.Size = New System.Drawing.Size(536, 204)
        Me.奖惩记录DataGridView.TabIndex = 42
        '
        'dataGridViewTextBoxColumn1
        '
        Me.dataGridViewTextBoxColumn1.DataPropertyName = "自编号"
        Me.dataGridViewTextBoxColumn1.HeaderText = "自编号"
        Me.dataGridViewTextBoxColumn1.Name = "dataGridViewTextBoxColumn1"
        Me.dataGridViewTextBoxColumn1.ReadOnly = True
        '
        'dataGridViewTextBoxColumn2
        '
        Me.dataGridViewTextBoxColumn2.DataPropertyName = "员工编号"
        Me.dataGridViewTextBoxColumn2.HeaderText = "员工编号"
        Me.dataGridViewTextBoxColumn2.Name = "dataGridViewTextBoxColumn2"
        Me.dataGridViewTextBoxColumn2.ReadOnly = True
        '
        'dataGridViewTextBoxColumn3
        '
        Me.dataGridViewTextBoxColumn3.DataPropertyName = "员工姓名"
        Me.dataGridViewTextBoxColumn3.HeaderText = "员工姓名"
        Me.dataGridViewTextBoxColumn3.Name = "dataGridViewTextBoxColumn3"
        Me.dataGridViewTextBoxColumn3.ReadOnly = True
        '
        'dataGridViewTextBoxColumn4
        '
        Me.dataGridViewTextBoxColumn4.DataPropertyName = "奖惩日期"
        Me.dataGridViewTextBoxColumn4.HeaderText = "奖惩日期"
        Me.dataGridViewTextBoxColumn4.Name = "dataGridViewTextBoxColumn4"
        Me.dataGridViewTextBoxColumn4.ReadOnly = True
        '
        'dataGridViewTextBoxColumn5
        '
        Me.dataGridViewTextBoxColumn5.DataPropertyName = "奖惩类型"
        Me.dataGridViewTextBoxColumn5.HeaderText = "奖惩类型"
        Me.dataGridViewTextBoxColumn5.Name = "dataGridViewTextBoxColumn5"
        Me.dataGridViewTextBoxColumn5.ReadOnly = True
        '
        'dataGridViewTextBoxColumn6
        '
        Me.dataGridViewTextBoxColumn6.DataPropertyName = "奖惩原因"
        Me.dataGridViewTextBoxColumn6.HeaderText = "奖惩原因"
        Me.dataGridViewTextBoxColumn6.Name = "dataGridViewTextBoxColumn6"
        Me.dataGridViewTextBoxColumn6.ReadOnly = True
        '
        'dataGridViewTextBoxColumn7
        '
        Me.dataGridViewTextBoxColumn7.DataPropertyName = "奖惩批准单位"
        Me.dataGridViewTextBoxColumn7.HeaderText = "奖惩批准单位"
        Me.dataGridViewTextBoxColumn7.Name = "dataGridViewTextBoxColumn7"
        Me.dataGridViewTextBoxColumn7.ReadOnly = True
        '
        'dataGridViewTextBoxColumn8
        '
        Me.dataGridViewTextBoxColumn8.DataPropertyName = "解除处分日期"
        Me.dataGridViewTextBoxColumn8.HeaderText = "解除处分日期"
        Me.dataGridViewTextBoxColumn8.Name = "dataGridViewTextBoxColumn8"
        Me.dataGridViewTextBoxColumn8.ReadOnly = True
        '
        'dataGridViewTextBoxColumn9
        '
        Me.dataGridViewTextBoxColumn9.DataPropertyName = "说明"
        Me.dataGridViewTextBoxColumn9.HeaderText = "说明"
        Me.dataGridViewTextBoxColumn9.Name = "dataGridViewTextBoxColumn9"
        Me.dataGridViewTextBoxColumn9.ReadOnly = True
        '
        'RewardsForm
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer))
        Me.ClientSize = New System.Drawing.Size(542, 416)
        Me.Controls.Add(自编号Label)
        Me.Controls.Add(Me.自编号TextBox)
        Me.Controls.Add(员工编号Label)
        Me.Controls.Add(Me.员工编号TextBox)
        Me.Controls.Add(员工姓名Label)
        Me.Controls.Add(Me.员工姓名TextBox)
        Me.Controls.Add(奖惩日期Label)
        Me.Controls.Add(Me.奖惩日期DateTimePicker)
        Me.Controls.Add(奖惩类型Label)
        Me.Controls.Add(Me.奖惩类型ComboBox)
        Me.Controls.Add(奖惩原因Label)
        Me.Controls.Add(Me.奖惩原因TextBox)
        Me.Controls.Add(奖惩批准单位Label)
        Me.Controls.Add(Me.奖惩批准单位TextBox)
        Me.Controls.Add(解除处分日期Label)
        Me.Controls.Add(Me.解除处分日期DateTimePicker)
        Me.Controls.Add(说明Label)
        Me.Controls.Add(Me.说明TextBox)
        Me.Controls.Add(Me.基本档案DataGridView)
        Me.Controls.Add(Me.奖惩记录DataGridView)
        Me.Controls.Add(Me.奖惩记录BindingNavigator)
        Me.Name = "RewardsForm"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
        Me.Text = "员工奖惩记录维护"
        CType(Me.MyPersonnelDataSet, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.奖惩记录BindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.奖惩记录BindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
        Me.奖惩记录BindingNavigator.ResumeLayout(False)
        Me.奖惩记录BindingNavigator.PerformLayout()
        CType(Me.基本档案DataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.奖惩记录DataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents MyPersonnelDataSet As 人事工资管理系统.MyPersonnelDataSet
    Friend WithEvents 奖惩记录BindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents 奖惩记录TableAdapter As 人事工资管理系统.MyPersonnelDataSetTableAdapters.奖惩记录TableAdapter
    Friend WithEvents 奖惩记录BindingNavigator As System.Windows.Forms.BindingNavigator
    Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
    Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
    Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
    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 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 奖惩记录BindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
    Private WithEvents 员工姓名ToolStripLabel As System.Windows.Forms.ToolStripLabel
    Private WithEvents 员工姓名ToolStripTextBox As System.Windows.Forms.ToolStripTextBox
    Private WithEvents 查询ToolStripButton As System.Windows.Forms.ToolStripButton
    Private WithEvents 自编号TextBox As System.Windows.Forms.TextBox
    Private WithEvents 员工编号TextBox As System.Windows.Forms.TextBox
    Private WithEvents 员工姓名TextBox As System.Windows.Forms.TextBox
    Private WithEvents 奖惩日期DateTimePicker As System.Windows.Forms.DateTimePicker
    Private WithEvents 奖惩类型ComboBox As System.Windows.Forms.ComboBox
    Private WithEvents 奖惩原因TextBox As System.Windows.Forms.TextBox
    Private WithEvents 奖惩批准单位TextBox As System.Windows.Forms.TextBox
    Private WithEvents 解除处分日期DateTimePicker As System.Windows.Forms.DateTimePicker
    Private WithEvents 说明TextBox As System.Windows.Forms.TextBox
    Private WithEvents 基本档案DataGridView As System.Windows.Forms.DataGridView
    Private WithEvents 奖惩记录DataGridView As System.Windows.Forms.DataGridView
    Private WithEvents dataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn7 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn8 As System.Windows.Forms.DataGridViewTextBoxColumn
    Private WithEvents dataGridViewTextBoxColumn9 As System.Windows.Forms.DataGridViewTextBoxColumn
End Class

⌨️ 快捷键说明

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