访问VBA：按订单索引选择列

Question

在我的子窗体中，我想更改订单标识的列的宽度。在这种情况下，我尝试调整第二列的大小。

Me.[Table subform].Form.Columns(2).ColumnWidth = "1500"

语法不正确，并且我确定错误的段是Columns(2)。如何管理？

Answer 1

我想您将不得不循环子窗体的控件-类似于以下代码（空代码）：

For Each Control In Me.[Table subform].Form.Controls
    If Control.ControlType = acTextBox Then
        If Control.ColumnOrder = 2 Then
            ' Control/column located.
            Exit For
        End If
    End If
Next
If Not Control Is Nothing Then
    Control.ColumnWidth = 1500
End If