Module.InsertText-Methode (Access)
Mit der InsertText-Methode wird eine Textzeichenfolge in ein Standardmodul oder Klassenmodul eingefügt.
Syntax
Ausdruck. InsertText (Text)
Ausdruck Eine Variable, die ein Module-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Text | Erforderlich | String | Der Text, der in das Modul eingefügt werden soll. |
Rückgabewert
Nichts
Bemerkungen
Wenn Sie eine Zeichenfolge mit der InsertTextInsertText-Methode einfügen, fügt Microsoft Access den neuen Text am Modulende hinter allen anderen Prozeduren an.
Um mehrere Zeilen hinzuzufügen, schließen Sie die systeminterne Konstante vbCrLf an den gewünschten Zeilenumbrüchen in die Zeichenfolge ein, aus der das Argument Text besteht. Diese Konstante fügt einen Wagenrücklauf und Zeilenvorschub ein.
Verwenden Sie die InsertLines-Methode , um anzugeben, in welcher Zeile der Text eingefügt wird. Zum Einfügen von Code in den Deklarationsbereich des Moduls verwenden Sie die InsertLines-Methode anstelle der InsertText-Methode.
Hinweis
In früheren Versionen von Microsoft Access war die InsertText-Methode eine Methode des Application-Objekts . Sie können weiterhin die InsertText-Methode des Application-Objekts verwenden, es wird jedoch empfohlen, stattdessen die InsertText-Methode des Module-Objekts zu verwenden.
Beispiel
Im folgenden Beispiel wird eine Textzeichenfolge in ein Standardmodul eingefügt.
Function InsertProc(strModuleName) As Boolean
Dim mdl As Module, strText As String
On Error GoTo Error_InsertProc
' Open module.
DoCmd.OpenModule strModuleName
' Return reference to Module object.
Set mdl = Modules(strModuleName)
' Initialize string variable.
strText = "Sub DisplayMessage()" & vbCrLf _
& vbTab & "MsgBox ""Wild!""" & vbCrLf _
& "End Sub"
' Insert text into module.
mdl.InsertText strText
InsertProc = True
Exit_InsertProc:
Exit Function
Error_InsertProc:
MsgBox Err & ": " & Err.Description
InsertProc = False
Resume Exit_InsertProc
End Function
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.