Vb.net 删除函数的第一条或最后一条记录

我的主菜单是显示所有记录的地方。用户可以通过包含所有记录的列表表在记录之间导航。 当我使用此代码删除显示的记录时，第一条记录总是会被删除

BindingContext(JobsDBDataSet, "T_Jobs")
    .RemoveAt(BindingContext(JobsDBDataSet, "T_Jobs").Position)

我增加了一行，位置应该与记录的ID匹配

BindingContext(JobsDBDataSet, "T_Jobs").Position = Job_IDTextBox
BindingContext(JobsDBDataSet, "T_Jobs")
    .RemoveAt(BindingContext(JobsDBDataSet, "T_Jobs").Position)

注意：Job_IDTextBox直接连接到数据库中的列（我将其从datasource菜单拖到details表单中的表单中）

---

我的目标是，我可以从列表框中删除已选择（并显示）的作业（其中包含所有记录）

正确，因此我将代码更改为

BindingContext(JobsDBDataSet, "T_Jobs").Position = Convert.ToInt32(Job_IDTextBox.Text)
    BindingContext(JobsDBDataSet, "T_Jobs").RemoveAt(BindingContext(JobsDBDataSet, "T_Jobs").Position)

---

同样的事情仍然会发生：删除最后一个作业，而不是（从列表框中）选择的作业。我觉得列表框有问题，也许我必须首先告诉程序更改指向我从列表框中选择的作业的指针，但我不知道如何操作，这只是一个假设。

您的标记有误导性。VB6和VBA是不同的。您使用的是MS Access还是Visual Basic？很抱歉，我不知道两者的区别，我使用的是Visual Basic，我的程序连接到Access中的数据库。如果您使用的是Visual Studio，那么您使用的是

vb.net

作为编程语言。您使用的数据库与编程语言无关。如果您使用的是Access mdb，则数据库引擎是

JET

。

TextBox

不是

整数

号

Job\u IDTextBox.Text是一个字符串，您必须使用
convert.ToInt32（Job\u IDTextBox.Text）