Application.FeatureInstall-Eigenschaft (Access)
Verwenden Sie die FeatureInstall-Eigenschaft , um anzugeben oder zu bestimmen, wie Microsoft Access Aufrufe von Methoden und Eigenschaften behandelt, die noch nicht installierte Features erfordern. MsoFeatureInstall-Wert mit Lese-/Schreibzugriff.
Syntax
Ausdruck. FeatureInstall
expression Eine Variable, die ein Application-Objekt darstellt.
Bemerkungen
Wenn VBA-Code auf ein Objekt verweist, das nicht installiert ist, versucht die Microsoft Installer-Technologie, das erforderliche Feature zu installieren. Mit der FeatureInstall-Eigenschaft können Sie steuern, was bei der Referenzierung eines nicht installierten Objekts geschieht. Bei der Standardeinstellung versucht das Installationsprogramm bei allen Zugriffsversuchen auf nicht installierte Objekte, das erforderliche Feature zu installieren. Unter Umständen kann dies einige Zeit in Anspruch nehmen, was den Benutzer eventuell zu der Annahme verleitet, dass der Computer auf Befehle nicht mehr reagiert.
Sie können die FeatureInstall-Eigenschaft auf msoFeatureInstallOnDemandWithUI festlegen, damit Benutzer sehen können, dass während der Installation des Features etwas passiert. Wenn Sie den wiedergegebenen Fehler auffangen und dem Benutzer Ihr eigenes Dialogfeld anzeigen oder eine bestimmte andere Aktion einleiten möchten, können Sie die FeatureInstall-Eigenschaft auf msoFeatureInstallNone einstellen.
Wenn Sie die UserControl-Eigenschaft auf False festgelegt haben, werden Benutzer nicht aufgefordert, neue Features zu installieren, auch wenn die FeatureInstall-Eigenschaft auf msoFeatureInstallOnDemand festgelegt ist. Wurde die UserControl-Eigenschaft auf True festgelegt, wird eine Installationsstatusanzeige eingeblendet, wenn die FeatureInstall-Eigenschaft auf msoFeatureInstallOnDemand festgelegt ist.
Beispiel
In diesem Beispiel wird der Wert der FeatureInstall -Eigenschaft überprüft. Wenn die Eigenschaft auf MsoFeatureInstallNone festgelegt ist, zeigt der Code ein Meldungsfeld mit der Frage, ob die Einstellung der Eigenschaft geändert werden soll. Wenn der Benutzer mit "Ja" antwortet, wird die Eigenschaft auf msoFeatureInstallOnDemand festgelegt. Im Beispiel wird eine Objektvariable namens MyOfficeApp verwendet, die als Anwendungsobjekt dimensioniert ist.
Dim myofficeapp As Access.Application
Set myofficeapp = New Access.Application
With MyOfficeApp
If .FeatureInstall = msoFeatureInstallNone Then
Reply = MsgBox("Uninstalled features for " _
& "this application may " & vbCrLf _
& "cause a run-time error when called." _
& vbCrLf & vbCrLf _
& "Would you like to change this setting" & vbCrLf _
& "to automatically install missing features?", _
vbYesNo, "Feature Install Setting")
If Reply = vbYes Then
.FeatureInstall = msoFeatureInstallOnDemand
End If
End If
End With
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.