Access 中的条件格式与 VBA 中的函数
Conditional Formatting in Access with function in VBA
我总体上熟悉编程，但不熟悉 Access 表单或 VBA。
我可以使用条件格式。现在我需要让它响应自定义 VBA 函数的结果。
假设某事发生的次数有一个限制，具体取决于客户。
标签将显示计数，"Trip 3 of 5".
当我们达到 5 个中的 5 个时，它应该是黄色的，5 个中的 6 个应该是红色的。
请注意，我希望条件格式规则在 Access 中，而不是在 VBA 中。 VBA 只是 returns 我们在条件中测试的值。
我看不出如何在条件格式表达式中使用 VBA 函数的结果，但您似乎可以使用变量。
我试过了
TripCountValid: GetTripCountValid(ID)
然后在我的情况下使用了 TripCountValid，但这似乎没有用。
GetTripCountMsg 和 GetTripCountValid 在 Orders 模块中，因为这是我正在模拟的 GetBillAcctMsg 所在的位置。
我可以将它移到表单的代码隐藏中。
调用了我在 GetTripCountMsg 中的 MsgBox，但未调用 GetTripCountValid 中的 MsgBox。
条件格式中可以引用一个函数。使用 Expression Is: 选项。假设你的函数 returns 是一个布尔值 (True/False)，CF 规则就是：
表达式为：GetTripCountValid([ID])
如果函数 returns 为真，则设置要显示的格式。或者，如果您更喜欢将显示更改为 False：
表达式为：NOT GetTripCountValid([ID])
如果这些表达式不够明确，请使用 = 标记您喜欢的布尔值。
表达式是：GetTripCountValid([ID]) = True
如果函数返回的不是布尔值，则使用最后一种语法与适合情况的任何参数进行比较。关键是，表达式的计算结果必须为 True 或 False。
我总体上熟悉编程，但不熟悉 Access 表单或 VBA。
我可以使用条件格式。现在我需要让它响应自定义 VBA 函数的结果。
假设某事发生的次数有一个限制，具体取决于客户。
标签将显示计数，"Trip 3 of 5".
当我们达到 5 个中的 5 个时，它应该是黄色的，5 个中的 6 个应该是红色的。
请注意，我希望条件格式规则在 Access 中，而不是在 VBA 中。 VBA 只是 returns 我们在条件中测试的值。
我看不出如何在条件格式表达式中使用 VBA 函数的结果，但您似乎可以使用变量。
我试过了
TripCountValid: GetTripCountValid(ID)
然后在我的情况下使用了 TripCountValid，但这似乎没有用。
GetTripCountMsg 和 GetTripCountValid 在 Orders 模块中，因为这是我正在模拟的 GetBillAcctMsg 所在的位置。 我可以将它移到表单的代码隐藏中。
调用了我在 GetTripCountMsg 中的 MsgBox，但未调用 GetTripCountValid 中的 MsgBox。
条件格式中可以引用一个函数。使用 Expression Is: 选项。假设你的函数 returns 是一个布尔值 (True/False)，CF 规则就是：
表达式为：GetTripCountValid([ID])
如果函数 returns 为真，则设置要显示的格式。或者，如果您更喜欢将显示更改为 False：
表达式为：NOT GetTripCountValid([ID])
如果这些表达式不够明确，请使用 = 标记您喜欢的布尔值。
表达式是：GetTripCountValid([ID]) = True
如果函数返回的不是布尔值，则使用最后一种语法与适合情况的任何参数进行比较。关键是，表达式的计算结果必须为 True 或 False。