一切都是正确的但不能在运行时工作

Question

我想通过下一个和上一个按钮浏览我的数据库记录。 我编写了代码，代码中没有错误，也没有运行时错误。 当我按下一个按钮或之前没有任何反应。 我不知道该怎么做。

这是我的代码：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    BindingContext(KycDataSet, "O_name").Position = BindingContext(KycDataSet, "O_name").Position + 1
End Sub