⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 departmentform.designer.vb

📁 这是一个固定资产管理系统的源代码
💻 VB
📖 第 1 页 / 共 2 页
字号:
        部门名称Label.TabIndex = 13
        部门名称Label.Text = "部门名称:"
        '
        '部门名称TextBox
        '
        Me.部门名称TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.公司部门BindingSource, "部门名称", True))
        Me.部门名称TextBox.Location = New System.Drawing.Point(80, 25)
        Me.部门名称TextBox.Name = "部门名称TextBox"
        Me.部门名称TextBox.Size = New System.Drawing.Size(180, 21)
        Me.部门名称TextBox.TabIndex = 14
        '
        '部门负责人Label
        '
        部门负责人Label.AutoSize = True
        部门负责人Label.Location = New System.Drawing.Point(3, 55)
        部门负责人Label.Name = "部门负责人Label"
        部门负责人Label.Size = New System.Drawing.Size(71, 12)
        部门负责人Label.TabIndex = 15
        部门负责人Label.Text = "部门负责人:"
        '
        '部门负责人TextBox
        '
        Me.部门负责人TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.公司部门BindingSource, "部门负责人", True))
        Me.部门负责人TextBox.Location = New System.Drawing.Point(80, 52)
        Me.部门负责人TextBox.Name = "部门负责人TextBox"
        Me.部门负责人TextBox.Size = New System.Drawing.Size(180, 21)
        Me.部门负责人TextBox.TabIndex = 16
        '
        '设备员Label
        '
        设备员Label.AutoSize = True
        设备员Label.Location = New System.Drawing.Point(264, 28)
        设备员Label.Name = "设备员Label"
        设备员Label.Size = New System.Drawing.Size(47, 12)
        设备员Label.TabIndex = 17
        设备员Label.Text = "设备员:"
        '
        '设备员TextBox
        '
        Me.设备员TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.公司部门BindingSource, "设备员", True))
        Me.设备员TextBox.Location = New System.Drawing.Point(329, 25)
        Me.设备员TextBox.Name = "设备员TextBox"
        Me.设备员TextBox.Size = New System.Drawing.Size(208, 21)
        Me.设备员TextBox.TabIndex = 18
        '
        '联系电话Label
        '
        联系电话Label.AutoSize = True
        联系电话Label.Location = New System.Drawing.Point(264, 55)
        联系电话Label.Name = "联系电话Label"
        联系电话Label.Size = New System.Drawing.Size(59, 12)
        联系电话Label.TabIndex = 19
        联系电话Label.Text = "联系电话:"
        '
        '联系电话TextBox
        '
        Me.联系电话TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.公司部门BindingSource, "联系电话", True))
        Me.联系电话TextBox.Location = New System.Drawing.Point(329, 52)
        Me.联系电话TextBox.Name = "联系电话TextBox"
        Me.联系电话TextBox.Size = New System.Drawing.Size(208, 21)
        Me.联系电话TextBox.TabIndex = 20
        '
        '说明Label
        '
        说明Label.AutoSize = True
        说明Label.Location = New System.Drawing.Point(3, 82)
        说明Label.Name = "说明Label"
        说明Label.Size = New System.Drawing.Size(35, 12)
        说明Label.TabIndex = 21
        说明Label.Text = "说明:"
        '
        '说明TextBox
        '
        Me.说明TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.公司部门BindingSource, "说明", True))
        Me.说明TextBox.Location = New System.Drawing.Point(44, 79)
        Me.说明TextBox.Name = "说明TextBox"
        Me.说明TextBox.Size = New System.Drawing.Size(493, 21)
        Me.说明TextBox.TabIndex = 22
        '
        '公司部门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.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dataGridViewTextBoxColumn1, Me.dataGridViewTextBoxColumn2, Me.dataGridViewTextBoxColumn3, Me.dataGridViewTextBoxColumn4, Me.dataGridViewTextBoxColumn5})
        Me.公司部门DataGridView.DataSource = Me.公司部门BindingSource
        Me.公司部门DataGridView.Location = New System.Drawing.Point(5, 106)
        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(532, 306)
        Me.公司部门DataGridView.TabIndex = 12
        '
        '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
        '
        'DepartmentForm
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        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.联系电话TextBox)
        Me.Controls.Add(说明Label)
        Me.Controls.Add(Me.说明TextBox)
        Me.Controls.Add(Me.公司部门DataGridView)
        Me.Controls.Add(Me.公司部门BindingNavigator)
        Me.Name = "DepartmentForm"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
        Me.Text = "登记公司部门信息"
        CType(Me.MyAssetsDataSet, 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()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents MyAssetsDataSet As 固定资产管理系统.MyAssetsDataSet
    Friend WithEvents 公司部门BindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents 公司部门TableAdapter As 固定资产管理系统.MyAssetsDataSetTableAdapters.公司部门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 部门名称TextBox As System.Windows.Forms.TextBox
    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 说明TextBox As System.Windows.Forms.TextBox
    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
End Class

⌨️ 快捷键说明

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