Ms access 应用程序。转到其他子例程'；s线误差

我在Excel中有这段简单的代码。如果我运行子测试，它将带我到子示例，并将光标放在“Hello”前面。我想在Ms Access 2010模块中的VBA中执行同样的操作，但我得到：“编译错误：找不到方法或数据成员”。 如何使其在Ms Access中工作

Sub test()
    Application.Goto "example"
End Sub

Sub example()
   'Hello
End Sub

---

您必须使用此方法：

Call example

请注意，您要调用的sub必须首先可以访问。

通过使用一些代码，我已成功创建了下面的sub。它在即时窗口中打印字符串每次出现的模块和行。我也希望能够以编程方式转到这些特定的行

Sub FindStringInAllModules()
Dim c As String
c = "example" 'Search for string "test"
Dim i As Integer
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
For Each obj In dbs.AllModules
    If obj.IsLoaded = True Then
        With Application.Modules(obj.Name)
            For i = 1 To .CountOfLines
                If InStr(.Lines(i, 1), c) > 0 Then
                     Debug.Print obj.Name & " line " & i
                End If
            Next i
        End With
    End If
Next obj
End Sub

---

非常感谢。但我不想调用并运行子示例。我只想转到子示例的行，而不是运行其中的代码。就像在子系统中的行。它在Excel中工作，但在Access中不工作。对不起，我的错误没有更好地解释它。理解它的最好方法是，在Excel的VBE中粘贴这两个子项并运行子项测试。基本上，如果我将子测试分配给按钮，它将转到VBE中的子示例（不运行该子测试，只显示它）。我希望现在更清楚了。非常感谢。