我有一個帶有 ProductID 控制源的組合框的連續表單。
我有以下 vba 代碼：
Private Sub ProductID_AfterUpdate()
if (productID=1 or productID=2) then
docmd.openform "frminfo"
end if
End Sub
我希望該彈出視窗（“frminfo”）僅在第一次條件為真時打開。我應該如何修改這個？
uj5u.com熱心網友回復：
宣告一個布爾公共變數或 TempVar 或使用 UNBOUND 文本框并在滿足條件時設定為 True。在 If 條件中包含任何一個的值。
Option Compare Database
Option Explicit
Public booTest As Boolean
____________________________________________________________________
Private Sub ProductID_AfterUpdate()
If (productID=1 Or productID=2) And booTest = False Then
DoDmd.OpenForm "frminfo"
booTest = True
End If
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/505124.html
上一篇：繪制非連續函式？
下一篇：動態更改功能區影像