表格-转到下一页的按钮

Question

我在ms-acces上填写表格。我将函数“页面”放入表单，然后创建了一些页面（例如，页面1，页面2和页面3）。每个页面上都有一些内容，但是在此示例中，我们不在乎页面上的内容。我想要第1页上的“制作”按钮，我单击该按钮然后自动转到第2页。

我尝试了短代码段，但是它不起作用，所以我不知道如何以简单的方式解决此问题。 Karta_projektu是我的完整表格。

Private Sub Polecenie426_Click()
    Forms!Karta_projektu.GoToPage (1)
End Sub

我想要使我可以从第1页转到第2页的按钮。

Answer 1

假设您正在谈论Tab控件上的页面：

要转到特定页面，只需在tabcontrol上设置值：

Private Sub Polecenie426_Click()
    Me!TabControlName.Value = 1 'Page 2 since pages start at 0
End Sub

但是，我建议使用页面名称进行导航。如果仅使用页面位置，则需要在添加/删除/重新排序页面后调整所有代码。

Private Sub Polecenie426_Click()
    Me!TabControlName.Value = Me!PageName.PageIndex 'Go to page PageName
End Sub