自动编号组合框字段是否达到记录的值?

时间:2016-07-12 13:40:46

标签: ms-access

我有一个表,它最初设置有关零件装配的属性,其中每个装配都有许多零件。我有一个新表格的表格,其中输入了每个装配的零件。我想将一个组合框填充到一定数量的部件号,以控制用户的输入。因此,如果程序集在“tblAssembly”中的记录中有一个条目“#Parts”,我希望形式为“Parts”的组合框“cboPartNumber”从1:#Parts填充每个条目。

1 个答案:

答案 0 :(得分:0)

为了将一些常量值归因于组合框,首先将组合框的Row Source Type属性设置为Value List。 (默认值为Table/Query)。

现在,您可以在Row Source属性中输入值列表,例如" 1; 2; 3; 4; 5"。如果此列表是可变的,您可以在这样的循环中执行此操作:

Private Sub SetPartNumbers(ByVal n As Long)
    Dim i As Long
    Dim s As String

    s = "1"
    For i = 2 To n
        s = s & ";" & i
    Next i
    Me!Combo1.RowSource = s
End Sub