ListBox. Column-Eigenschaft (Access)ListBox.Column property (Access)

Sie können die Column -Eigenschaft verwenden, um in einem Kombinations-oder Listenfeld mit mehreren Spalten auf eine bestimmte Spalte oder Spalte und Zeilenkombination zu verweisen.You can use the Column property to refer to a specific column or column and row combination in a multiple-column combo box or list box. Schreibgeschützter Wert vom Typ Variant.Read-only Variant.

SyntaxSyntax

Ausdruck. Spalte (Index, Zeile)expression.Column (Index, Row)

Ausdruck Eine Variable, die ein ListBox -Objekt darstellt.expression A variable that represents a ListBox object.

ParameterParameters

NameName Erforderlich/OptionalRequired/Optional DatentypData type BeschreibungDescription
IndexIndex ErforderlichRequired LongLong Eine lange ganze Zahl, die zwischen 0 und der Einstellung der ColumnCount -Eigenschaft minus 1 liegen kann.A long integer that can range from 0 to the setting of the ColumnCount property minus one.
RowRow OptionalOptional VariantVariant Eine ganze Zahl, die zwischen 0 und der Einstellung der ListCount -Eigenschaft minus 1 liegen kann.An integer that can range from 0 to the setting of the ListCount property minus 1.

BemerkungenRemarks

Use 0 to refer to the first column, 1 to refer to the second column, and so on.Use 0 to refer to the first column, 1 to refer to the second column, and so on. Use 0 to refer to the first row, 1 to refer to the second row, and so on.Use 0 to refer to the first row, 1 to refer to the second row, and so on. For example, in a list box containing a column of customer IDs and a column of customer names, you could refer to the customer name in the second column and fifth row as:For example, in a list box containing a column of customer IDs and a column of customer names, you could refer to the customer name in the second column and fifth row as:

 Forms!Contacts!Customers.Column(1, 4)

Sie können die Eigenschaft Column verwenden, um die Inhalte eines Kombinationsfelds oder Listenfelds einem anderen Steuerelement wie ein Textfeld zuzuweisen.You can use the Column property to assign the contents of a combo box or list box to another control, such as a text box. Wenn Sie beispielsweise die ControlSource -Eigenschaft eines Textfelds auf den Wert in der zweiten Spalte eines Listenfelds festlegen möchten, können Sie den folgenden Ausdruck verwenden.For example, to set the ControlSource property of a text box to the value in the second column of a list box, you could use the following expression.

 =Forms!Customers!CompanyName.Column(1)

Wenn der Benutzer keine Auswahl getroffen hat, wenn Sie auf eine Spalte in einem Kombinations- oder Listenfeld verweisen, ist die Eigenschaft Column demzufolge Null.If the user has made no selection when you refer to a column in a combo box or list box, the Column property setting will be Null. Sie können die IsNull -Funktion verwenden, um zu bestimmen, ob eine Auswahl getroffen wurde, wie im folgenden Beispiel gezeigt.You can use the IsNull function to determine if a selection has been made, as in the following example.

 If IsNull(Forms!Customers!Country) 
   Then MsgBox "No selection." 
 End If

Hinweis

Sie können die Eigenschaftseinstellung ColumnCount überprüfen, um zu bestimmen, über wie viele Spalten ein Kombinations- oder Listenfeld verfügt.To determine how many columns a combo box or list box has, you can inspect the ColumnCount property setting.

BeispielExample

Im folgenden Beispiel werden die Eigenschaften Column und ColumnCount verwendet, um die Werte einer Listenfeldauswahl zu drucken.The following example uses the Column property and the ColumnCount property to print the values of a list box selection.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.