departmentform.vb

来自「这是一个固定资产管理系统的源代码」· VB 代码 · 共 15 行

Public Class DepartmentForm

    Private Sub 公司部门BindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 公司部门BindingNavigatorSaveItem.Click
        Me.Validate()
        Me.公司部门BindingSource.EndEdit()
        Me.公司部门TableAdapter.Update(Me.MyAssetsDataSet.公司部门)

    End Sub

    Private Sub DepartmentForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: 这行代码将数据加载到表“MyAssetsDataSet.公司部门”中。您可以根据需要移动或移除它。
        Me.公司部门TableAdapter.Fill(Me.MyAssetsDataSet.公司部门)

    End Sub
End Class