Свойство ListBox.ColumnCount (Access)

Используйте свойство ColumnCount , чтобы указать количество столбцов, отображаемых в поле со списком или в части поля со списком, а также отправленных в объекты OLE в элементе управления диаграммой или в фрейме объекта без привязки. Для чтения и записи, Integer.

Синтаксис

expression. ColumnCount

выражение Переменная, представляющая объект ListBox .

Замечания

Свойство ColumnCount содержит целое число от 1 до максимального числа полей в таблице, запросе или инструкции SQL или максимальное количество значений в списке значений, указанное в свойстве RowSource элемента управления .

Для полей таблицы это свойство можно задать на вкладке Уточняющий запрос в разделе Свойства поля в представлении конструктора таблицы для полей со свойством DisplayControl , заданным как Поле со списком или Поле списка.

Например, если для свойства ColumnCount для поля списка в форме Сотрудники задано значение 3, в одном столбце могут отображаться фамилии, в другом — имена, а в третьем — номера идентификаторов сотрудников.

Поле со списком или список может содержать несколько столбцов. Если свойство RowSource элемента управления содержит имя таблицы, запроса или инструкции SQL, поле со списком или поле со списком будут отображать поля из этого источника слева направо до числа, указанного в свойстве ColumnCount .

Чтобы отобразить другое сочетание полей, создайте новый запрос или новую инструкцию SQL для свойства RowSource , указав нужные поля и порядок.

Если свойство RowSource содержит список значений (свойство RowSourceType имеет значение Список значений), значения помещаются в строки и столбцы поля со списком или списка в том порядке, в котором они перечислены в свойстве RowSource . Например, если свойство RowSource содержит список "Red; Зеленый; Синий; Yellow", а свойству ColumnCount присвоено значение 2. Первая строка поля со списком или списка будет содержать "Красный" в первом столбце и "Зеленый" во втором столбце. Вторая строка будет содержать "Синий" в первом столбце и "Yellow" во втором столбце.

Используйте свойство ColumnWidths , чтобы задать ширину столбцов, отображаемых в элементе управления, или скрыть столбцы.

Пример

В следующем примере свойства Column и ColumnCount используются для печати значений выделенного списка.

Public Sub Read_ListBox() 
 
 Dim intNumColumns As Integer 
 Dim intI As Integer 
 Dim frmCust As Form 
 
 Set frmCust = Forms!frmCustomers 
 If frmCust!lstCustomerNames.ItemsSelected.Count > 0 Then 
 
 ' Any selection? 
 intNumColumns = frmCust!lstCustomerNames.ColumnCount 
 Debug.Print "The list box contains "; intNumColumns; _ 
 IIf(intNumColumns = 1, " column", " columns"); _ 
 " of data." 
 
 Debug.Print "The current selection contains:" 
 For intI = 0 To intNumColumns - 1 
 ' Print column data. 
 Debug.Print frmCust!lstCustomerNames.Column(intI) 
 Next intI 
 Else 
 Debug.Print "You haven't selected an entry in the " _ 
 & "list box." 
 End If 
 
 Set frmCust = Nothing 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.