MSAccess VBA ORDER BY 不适用于动态记录源

发布于 2024-12-09 05:03:09 字数 521 浏览 0 评论 0原文

下面的代码在我的表单上设置记录源。 ORDER BY 不起作用,因为所有表单属性都是空白的。我该如何排序?

Private Sub Form_Load()

    If Me.OpenArgs <> "" Then

        Me.AllowFilters = True
        Me.FilterOn = True
        Me.RecordSource = "QRY: BPRIL Data Entry By Order"
        Me.Filter = Me.OpenArgs
        Me.Requery

    ElseIf (Me.RecordSource <> "BPRIL Data Entry") Then

        Me.RecordSource = "BPRIL Data Entry"
        Me.Requery

    End If

    Me.OrderBy = "[Item #]"
    Me.OrderByOn = True

结束子

The below code sets the recordsource on my form. The ORDER BY is not working since all the form properties are blank. How do I get sort?

Private Sub Form_Load()

    If Me.OpenArgs <> "" Then

        Me.AllowFilters = True
        Me.FilterOn = True
        Me.RecordSource = "QRY: BPRIL Data Entry By Order"
        Me.Filter = Me.OpenArgs
        Me.Requery

    ElseIf (Me.RecordSource <> "BPRIL Data Entry") Then

        Me.RecordSource = "BPRIL Data Entry"
        Me.Requery

    End If

    Me.OrderBy = "[Item #]"
    Me.OrderByOn = True

End Sub

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

倾城°AllureLove 2024-12-16 05:03:09

如果你正在设置记录源,为什么不趁机排序呢?

Me.RecordSource = "SELECT Stuff FROM [BPRIL Data Entry] ORDER BY [Item #]"

您应该考虑帮自己一个忙,去掉表名和字段名中的空格,这会让生活变得更轻松。

If you are setting the recordsource, why not take the opportunity to sort?

Me.RecordSource = "SELECT Stuff FROM [BPRIL Data Entry] ORDER BY [Item #]"

You should consider doing yourself a favour and getting rid of spaces in table names and field names, it will make life a lot easier.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文