Question

请教各位前辈，vb.net删除操作无法对数据集删除，也无法更新到数据库中，哭求各位指教

Imports System.Data.OleDb

Public Class cost
Dim cnn As New OleDbConnection("Provider=microsoft.ace.oledb.12.0;Data Source=D:\Backup\我的文档\Visual Studio 2010\Projects\企业销售管理系统\WindowsApplication1\企业销售合同管理.accdb")
Dim Oledbdataadapater1 As New OleDbDataAdapter()
Private Sub CostBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CostBindingNavigatorSaveItem.Click
Me.Validate()
Me.CostBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.企业销售合同管理DS)
End Sub

Private Sub cost_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: 这行代码将数据加载到表“企业销售合同管理DS.Cost”中。您可以根据需要移动或删除它。
Me.CostTableAdapter.Fill(Me.企业销售合同管理DS.Cost)
End Sub

Private Sub btnDel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDel.Click
'删除当前行
Dim n As Integer
n = Me.BindingContext(企业销售合同管理DS.Cost, "cost").Position
Me.BindingContext(企业销售合同管理DS.Cost, "cost").RemoveAt(n)
End Sub
Private Sub BtnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnUpdate.Click
Me.BindingContext(企业销售合同管理DS.Cost, "cost").EndCurrentEdit()
Oledbdataadapater1.Update(企业销售合同管理DS.Cost)
End Sub
End class
删除操作时，在n = Me.BindingContext(企业销售合同管理DS.Cost, "cost").Position报错。
显示为：无法创建字段 cost 的子列表

Answer 1

Me.CostTableAdapter.Fill(Me.企业销售合同管理DS.Cost)
是不是fill的参数问题哦