buyerform.vb

来自「一个商品销售管理系统」· VB 代码 · 共 15 行

Public Class BuyerForm

    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.MySaleDataSet.采购商信息)

    End Sub

    Private Sub BuyerForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: 这行代码将数据加载到表“MySaleDataSet.采购商信息”中。您可以根据需要移动或移除它。
        Me.采购商信息TableAdapter.Fill(Me.MySaleDataSet.采购商信息)

    End Sub
End Class