Ms access 如何使组合框在表中显示从0到数字的数字
我有一个空的组合框,我想用0到x的数字来填充它。x是表中的一个值Ms access 如何使组合框在表中显示从0到数字的数字,ms-access,vba,Ms Access,Vba,我有一个空的组合框,我想用0到x的数字来填充它。x是表中的一个值 我对VBA几乎一无所知,因此非常感谢您的帮助。当您将组合框添加到表单时,请确保选择“我将键入我想要的值”单选按钮 从Devolper选项卡将视图更改为Design视图 右键单击窗体下面的空白区域,然后单击属性 属性表应该在顶部附近的选择类型组合中选择表单 单击事件选项卡 选择加载事件并单击椭圆[…]按钮 选择代码生成器 您可以使用DLookup、DMax或DMin从查询或表中检索您的值 Private Sub Form_Loa
我对VBA几乎一无所知,因此非常感谢您的帮助。当您将组合框添加到表单时,请确保选择“我将键入我想要的值”单选按钮
- 从Devolper选项卡将视图更改为Design视图 右键单击窗体下面的空白区域,然后单击属性
- 属性表应该在顶部附近的选择类型组合中选择表单
- 单击事件选项卡
- 选择加载事件并单击椭圆[…]按钮
- 选择代码生成器
Private Sub Form_Load()
Dim i As Long
Dim maxNumber As Long
maxNumber = DLookup("[StockLevel]", "InventoryTable", "[SKU] = 'HSC0424PP'")
For i = 0 To maxNumber
Combo4.AddItem i
Next
End Sub
将组合框添加到表单时,请确保选择“我将键入我想要的值”单选按钮
- 从Devolper选项卡将视图更改为Design视图 右键单击窗体下面的空白区域,然后单击属性
- 属性表应该在顶部附近的选择类型组合中选择表单
- 单击事件选项卡
- 选择加载事件并单击椭圆[…]按钮
- 选择代码生成器
Private Sub Form_Load()
Dim i As Long
Dim maxNumber As Long
maxNumber = DLookup("[StockLevel]", "InventoryTable", "[SKU] = 'HSC0424PP'")
For i = 0 To maxNumber
Combo4.AddItem i
Next
End Sub
我投票关闭这个问题,因为SO可以帮助你编写代码,但SO不是来为你编写代码的。谷歌如何用循环填充access vba中的组合框我投票关闭这个问题,因为SO可以帮助你编写代码,但SO不是来为你编写代码的。谷歌如何填充access vba中带有循环的组合框