Cómo insertar imagen incrustada en Visual Basic

Visual Basic (VB) es un lenguaje de programación de Microsoft que puede crear aplicaciones independientes, y también ampliar las funciones de las aplicaciones de la suite Microsoft Office. Una función de VB se puede extender implica imágenes vinculadas a los documentos de Office. Un programa de VB puede almacenar una imagen dentro de un documento, en oposición a la vinculación de la imagen para el documento. Aunque esto produce un documento de tamaño mayor que una con una imagen enlazada, el documento no sufrirá un problema clave de uno con imágenes vinculadas: la posibilidad de que la imagen enlazada se desconecta del documento.

Instrucciones

1 Abra Microsoft Word y haga clic elemento "Imagen" del menú "Insertar". Haga clic en la opción "Desde archivo". Vas a enlazar una imagen para el documento actual, a continuación, utiliza Visual Basic para incrustar la imagen.

2 Navegar a cualquier archivo de imagen en el disco duro, a continuación, comprobar el "Vincular a archivo" CHEC-KBOX en el cuadro de diálogo "Insertar imagen". Esto asegura la imagen (todavía) no se incrusta en el documento, pero ligado a él. Presione el botón "Insertar" para vincular la imagen.

3 Pulse la tecla "Alt" y "F9" para mostrar todos los códigos de campo en el documento actual. (Códigos de campo son símbolos palabra que aparece como texto que representan otro contenido, incluyendo las marcas de tiempo actualizan automáticamente, o imágenes vinculadas). La imagen que ha insertado revelará su código de campo "INCLUDEPICTURE", que muestra que la imagen está vinculada, pero aún no incorporado.

4 Pulse la tecla "Alt y" F11 "para entrar en el Visual Basic entorno de desarrollo integrado (IDE). Este entorno contiene herramientas para escribir el programa para incrustar la imagen.

5 Haga clic en punto "módulo", el "Insertar" de la cabecera de menú para crear una nueva ventana para introducir el código del programa.

6 Pegar el programa al final de este paso en la ventana del módulo. El programa itera por cada código de campo en el documento actual. Si un código de campo representa una imagen vinculada, el programa "desvincula" el código de campo, lo que significa que sustituye el enlace de la imagen con la imagen real.

embedImages Public Sub ()

i Dim

Dim x

Dim nxtField

Set x = ActiveDocument.Fields (1)

Aunque no es (x es nada)

Establecer nxtField = x.Next

Si x.Type = Entonces WdFieldType.wdFieldIncludePicture

x.Unlink

Terminara si

Set x = nxtField

Encaminarse a

End Sub

7 Haga clic en cualquier estado del programa "Desvincular" que acaba de escribir, a continuación, pulse la tecla "F5" para ejecutar el programa.

8 Pulse la tecla "Alt" y "F11" para volver al documento. El código de campo de la imagen de la Etapa 3 se ha ido. Su programa lo ha reemplazado con la imagen. Pulse la tecla "Alt" y "F9" dos veces para confirmar que no existen otros códigos de campo "INCLUDEPICTURE" en el documento.