Ms access 按名称获取文本框-访问

我正面临以下pbm

问题：

If InputLibelle.Value <> Me!SubStockEdit!DSLibelle.Value Then

Dim TableColumnNames() As String
        TableColumnNames = Split("Poids, Dimension1, Dimension2,
                                  Dimension3, Description, Price", ",")
For Each ColumnName In TableColumnNames
     If  Me.Name("Input" & ColumnName).Value <> ???
Next

我想知道通过字符串调用TextBox/ComboBox的.value的方法

示例：

If InputLibelle.Value <> Me!SubStockEdit!DSLibelle.Value Then

Dim TableColumnNames() As String
        TableColumnNames = Split("Poids, Dimension1, Dimension2,
                                  Dimension3, Description, Price", ",")
For Each ColumnName In TableColumnNames
     If  Me.Name("Input" & ColumnName).Value <> ???
Next

如果输入libelle.Value Me！子剪辑！DSLibelle.Value然后

我想多次比较子窗体数据表（SubStockEdit！DS+ItemName）中的ItemName文本框的值（输入+ItemName）和另一个文本框的值

代码尝试：

If InputLibelle.Value <> Me!SubStockEdit!DSLibelle.Value Then

Dim TableColumnNames() As String
        TableColumnNames = Split("Poids, Dimension1, Dimension2,
                                  Dimension3, Description, Price", ",")
For Each ColumnName In TableColumnNames
     If  Me.Name("Input" & ColumnName).Value <> ???
Next

Dim TableColumnNames（）作为字符串
TableColumnNames=拆分（“POID，维度1，维度2，
尺寸3，说明，价格“，”，”）
对于TableColumnNames中的每个ColumnName
如果Me.Name（“输入”&ColumnName）.Value？？？
下一个

有人知道如何调用这些对象吗？

那就是：

Dim TableColumnNames() As String

TableColumnNames = Split("Poids, Dimension1, Dimension2, Dimension3, Description, Price", ",")

For Each ColumnName In TableColumnNames
    If Me("Input" & ColumnName).Value <> Me!SubStockEdit("DS" & ColumnName).Value Then
        ' Do stuff.
    End If
Next

Dim TableColumnNames（）作为字符串
TableColumnNames=拆分（“POID，维度1，维度2，维度3，描述，价格“，”，”）
对于TableColumnNames中的每个ColumnName
如果我（“输入”&列名）。请为我估价！SubStockEdit（“DS”和ColumnName）。然后
“做点什么。
如果结束
下一个

或者这种扩展语法：

    If Me("Input" & ColumnName).Value <> Me!SubStockEdit.Form("DS" & ColumnName).Value Then

If-Me（“输入”&ColumnName）。给我赋值！SubStockEdit.Form（“DS”&ColumnName）.Value然后

试试这个

Controls("Input" & ColumnName).Name
Controls("Input" & ColumnName).Value

Me!SubStockEdit!Form.Controls("Input" & ColumnName).Value

eval("Input" & ColumnName)
eval("Me!SubStockEdit!DSLibelle")

---

谢谢你的回答。