Access 中的條件格式與 VBA 中的函數

Question

我熟悉編程，但不熟悉 Access 表單或 VBA。

我有條件格式工作。 現在我需要讓它響應自定義 VBA 函數的結果。
假設有一個限制，基於客戶，某事可能發生的次數。
標簽將顯示計數，“Trip 3 of 5”。
當我們得到 5 個 5 時，它應該是黃色的，而 5 個中的 6 個應該是紅色的。
請注意，我希望條件格式規則在 Access 中，而不是在 VBA 中。 VBA 只返回我們在條件中測試的值。

我沒有看到如何在條件格式表達式中使用 VBA 函數的結果，但您似乎可以使用變量。

我試過

TripCountValid: GetTripCountValid(ID)

然后在我的情況下使用 TripCountValid ，但這似乎不起作用。

GetTripCountMsg 和 GetTripCountValid 位於 Orders 模塊中，因為這是我正在模擬的 GetBillAcctMsg 所在的位置。 我可以將它移到表單的代碼隱藏中。

我在 GetTripCountMsg 中的 MsgBox 被調用，但不是在 GetTripCountValid 中的那個。

Answer 1

可以在條件格式中引用函數。 使用Expression Is:選項。 假設你的函數返回一個布爾值（真/假），CF 規則就是：

表達式為： GetTripCountValid([ID])

如果函數返回 True，則設置要顯示的所需格式。 或者，如果您更喜歡將顯示更改為 False：

表達式為： NOT GetTripCountValid([ID])

如果這些表達式不夠明確，請使用 = 符號和您喜歡的任何布爾值。

表達式為： GetTripCountValid([ID]) = True

如果函數返回的不是布爾值，則使用最后一個語法與適合情況的任何參數進行比較。 關鍵是，表達式的計算結果必須為 True 或 False。