Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Verwenden Sie die DatasheetFontUnderline-Eigenschaft , um eine unterstrichene Darstellung von Feldnamen und Daten in der Datenblattansicht anzugeben. Boolescher Wert mit Lese-/Schreibzugriff.
Syntax
Ausdruck verwendet werden. DatenblattFontUnderline
expression Eine Variable, die ein Form-Objekt darstellt.
Hinweise
Die DatasheetFontUnderline-Eigenschaft gilt für alle Felder in der Datenblattansicht und für Formularsteuerelemente, wenn sich das Formular in der Datenblattansicht befindet.
Diese Eigenschaft ist nur in Visual Basic innerhalb einer Microsoft Access-Datenbank verfügbar.
Die folgende Tabelle enthält die Eigenschaften, die in der DAO-Properties-Auflistung erst dann vorhanden sind, wenn Sie sie mit der Formatierungssymbolleiste (Datenblatt) festlegen oder sie mit der CreateProperty-Methode in einer Access-Datenbank hinzufügen und an die DAO-Properties-Auflistung anfügen können.
| Eigenschaften | Eigenschaften Fortsetzung |
|---|---|
| DatenblattFontItalic * | DatasheetForeColor * |
| DatenblattFontHeight * | DatasheetBackColor |
| DatasheetFontName * | DatasheetGridlinesColor |
| DatenblattFontUnderline * | DatasheetGridlinesBehavior |
| DatasheetFontWeight * | DatasheetCellsEffect |
Hinweis
Wenn Sie eine mit einem Sternchen aufgeführte Eigenschaft hinzufügen oder festlegen, fügt Microsoft Access automatisch alle mit einem Sternchen aufgeführten Eigenschaften zur Properties-Auflistung der Datenbank hinzu.
Beispiel
Im folgenden Beispiel werden die Daten- und Feldnamen in der Datenblattansicht des Formulars "Artikel" kursiv und unterstrichen angezeigt.
Forms![Products].DatasheetFontItalic = True
Forms![Products].DatasheetFontUnderline = True
Im folgenden Beispiel werden die Daten- und Feldnamen in der Datenblattansicht der Tabelle "Artikel" kursiv und unterstrichen angezeigt. Zum Festlegen der Eigenschaften DatasheetFontItalic und DatasheetFontUnderline wird im Beispiel die SetTableProperty-Prozedur verwendet, die sich im Standardmodul der Datenbank befindet.
Dim dbs As Object, objProducts As Object
Const DB_Boolean As Long = 1
Set dbs = CurrentDb
Set objProducts = dbs![Products]
SetTableProperty objProducts, "DatasheetFontItalic", DB_Boolean, True
SetTableProperty objProducts, "DatasheetFontUnderline", DB_Boolean, True
Sub SetTableProperty(objTableObj As Object, strPropertyName As String, _
intPropertyType As Integer, varPropertyValue As Variant)
' Set Microsoft Access-defined table property without causing
' nonrecoverable run-time error.
Const conErrPropertyNotFound = 3270
Dim prpProperty As Variant
On Error Resume Next ' Don't trap errors.
objTableObj.Properties(strPropertyName) = varPropertyValue
If Err <> 0 Then ' Error occurred when value set.
If Err <> conErrPropertyNotFound Then
On Error GoTo 0
MsgBox "Couldn't set property '" & strPropertyName _
& "' on table '" & objTableObj.Name & "'", 48, "SetTableProperty"
Else
On Error GoTo 0
Set prpProperty = objTableObj.CreateProperty(strPropertyName, _
intPropertyType, varPropertyValue)
objTableObj.Properties.Append prpProperty
End If
End If
objTableObj.Properties.Refresh
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.