TextBox.ColumnOrder-Eigenschaft (Access)
Verwenden Sie die ColumnOrder-Eigenschaft , um die Reihenfolge der Spalten in der Datenblattansicht anzugeben. Ganze Zahl mit Lese-/Schreibzugriff.
Syntax
Ausdruck. ColumnOrder
Ausdruck Eine Variable, die ein TextBox-Objekt darstellt.
HinwBemerkungeneise
Wenn Sie diese Eigenschaft für eine Tabelle oder Abfrage mit Visual Basic festlegen oder ändern möchten, müssen Sie die Properties-Auflistung einer Spalte verwenden. Weitere Informationen zur Verwendung der Properties-Auflistung finden Sie unter Eigenschaften.
Die ColumnOrder-Eigenschaft ist in der Entwurfsansicht des Formulars nicht verfügbar.
Die ColumnOrder-Eigenschaft gilt für alle Felder in der Datenblattansicht und für Formular-Steuerelemente, wenn sich das Formular in der Datenblattansicht befindet.
In der Datenblattansicht wird die Einstellung der ColumnOrder-Eigenschaft eines Felds durch die Position des Felds bestimmt. So hat z. B. das Feld in der Spalte ganz links in der Datenblattansicht den Wert 1 für die ColumnOrder-Eigenschaft, das nächste Feld hat die Einstellung 2 usw. Eine Veränderung der Einstellung der ColumnOrder-Eigenschaft eines Felds setzt die Eigenschaft für dieses Feld sowie für jedes Feld in der Datenblattansicht links von dessen ursprünglicher Position zurück.
In anderen Ansichten ist die Eigenschaftseinstellung 0, es sei denn, Sie ändern explizit die Reihenfolge eines oder mehrerer Felder in der Datenblattansicht (entweder durch Ziehen der Felder an neue Positionen oder durch Ändern der Einstellungen der ColumnOrder-Eigenschaft ). Felder rechts neben der neuen Position des verschobenen Felds weisen in anderen Ansichten als der Datenblattansicht die Eigenschaftseinstellung 0 auf.
Die Reihenfolge der Felder in der Datenblattansicht hat keine Auswirkungen auf die Reihenfolge der Felder in der Tabellen-Entwurfsansicht oder Formularansicht.
Beispiel
Im folgenden Beispiel werden die Felder ProductName und QuantityPerUnit in den ersten beiden Spalten in der Datenblattansicht des Formulars Produkte angezeigt.
Forms!Products!ProductName.ColumnOrder = 1
Forms!Products!QuantityPerUnit.ColumnOrder = 2
Im folgenden Beispiel werden die Felder ProductName und QuantityPerUnit in den ersten beiden Spalten der Tabelle Products in der Datenblattansicht angezeigt. Zum Festlegen der ColumnOrder-Eigenschaft wird im Beispiel die SetFieldProperty-Prozedur verwendet. Wenn diese Prozedur ausgeführt wird, während die Tabelle geöffnet ist, werden Die Änderungen erst angezeigt, wenn sie geschlossen und erneut geöffnet wird.
Public Sub SetColumnOrder()
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Set dbs = CurrentDb
Set tdf = dbs!Products
' Call the procedure to set the ColumnOrder property.
SetFieldProperty tdf!ProductName, "ColumnOrder", dbLong, 2
SetFieldProperty tdf!QuantityPerUnit, "ColumnOrder", dbLong, 3
Set tdf = Nothing
Set dbs = Nothing
End Sub
Private Sub SetFieldProperty(ByRef fld As DAO.Field, _
ByVal strPropertyName As String, _
ByVal intPropertyType As Integer, _
ByVal varPropertyValue As Variant)
' Set field property without producing nonrecoverable run-time error.
Const conErrPropertyNotFound = 3270
Dim prp As Property
' Turn off error handling.
On Error Resume Next
fld.Properties(strPropertyName) = varPropertyValue
' Check for errors in setting the property.
If Err <> 0 Then
If Err <> conErrPropertyNotFound Then
On Error GoTo 0
MsgBox "Couldn't set property '" & strPropertyName & _
"' on field '" & fld.Name & "'", vbCritical
Else
On Error GoTo 0
Set prp = fld.CreateProperty(strPropertyName, intPropertyType, _
varPropertyValue)
fld.Properties.Append prp
End If
End If
Set prp = Nothing
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für