问VB.Net - datagridview中的条目在事件上保持重复

EN

Private Function LoadData_UnitProcess()

    Dim UP_SQL As String = "SELECT LotNum FROM Transactions WHERE StatusID=3 ORDER BY Process_EntryDate DESC"
    Dim UP_Ad As OleDbDataAdapter = New OleDbDataAdapter(UP_SQL, strCon)


    UP_Ad.Fill(UP_Ds, "Transactions")
    UnitOnProcess_DG.DataSource = UP_Ds.Tables(0)

    With UnitOnProcess_DG
        .RowHeadersVisible = False
        .Columns(0).HeaderCell.Value = "Lot #"
        .Columns(0).Width = "363"
        .AllowUserToAddRows = False
    End With


    LoadData_UnitProcess = ""
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    LoadData_UnitProcess()
End Sub

Private Sub Displayer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    LoadData_UnitProcess()
End Sub