我目前正在使用 Microsoft Access。
我正在嘗試根據另一個組合框值填充多個組合框。例如,第一個組合框稱為 cmb_BoxValue,其中的數字為 1-20,其余組合框的名稱為 cmb_Box1,直到 cmb_Box20。一旦用戶選擇了所需的組合框數量,使用 AfterUpdate 子項,它將允許基于值的可見性 = True。如果選擇的值為 3,則 cmb_Box1、cmb_Box2 和 cmb_Box3 Visible = True。我設法使用如下所示的選擇案例來做到這一點:
Private Sub cmb_BoxValue_AfterUpdate()
Dim Size1 As Integer
Size1 = Me.cmb_BoxValue.Value
Select Case Me.cmb_BoxValue
Case 1
Me.cmb_boxBox1 = True
etc...
但我覺得這是非常重復的,不是最理想的解決方案。我覺得 for 回圈是理想的解決方案,但我不確定如何處理它。謝謝
uj5u.com熱心網友回復:
由于組合框具有相似的名稱和數字后綴,因此可以在遞增索引回圈中動態構建組合框名稱,并測驗索引是否 <= cmb_BoxValue 輸入以設定 Visible 屬性:
For x = 1 to 20
Me.Controls("cmb_Box" & x).Visible = x <= Me.cmb_BoxValue
Next
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/359375.html
