Private Sub bndelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bndelete.Click If BmOrders.Count > 0 Then BmOrders.RemoveAt(BmOrders.Position) End If
End Sub
Private Sub bncancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bncancel.Click BmOrders.CancelCurrentEdit()
End Sub End Class