Compartir a través de


Método Module.InsertText (Access)

El método InsertText inserta una cadena de texto especificada en un módulo estándar o un módulo de clase.

Sintaxis

expresión. InsertText (Texto)

Expresión Variable que representa un objeto Module .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Text Obligatorio String Texto que va a insertarse en el módulo.

Valor devuelto

Nothing

Comentarios

Cuando se inserta una cadena mediante el método InsertText, Microsoft Access sitúa el texto nuevo al final del módulo, después de que todos los demás procedimientos.

Para agregar varias líneas, incluya la constante intrínseca vbCrLf en los saltos de línea deseados dentro de la cadena que constituye el argumento Text . Esta constante fuerza un retorno de carro y un avance de línea.

Para especificar en qué línea se inserta el texto, utilice el método InsertLines. Para insertar código en la sección de declaraciones del módulo, utilice el método InsertLines en lugar del método InsertText.

Nota:

[!NOTA] En versiones anteriores de Microsoft Access, el método InsertText era un método del objeto Application. Todavía puede usar el método InsertText del objeto Application , pero se recomienda usar el método InsertText del objeto Module en su lugar.

Ejemplo:

En el ejemplo siguiente se inserta una cadena de texto en un módulo estándar.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.